Дано пять чисел найти среднее число
лолпрапти
2
01.10.2019 20:00
4
Другие вопросы по теме Информатика
КлубникО
17.09.2019 09:30
akhmetova1
17.09.2019 09:30
zhenyakozyrkova
17.09.2019 09:30
ivan497
15.11.2020 00:21
kamilskylinep0a6rx
15.11.2020 00:17
Перуна
14.11.2020 23:50
nemova1973
14.11.2020 23:50
Проник755
14.11.2020 23:43
sagal63
14.11.2020 23:25
Популярные вопросы
- Найдите скорость движения автомобиля, если за 4 часа он проезжает...
1 - Кисень у лабораторії одержують з речовин, що легко розкладаються...
1 - 3-mashq Nuqtalar orniga foydalanish uchun berilgan soz va soz birikmaliridan...
2 - Знайдіть у кожному рядку одне слово з орфографічною помилкою. За-...
1 - Знайти публістичний текст,скласти план і переказати...
3 - очень вас мне это на завтра умаляю вас . Определите вид односоставных...
3 - Докажите что числа 728 и 1275 взаимно простые...
3 - Опис карти України птолемея!...
2 - Вагон с проверяемой безударной гласной или с непроверяемой...
1 - 9. Накресліть опуклий чотирикутник з вершинами А, В, С і D. а) Дайте...
2
program z_1;
var i,a,s:integer;
begin
s:=0;
for i:=1 to 5 do begin
writeln ('Введите',i,'-е число');
readln (a);
s:=s+a;
end;
writeln ('Среднее арифметическое чисел равно',s/5);
end.