Ответы на вопрос:
Program g; var i,a,b,c: integer; begin b: =0; c: =0; write('введите кол-во чисел - '); read(a); for i: =1 to a do begin read(b); if (b mod 4 = 0)then c+=1; end; write('количество чисел, кратных 4 - ',c)end.
Популярно: Информатика
-
Ladylia23.02.2022 11:30
-
НатаЛини17.09.2020 09:51
-
SlavaRPSS07.04.2023 18:36
-
Marina5643465544209.08.2021 14:12
-
hakimjon23202.11.2020 20:09
-
Александра6665626.01.2022 22:06
-
snopchenkoilya03.05.2023 03:04
-
zarinkakoshzhan30.07.2021 08:07
-
sdaugel18.06.2021 21:13
-
сова15423.01.2023 14:38