1)В числовой последовательности из N произвольных целых чисел найти количество простых чисел 2)Фото
язык С
НУЖНО ПОСТРОИТЬ ДВЕ БЛОК-СХЕМЫ
257
404
Ответы на вопрос:
Program task; const n = 5; var a: array [1..n] of integer; i, k: integer; begin writeln('введите ', n, ' целых чисел через пробел'); for i : = 1 to n do read(a[i]); for i : = 1 to n do if a[i] mod 2 = 0 then begin write(a[i], ' '); k : = k + 1; end; writeln; writeln('всего: ', k); readln; end.
Популярно: Информатика
-
Lalana1116.10.2021 21:19
-
Skrilleax9528.03.2021 12:27
-
pwgamerproyt22.10.2022 08:47
-
dmahov22810.04.2021 01:00
-
Аолвлвьвтадвлвл21.02.2023 13:20
-
БеднаяЕва20.08.2021 12:42
-
Vftfg28.03.2020 00:05
-
ressoli44415.02.2021 19:12
-
Den380101.08.2022 01:01
-
УмничкаХороша15.10.2021 23:47