Нужна помощь с ДЗ по информатике

Паскаль

Вводим целые положительные числа больше 5 пока не введем число 22 ответ на каждое введенное число выводите целые числа от 1 до 22.

эт мой однаклассники

мои*

Ну это вы уж там сами определяйтесь, чего хотите.

мне самой все равно, где бы я не была выполню все что дадут

думаю что мне пора

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 repeat

   var k := ReadInteger;

   if k = 22 then break;

   if k <= 5 then Println('Число должно быть больше 5')

   else Println(Random(22) + 1)

 until False;

 Println('Приходи еще!')

end.

Пример

7

21

17

11

162342

6

2

Число должно быть больше 5

18

1

22

Приходи еще!