15 - 9 классы информатика 5 напишите программу, которая в последовательности натуральных чисел определяет количество чисел ,кратных 3 и оканчивающихся на 2.программа получает на вход натуральные числа, количество введенных чисел неизвестно последовательность чисел заканчивается числом 0.кол-во чисел не привыкает 100.введеные числа не привышают 300
278
475
Ответы на вопрос:
Program n1; var k,a: integer; begin readln(a); k: =0; while a< > 0 do begin if (a mod 10=2) and (a mod 3=0) then k: =k+1; readln(a); end; write(k); end.
Популярно: Информатика
-
anyakoi29.04.2020 20:37
-
gulitenko08.09.2020 22:17
-
QueenNics17.07.2022 21:01
-
Itupoypomogite106.01.2021 16:40
-
Janiya140428.08.2022 13:08
-
Maguire23.11.2020 20:05
-
azul199915.08.2022 13:09
-
ҚалыбековаАқниет13.03.2021 10:29
-
Svetlanaaaa1608.01.2020 11:26
-
Асель113907.02.2023 10:30