Даны 2 числа. Если они оба отрицательные, то вывести их модуль, если они оба положительные, то возвести их в квадрат.

Question

Андрей Андреев

Информатика

10 июня, 05:25

Даны 2 числа. Если они оба отрицательные, то вывести их модуль, если они оба положительные, то возвести их в квадрат.

+1

Ответы (1)

Знаешь ответ на этот вопрос?

Анастасия Рябинина · Answer 1

Program pp; var a, b:integer; begin read (a, b); if (a>0) and (b>0) then begin a:=sqr (a); b:=sqr (b); end; if (a<0) and (b<0) then begin a:=abs (a); b:=abs (b); end; writeln (a, b); end.