15 - 9 классы Информатика 5 балловНапишите программку, которая в последовательности

1
5 - 9 классы Информатика 5 баллов


Напишите программку, которая в последовательности естественных чисел определяет количество чисел ,кратных 3 и заканчивающихся на 2.Программка получает на вход естественные числа, количество введенных чисел безызвестно последовательность чисел заканчивается числом 0.Кол-во чисел не привыкает 100.Введеные числа не привышают 300

Задать свой вопрос
1 ответ
Program n1;
var k,a: integer;
begin
readln(a);
k:=0;
while alt;gt;0 do
begin
if (a mod 10=2) and (a mod 3=0)
then k:=k+1;
readln(a);
end;
write(k);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт