Question

Даны числа a и b .Найти попарную сумму ,попарную разность, попарное произведение и частное чисел.
Нужна программа в паскале,заранее спасибо

Answer 1

var
  a,b:real;
begin
readln(a,b);
writeln(a,'+',b,'=',a+b);
writeln(a,'-',b,'=',a-b);
writeln(a,'*',b,'=',a*b);
writeln(a,'/',b,'=',a/b);
end.