Объявить массив из 4 элементов в разделе переменных. организовать ввод значений пользователем. найти среднее значение элементов.
255
476
Ответы на вопрос:
Пишу на паскале var cp: real; i,k,sum: integer; mass: array[1..4] of integer; begin for i: =1 to 4 do begin write('mass[',i,']= '); read(mass[i]); k: =k+1; sum: =sum+mass[i]; end; cp: =sum/k; writeln('среднее значение переменных равно ',cp); end.
Популярно: Информатика
-
jonbraims09.01.2023 18:10
-
Ulia20051225.05.2022 11:11
-
Ctypakelizaveta10.12.2020 05:52
-
dashafomina9415.06.2023 20:01
-
prisyazhnasvet06.10.2022 14:33
-
ksyu555122.11.2020 05:08
-
Kristina2003star105.09.2020 03:48
-
1337lolkek11.03.2022 02:28
-
MirAZdd22.07.2022 16:11
-
tima23qwerty11.03.2021 11:38