Даны два не ненулевых числа. Найти сумму,разность,произведение и частное их модулей.
Даны два не ненулевых числа. Найти сумму,разность,произведение и частное их модулей.
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var a,b: real;
begin
readln(a,b);
a:=abs(a);
b:=abs(b);
writeln(a+b);
writeln(a-b);
writeln(a*b);
writeln(a/b);
end.
Не нашли ответ?
Похожие вопросы