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

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

Задать свой вопрос
2 ответа

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

Пусть а=2, б=3, с=4
2=4, 3=9, 4=16
4+9+16=29
4=2
292= 14.5
Тамара Тунчасова
Спасибо,но нужно составить программу в паскале
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт