Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет: а) среднее арифметическое нечётных чисел.
МухаВж
1
17.03.2019 17:40
0
Другие вопросы по теме Информатика
natashafed2
13.05.2020 14:35
kari2018
13.05.2020 14:34
vitusyaischuk
13.05.2020 14:35
icrupnov
13.05.2020 14:33
простонастя4
13.05.2020 14:33
serpermiakov
13.05.2020 14:32
Нурик2266
13.05.2020 14:30
hamidullinranis
13.05.2020 14:30
uliaiachnovetz
13.05.2020 13:43
Популярные вопросы
- Определите В музыкальных примерах тональность и вид Лада.Перепишите...
1 - Розробіть для участі в конкурсі буктрейлерів презентацію з розпо-...
3 - Почему Рим разрушил Коринф и Карфаген причины и последствия...
1 - Отзыв на рассказ «критики» Шукшин. Над чем заставляет задуматься...
1 - Придумайте простую,но интересную идею для создания собственного...
2 - Продовжить прислів я :Кобила за вовком погналась... ...
3 - Как архитектурные памятники передают силу и мощь Древнего Рима?...
2 - Яким краще розмножувати Шапинкові гриби ?...
3 - Complete the sentences with Presend Simple Past Semple or Future...
1 - в решении генетических задач...
1
Program Pr1;
uses crt;
var mas:array[1..40] of integer;
i:integer;
v:real;
Begin
clrscr;
v:=0;
randomize;
for i:=1 to 40 do mas[i]:=random(21);
for i:=1 to 40 do v:=v+mas[i];
v:=v/40;
writeln(v);
end.