Составить программу паскаль для вычисления нечётных чисел меньше 16 цикл репит

Question

Составить программу паскаль для вычисления нечётных чисел меньше 16 цикл репит

Answer 1

Var n:byte;
begin
n:=16;
repeat
dec(n);
if (n mod 2)=0 then continue;
writeln(n);
until n=0;
end.

Выводит с новой строки все нечетные числа, которые меньше 16-ти.

Comments

Вованичичка, цикл работает на он повторяет их по кругу , как исправить чтобы не повторялись

---

ничего он не должен повторять по кругу, у меня все правильно работает