Операторы языка Turbo Pascal repeat … until …

Слайд 2

Оператор цикла с постпроверкой условия: repeat … until … Оператор repeat

Оператор цикла с постпроверкой условия: repeat … until …

Оператор repeat …

until … применяется в тех случаях, когда количество повторения действий в цикле заранее не известно и зависит от выполнения какого-либо условия.
Общий вид оператора repeat … until …
Для завершения цикла необходимо, чтобы список операторов влиял на значение выражения условие.
Слайд 3

Блок схема оператора цикла с постпроверкой условия: repeat … until … Список операторов Условие Да Нет

Блок схема оператора цикла с постпроверкой условия: repeat … until …

Список
операторов

Условие

Да

Нет

Слайд 4

Пример: Найти максимальное из натуральных чисел, не превышающих 5000, которое нацело

Пример:

Найти максимальное из натуральных чисел, не превышающих 5000, которое нацело делится

на 39.
Program Demo2;
uses CRT;
var a : integer;
begin clrscr;
a:= 5001;
repeat a:=a-1 until a mod 39 = 0 do;
write (‘ Искомое число = ’, a : 5);
readkey
end.
Слайд 5

Задания: Составить программу для вычисления значений функции F(x) на отрезке [a,

Задания:

Составить программу для вычисления значений функции F(x) на отрезке [a, b]

с шагом h. Результат представить в виде таблицы, первый столбец которой – значения аргумента, второй – соответствующие значения функции:

X:=a
повторять
вычислить F(x);
x:=x+h
пока не (x>b)