1. дана последовательность целых чисел, вводимых с клавиатуры (до 0). найти среднее арифметическое чисел.
Д0лгат
2
25.08.2019 04:10
0
Другие вопросы по теме Информатика
Irishagogo
11.04.2020 20:22
jennie17
11.04.2020 20:20
mashechca
08.10.2019 00:40
helloooo2
08.10.2019 00:40
kolap2230
05.12.2019 11:47
Ульяна1561
05.12.2019 11:44
Популярные вопросы
- у нас контрольная работа ...
1 - Напишите ЦИТАТНУЮ характеристику Госпожи Журден, Люсиль. ...
3 - Правильно оформлено пряму мову в реченні А) «Людина не для того створена,...
3 - 1.Тапсырма: Белiмге катысты тұжырымдарды ня» немесе «жок» кестесі арқылы...
2 - 5. Ғылым мен техника жетістіктерін тарату мен оларды ел игілігіне жұмсаудағы...
3 - Напиши текст (объемом 75 - 80 слов), выбрав одну из двух предложенных тем....
1 - Чтение Задание. Прочитайте тексты и выполните задания. ( ) Текст А …–...
1 - Задание № 5 Соотнесите имена казахстанцев с их деятельностью в годы ВОВ...
2 - Выполните творческое задание на одну из предложенных тем. Повествование...
2 - Шоқан Уалиханов. 1-сабақСәйкестендіру саны: 3...
3
A,N:integer;
S:real;
Begin
N:=-1;
S:=0;
Repeat
Read(A);
N:=N+1;
S:=S+A;
Until A = 0;
WriteLn('Среднее арифметическое введённых чисел равно: ',S/N);
End.