СРОЧНО 100 Балов ПЕРЕПИШИТЕ НА ЯЗЫК ПИТОНА
var n, s, k, g: integer;

begin

s:=0;

readln(n);

for k:=1 to n do

begin

readln(g);

if (g mod 3 = 0) then

s:=s+1;

end;

writeln(s);

end.

Ответы

Ответ дал: restIess
0

s = 0

n = int(input())

for i in range(1,n+1):

   g = int(input())

   if g % 3 == 0:

       s += 1

print(s)

Вас заинтересует