===== PascalABC.NET =====
procedure DoAll;
begin
for var i := 1 to 100 do
if Odd(i) then
Print(i);
Writeln
end;
DoAll
end.
