2. Дано три числа a, b, c. Якщо хоча б одне з
них належить відрізку [0;15], то знайти суму
квадратів цих чисел, інакше — знайти
середнє арифметичне.
Ответы
Ответ дал:
0
PascalABC.NET
begin
var (a, b, c) := ReadInteger3('a, b, c:');
if (a in range(0,15)) or (b in range(0,15)) or (c in range(0,15)) then
print(sqr(a) + sqr(b) + sqr(c))
else
print((a + b + c) / 3)
end.
Вас заинтересует
1 год назад
1 год назад
2 года назад
7 лет назад
7 лет назад