Найти квадрат суммы и сумму квадратов 2-х целых чисел,вводимых с клавиатуры.черезе паскаль

173

391

Посмотреть ответы 2

Ответы на вопрос:

вязова1настя

Информатика

4,5(20 оценок)

Program summa; var a, b ,ss,s: integer; begin writeln ( ' введите два целых числа' ); readln(a, b); s: = sqr (a+b); ss : = a*a + b*b; writeln ('сумма квадратов чисел равна ', ss); writeln ('квадрат суммы чисел равен ', s); end.