Информатика Архивный вопрос

Как делать? ввести два целых числа x y определить что больше квадрат суммы или сумма квадратов, вывести ответы "квадрат суммы" или "сумма квадратов" или "значения равны".
В паскале подробно.

Нет комментариев

Ответы

Гость

Program kek;
var z.q.x,y:integer;
Begin
readln (x);
readln (y);
z:= sqr(x)+2*x*y+sqr(b);
q:=sqr(x)+sqr(y);
If z>y then write ('квадрат суммы') 
          else write ('квадрат разности');
End.

Нет комментариев

Похожие вопросы