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

Тодорка
Oct 24, 2020
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.
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.
157
Смежные вопросы: