Надо перевести программу с паскаля на кумир,

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.

Question

Информатика: Надо перевести программу с паскаля на кумир, 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.

Dashylik228 · Accepted Answer

Логическая задача. Может быть решена с таблицы В  строчках цвет  платья, под ним цвет туфель.                   АНЯ          ВАЛЯ        НАТАША белое белые зеленое зеленые                                            + синее синие Ставим Наташе знак плюс в строке зеленый цвет (туфли) Это означает, что в столбце Аня и строке зеленый цвет туфель мы должны поставить знак -   и в строке Валя цвет туфель зеленый - тоже ставим минус. У Ани цвет туфель совпадает с цветом платья. Значит зеленого платья у...

Надо перевести программу с паскаля на кумир, 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.

MOGZ ответил

Надо перевести программу с паскаля на кумир,

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.