Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей. - Pascal
Формулировка задачи:
Составить программу для решения задачи: даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей.
Решение задачи: «Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей.»
textual
Листинг программы
var x, y: real; begin readln(x, y); writeln(abs(x) + abs(y)); writeln(abs(x) - abs(y)); writeln(abs(x) * abs(y)); writeln(abs(x) / abs(y)); end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д