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

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

Question

Информатика

Селиван

20 апреля, 21:07

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

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

+1

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