Написать программу в паскале напечатать все положительные нечётные трёхзначные числа

Question

Написать программу в паскале

напечатать все положительные нечётные трёхзначные числа

Answer 1

PascalABC.NET 3.2

begin Range(101,999,2).Println end.

Answer 2

Program rd;
var i:integer;
begin
for i:=100 to 999 do if i mod 2 = 1 then write(i,' ');
end.

Comments

нужно решить через цикл «for»

---

так тут и так цикл for

---

чёт деградирую!

---

да бывает. та же проблема!

---

спасибки

---

пожалуйста