Упр.3.197 ГДЗ Сборник упражнений Босова 7-9 класс (Информатика)
Решение #1

Рассмотрим вариант решения задания из учебника Босова, Аквилянов 9 класс, Просвещение:
3.197. Напишите программу, которая в последовательности целых чисел определяет количество чисел, кратных 3 и оканчивающихся на 2. Программа получает на вход количество чисел в последовательности, а затем – сами числа. Количество чисел не превышает 1000. Программа должна вывести одно число: количество чисел, кратных 3 и оканчивающихся на 2.
program z_197;
var
n, a, k: integer;
begin
write('Введи количество чисел > ');
readln(n);
k := 0;
repeat
writeln('Введи число > ');
readln(a);
if (a mod 3 = 0) and (a mod 10 = 2) then k := k + 1;
n := n - 1
until n = 0;
writeln('Количество чисел кратных 3 и оканчивающихся на 2 > ', k)
end.
Популярные решебники 9 класс Все решебники
*К сожалению, временные проблемы с публикацией комментариев с мобильных устройств.