Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 3 и оканчивающихся на 2. программа получает на вход количество чисел в последовательности, а затем сами числа
211
450
Ответы на вопрос:
Program z; var n,p,i: integer; begin write('n='); readln(n); p: =1; if n mod 2=1 then i: =1 else i: =2; while i< =n do begin p: =p*i; i: =i+2; end; writeln(n,'=',p); end.
Популярно: Информатика
-
Ionа112.07.2020 07:48
-
kateadel0113.06.2023 23:53
-
Ferdgi05.03.2020 04:07
-
Kolyan09702.03.2021 15:29
-
sashafedorishyn11.05.2020 04:07
-
janeair699422.04.2020 07:40
-
anastasiyademy130.03.2023 21:54
-
ingab298918.05.2022 07:20
-
Sonya5ï14.08.2021 00:18
-
Zexory14.11.2020 01:57