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

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

Question

Информатика

Изабелла

27 ноября, 12:12

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

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

+2

Ответы (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.