Question

В паскале ABC надо решить задачу на нахождение частного двух чисел   

Answer 1

var a, b ,h: real;
begin
readln(a,b);
h:=a/b;
write(h);
end.

Answer 2

var a,b:real;
begin
  readln(a,b);
  writeln(a/b);
end.