Escape- условие выхода из цикла - PascalABC.NET
Формулировка задачи:
Как написать программу, состоящую из цикла: writeln('Hажмите клавишу Escape '); пока не будет нажат Escape?
Решение задачи: «Escape- условие выхода из цикла»
textual
Листинг программы
- uses
- crt;
- var
- ch: char;
- begin
- repeat
- ch := readkey;
- writeln('Hажмите клавишу Escape ');
- until ch = #27;
- end.
Объяснение кода листинга программы
- Используется модуль Crt (для работы с консолью)
- Переменная ch инициализируется пустым значением
- Входим в цикл repeat
- В каждой итерации цикла считываем значение с клавиатуры и сохраняем его в переменной ch
- Выводим сообщение на экран
Hажмите клавишу Escape - Пока значение переменной ch не равно #27 (Escape), цикл продолжается
- Когда значение переменной ch становится равным #27, цикл прекращается и программа завершается
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
