Напишите программу по блок-схеме.

Question

Напишите программу по блок-схеме.

---

Answer 1

Var i:integer;
begin
i:=1;
repeat
 writeln(i);
 i:=i+2;
until i>10;
end.

Результат:
1
3
5
7
9