Question

Составте программу умножения и деления двух чисел.

Answer 1

Var a,b,c:ineteger;
d:real;
begin
c:=a*b;
d:=a/b;
writeln(c);
writeln(d)
end.