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, цикл прекращается и программа завершается
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д