//fpc 3.0.0
program jugando;
const
MAX = 10;
var
a,b : integer;
c,d,e : integer;
st : string;
res, r1, r2 : real;
begin
write('Holis');
writeln('estamos jugando !!');
st := 'entretenido';
write('este juego es',st,'!!!');
readln(a,b);
c := a;
res := a/b;
writeln('resultado ', res);
readln(r1,r2);
res := r1/r2;
writeln('resultado nuevo ', res);
(* readln(d,r2,r1);
write('(',MAX-r1,',',c+d,')'); *)
end.