Question

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

Паскаль

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

Answer 1

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

Приходи еще!

Answer 2

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

Answer 3

мои*

Answer 4

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

Answer 5

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

Answer 6

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