Ответы
Ответ дал:
0
Var n,i:integer;
Begin
Readln(n);
For i:=1 to n do
If not(i mod 2 = 0) then writeln(i);
End.
Begin
Readln(n);
For i:=1 to n do
If not(i mod 2 = 0) then writeln(i);
End.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад