Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 3. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число — минимальное число, кратное 3. на питоне

1)var i,x,n,a:integer

begin

x:=0;

read(n);

for i:=1 to n do    //Если количество  чисел не дано, то надо писать while not eof. 

begin

read(a);

if a mod 4 = 0 then inc(x)     //x:=x+1;

end;

write(x);

end.

2)var i,min,a,n:integer;

begin

min:=30001;

read(n);

for i:=1 to n do begin

read(a);

if a mod 3 = 0 then

if a<min then min:=a;

end;

write(min);

end.

N = int(input())

nums = [int(input()) for i in range(N)]

mults = [i for i in nums if i % 3 == 0]

print(min(mults))

Объяснение: