Информатика, опубликовано 2018-08-22 23:08:58 by Гость

Решите задачу: Даны 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.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.