Ответы
Ответ дал:
0
Program z7; Var a,b,sum,pro:integer;Begin write('Введите 1-ое число - '); readln(a); write('Введите 2-ое число - '); readln(b); sum:= a*a + b*b; pro:= a*a * b*b; write('Сумма квадратов - ', sum); write('Произведение квадратов - ', pro); End.
Приложения:
Вас заинтересует
1 год назад
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад
8 лет назад