составьте программу которая выводит на экран нечетные числа от 1 до 50 в порядке убывания c циклом While

Я учащийся 8 класса. Мы dec не прходили

1. Просто уменьшение на 1, для универсальности2. Вас карают за чтение документации?3. И ладно, n -= 1 или n := n - 1

var  n: integer := 50;begin  if (n mod 2 = 0) then    dec(n);  while (n >= 1) do  begin    writeln(n);    n -= 2;  end;end.