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

В паскале подробно.

Question

Информатика

Агриппич

16 апреля, 18:31

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

В паскале подробно.

+5

Ответы (1)

Знаешь ответ?

Полиект · Answer 1

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.