Напишите программу, которая в последовательности целых чисел
определяет количество двузначных чисел, кратных 8. Программа получает на
вход целые числа, количество введённых чисел неизвестно,
последовательность чисел заканчивается числом 0 (0 – признак окончания
ввода, не входит в последовательность). Количество чисел не превышает
1000. Введённые числа по модулю не превышают 30 000. Программа должна
вывести одно число: количество двузначных чисел, кратных 8.

Python

Program Zadacha197;

uses crt;

var i, k, a:integer;

BEGIN

writeln('Введите а');

readln(a);

i := 0;

k := 1;

while (a<>0) and (k < 1000) do

begin

if (a mod 3 = 0) and (abs(a) <= 30000) then i := i + 1;

k := k + 1;

readln(a);

end;

writeln(i, '- количество четных чисел, кратных трём.');

END.

- while (a<>0) and (k < 1000) эту часть кода можно понять так, пока введенное число не равно нулю и количество введенных чисел не превышает 1000 то выполняется программа.

- if (a mod 3 = 0) and (abs(a) <= 30000) если введенное число делится на три без остатка и по модулю введенное число меньше 30000 то выполняется данное условие.

- i эта переменная у нас считает количество чисел кратных трём.

- k эта переменная считает количество введенных чисел во время использования программы.

- a эта переменная

i = 1

k = 0

while i != 0:

   i = int(input())

   if (i>9) and (i<100) and (i % 8 ==0):

       k+=1

print(k)