Дан одномерный массив а[n] подсчитать количество чётных значений элементов массива.
208
358
Ответы на вопрос:
Var a: array [1..100] of integer; i,k,n : integer; begin readln(n); for i: =1 to n do readln(a[i]); k: =0; for i: =1 to n do if a[i] mod 2=0 then k: =k+1; writeln(k); end.
Const n=10; var cp,i: integer; a: array[1..n] of integer; begin for i: =1 to n do begin write('a[',i,']='); read(a[i]); if a[i] mod 2=0 then cp: =cp+1; end; writeln('кол-во четных элементов в массиве равно ',cp); end.
a)
i = 0
s = 0
while i < 7:
s = s + i
i += 1
print(s)
b)
i = 0
s = 0
while i < 7:
print(s, i)
s = s + i
i += 1
Популярно: Информатика
-
Farzaney19.06.2021 10:07
-
guzaliyakildi01.09.2022 22:50
-
Stikki17.06.2021 21:28
-
vramazanova404.06.2022 20:40
-
Нафаня15822.11.2020 04:17
-
Солнышко00330.04.2022 15:08
-
маг12222.07.2020 12:36
-
Нафаня1337133726.08.2020 00:46
-
Julai123426.10.2020 03:27
-
marga2304200224.11.2022 02:10