Напечатайте все нечетные числа от 3 до 25 в программе Паскаль

Question

Напечатайте все нечетные числа от 3 до 25 в программе Паскаль

Answer 1

Var i: integer;
begin
for i:=3 to 25 do
if i mod 2 <> 0 then
write(i);
end.