Ответы
Ответ дал:
0
var
n, i: integer;
begin
readln(n);
for i := 1 to n do
if i mod 2 = 0 then
writeln(i);
end.
n, i: integer;
begin
readln(n);
for i := 1 to n do
if i mod 2 = 0 then
writeln(i);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад