Ответы на вопрос:
Var a: array [1..5] of integer; sum,k, i: integer; begin sum: =0; k: =0; writeln('введите 5 элементов массива'); for i: =1 to 5 do read(a[i]); for i: =1 to 5 do begin sum: =sum+a[i]; k: =k+1; end; writeln('среднее арифметическое всех элементо массива = ', sum/k); end.
Популярно: Информатика
-
lenadanilova7731.10.2021 11:40
-
Долгинцев20.05.2020 21:00
-
qwertyuiop34204.11.2021 15:18
-
Like92312.02.2023 01:01
-
Ramaz777117.08.2021 21:21
-
anast1sava15.01.2020 02:42
-
Sawa160503.10.2022 08:33
-
gazizullinnafi07.01.2021 21:19
-
varyavernerr04.06.2020 09:39
-
pv441986808.12.2021 12:38