- Главная
- Разное
- Дизайн
- Бизнес и предпринимательство
- Аналитика
- Образование
- Развлечения
- Красота и здоровье
- Финансы
- Государство
- Путешествия
- Спорт
- Недвижимость
- Армия
- Графика
- Культурология
- Еда и кулинария
- Лингвистика
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Детские презентации
- Информатика
- История
- Литература
- Маркетинг
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
REPEAT UNTIL ; презентация
Содержание
где условие - логическое выражение определяющее условие завершения цикла. Проверка условия в цикле ДО осуществляется после выполнения оператора(ов).
Слайд 1Общий вид инструкции цикла ДО:
REPEAT
UNTIL ;
Примечание: Особенность цикла ДО
в том, что между словами repeat и until можно записать любое количество операторов без использования операторных скобок (слова begin и end).
Слайд 2где условие - логическое выражение определяющее условие завершения цикла.
Проверка условия
в цикле ДО осуществляется после выполнения оператора(ов).
Слайд 4Примеры:
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;
2) s:=0; (введены 4, 5, 2, 0)
Repeat
read(n);
if n<>0 then s:=s+n;
Until n=0;
Слайд 6Program 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.
begin
s:=0;
repeat
write(‘введите число’);
readln(a);
if a>0 then s:=s+a;
until a<=0;
writeln(‘Сумма введеных положительных чисел =’,s);
end.
