В Паскале.Введите целые числа a,b,с.Найдите сумму квадратов каждого из чисел и поделите...

0 голосов
41 просмотров

В Паскале.Введите целые числа a,b,с.Найдите сумму квадратов каждого из чисел и поделите на корень наибольшего из трёх чисел


Информатика (14 баллов) | 41 просмотров
Дано ответов: 2
0 голосов

Пусть а=2, б=3, с=4
2²=4, 3²=9, 4²=16
4+9+16=29
√4=2
29÷2= 14.5

(480 баллов)
0

Спасибо,но нужно составить программу в паскале

0 голосов

var

   a, b, c : integer;

   

begin

   write('введите a ');

   readln(a);

   write('введите b ');

   readln(b);

   write('введите c ');

   readln(c);

   writeln((sqr(a)+sqr(b)+sqr(c))/sqrt(max(a, max(b, c))));

end.

протестировано в PascalABC.Net

(1.2k баллов)