9класс
Страница 90 номер 197, ГДЗ по информатике за 9 класс к рабочей тетради Босовой. Решение с ответом к РТ
Номер 197. Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 3 и оканчивающихся на 2. Программа получает на вход количество чисел в последовательности, а затем — сами числа. Количество чисел не превышает 1000. Введенные числа по модулю не превышают 30 000. Программа должна вывести одно число: количество чисел, кратных 3 и оканчивающихся на 2.
Program tt;
var n, k, a, i: integer;
begin
readln(n);
k:=0;
for i:=1 to n do
begin
readln(a);
if (a mod 3 = 0) and (a mod 10 = 2) then k:= k+1
end;
wreteln(‘Количество чисел кратных 3 и оканчивающихся на 2 = ‘,k)
end.
