Var n, s, k, g: integer; begin

s:=0;

readln(n);

for k:=1 to n do

begin

readln(g);

if (g mod 6 = 0) then

s:=s+1;

end;

writeln(s);

end.
нужно это перевести в питон

Колобокхоёк    3   08.03.2021 11:26    0