'

REPEAT <оператор(ы)> UNTIL <условие>;

Понравилась презентация – покажи это...





Слайд 0

Общий вид инструкции цикла ДО: REPEAT <оператор(ы)> UNTIL <условие>; Примечание: Особенность цикла ДО в том, что между словами repeat и until можно записать любое количество операторов без использования операторных скобок (слова begin и end).


Слайд 1

где условие - логическое выражение определяющее условие завершения цикла. Проверка условия в цикле ДО осуществляется после выполнения оператора(ов).


Слайд 2

Структурная схема цикла ДО. оператор ? ДА НЕТ - +


Слайд 3

Примеры: 1) x:=2 Repeat x:=x+1; Until x=10; 2) s:=0; (введены 4, 5, 2, 0) Repeat read(n); if n<>0 then s:=s+n; Until n=0;


Слайд 4

Следующая программа вычисляет сумму положительных чисел, введенных с клавиатуры.


Слайд 5

Program Summa; var a:integer; {число, введенное с клавиатуры} s:integer; { сумма введенных чисел } begin s:=0; repeat write(‘введите число’); readln(a); if a>0 then s:=s+a; until a<=0; writeln(‘Сумма введеных положительных чисел =’,s); end.


×

HTML:





Ссылка: