ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!
Один
Шаг равен 1 у паскаля нет возможности изменять шаг есть только вариант for i := 20 downto 1 do, где шаг -1 вот и все