Программирование циклов Цикл с постусловием

Циклический алгоритм Циклический алгоритм это алгоритм, в котором предусмотрено многократное выполнение одной и той же последовательности действий тела цикла. Гвоздь забит? + –

Цикл с постусловием Цикл с условием, проверяемым после выполнения тела цикла, выполняется до тех пор, пока не станет истинным проверяемое условие. Причем, тело цикла обязательно выполниться хотя бы один раз. Гвоздь забит? + –

Оператор цикла с постусловием Repeat … Until …; Оператор цикла с постусловием Repeat … Until …; { Until до тех пор пока не…} Repeat тело цикла; Until условие; В цикле Repeat … Until …операторные скобки Begin … End можно не писать, даже если тело цикла не один оператор.

Пример Выводить на экран значение i до тех пор, пока i не станет равно десяти. i=10 + – i:=1 Вывод i i:=i+1 i:=1; Repeat WriteLn(´i=´, i); i:=i+1; Until i=10; i=1 i=2 i=3 i=4 i=5 i=6 i=7 i=8 i=9

Функция ReadKey Функция ReadKey считывает символ с клавиатуры, является функцией символьного (Char) типа и входит в состав модуля Crt. Uses Crt; Var a:char; Begin a:=ReadKey; WriteLn(a) End.

Функция ReadKey Функцию ReadKey можно использовать без оператора присваивания и использовать вместо функции ReadLn для ожидания нажатия любой клавиши. Uses Crt; Begin … ReadKey; End.