Написать программу паскаль! дан массив из 20 целых чисел, определить среднее арифметическое этого массива
missapikova
3
12.03.2019 04:40
3
Другие вопросы по теме Информатика
montishok
14.06.2019 12:10
Yaroslavdonskk
14.06.2019 12:10
сырнаядуша
21.07.2019 18:40
diman772
03.08.2019 11:50
SchoolWolf
03.08.2019 11:40
Настятвсердечко
03.08.2019 11:40
Anchoys777
03.08.2019 11:40
Популярные вопросы
- Представьте, что вы являетесь сотрудником микробиологической лаборатории, в которой...
2 - Особенности строения корневой системы кактуса...
3 - 1) найти и выписать элементы исторической эпохи в Песне про купца Калашникова...
1 - 1. Коли відбуваються події, описані в повісті «Гуси-лебеді летять». »? Відповідь,...
1 - Вычисли: : |-0,751:1151+1-49|=...
1 - это таблица к параграфу 32 учебника по физике 8 класс. автор перышкин если что....
1 - На рисунке прямая m перпендикулярна прямым p и q параллельны ли прямые p и q?...
1 - Напишите сочинение на комедию Ревизор...
2 - X²+3x-10=0 назовите его коэффициенты...
3 - Што,на вашу думку,яднае твор жывапису максима багдановича и яго верш маёвая песня...
1
Var a: array [1..20] of integer; i,s:integer;
Begin
For i:=1 to 20 do begin
read(a[i]); s:=s+a[i];
end;
Writeln(s/20);
readln;
end.