Информатика, опубликовано 26.10.2019 17:28
Надо перевести программу с паскаля на кумир,
var n,i,a,k: integer;
begin
readln(n);
k : = 0;
for i : = 1 to n do begin
readln(a);
if (a mod 4 = 0) and (a mod 7 < > 0) then
k: =k+1;
end;
writeln(k)
end.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01