Решите задачу: Даны 2 ненулевых числа. Найти сумму, разность, произведение и частное их модулей. Желательно оформите, как решение задачи в Паскале
Решите задачу:
Даны 2 ненулевых числа. Найти сумму, разность, произведение и частное их модулей.
Желательно оформите, как решение задачи в Паскале
Гость
Ответ(ы) на вопрос:
Гостьvar
a, b: integer;
begin
readln(a, b);
writeln('Сумма: ', abs(a)+abs(b));
writeln('Разность: ', abs(a)-abs(b));
writeln('Произведение: ', abs(a)*abs(b));
writeln('Частное: ', abs(a)/abs(b));
end.
Не нашли ответ?
Похожие вопросы