Дана целочисленная последовательность из 50 элементов. элементы с черными номерами необходимо просуммировать и вывести среднее значение на экран.
256
446
Ответы на вопрос:
Program n1; const n=50; var a: array[1..n] of integer; i,k,sum: integer; begin randomize; for i: =1 to n do a[i]: =random(50)+1; for i: =1 to n do if i mod 2=0 then begin k: =k+1; sum: =sum+a[i]; end; writeln(sum/k); end.
Популярно: Информатика
-
mashoklomakina01.03.2023 16:36
-
BPANRUSSIA27.01.2022 03:06
-
lezifequliyeva14.02.2021 08:39
-
ропчан03.01.2023 18:38
-
dimaonisko02.02.2021 15:27
-
vgubajdullin05.01.2022 19:35
-
vip36084227.10.2020 21:43
-
veralyagonova12.12.2022 02:15
-
maksim2008198609.05.2023 05:20
-
Korolinaaa08.04.2020 06:26