- Главная
- Разное
- Дизайн
- Бизнес и предпринимательство
- Аналитика
- Образование
- Развлечения
- Красота и здоровье
- Финансы
- Государство
- Путешествия
- Спорт
- Недвижимость
- Армия
- Графика
- Культурология
- Еда и кулинария
- Лингвистика
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Детские презентации
- Информатика
- История
- Литература
- Маркетинг
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Циклические алгоритмы. Реализация циклов в Object Pascal презентация
Содержание
- 1. Циклические алгоритмы. Реализация циклов в Object Pascal
- 2. План Понятие «цикл» Цикл с предусловием в
- 3. Цикл – это группа последовательных действий, завершающаяся
- 4. Два основных вида циклов: 1. Цикл с
- 5. Структура цикла Начало: подготовка цикла Проверка: определяет
- 6. Задача о «монетах» Начало: … Проверка: в
- 7. 2. Цикл с предусловием в Object Pascal
- 8. Const e=0.001; Var s:real; n:integer; begin
- 9. 3. Цикл с постусловием в Object Pascal
- 10. Задача: среднее арифметическое введенных чисел Var s,a:real;
- 11. 4. Цикл с параметром в Object Pascal
- 12. Задача: найти сумму чисел от 1 до
- 13. Другая форма оператора for := downto do ;
- 14. Задача: вывести на экран символы в обратном
План Понятие «цикл» Цикл с предусловием в Object Pascal Цикл с постусловием в Object Pascal Цикл с параметром в Object Pascal
Слайд 2План
Понятие «цикл»
Цикл с предусловием в Object Pascal
Цикл с постусловием в Object
Pascal
Цикл с параметром в Object Pascal
Цикл с параметром в Object Pascal
Слайд 3 Цикл – это группа последовательных действий, завершающаяся переходом при выполнении некоторого
условия на первую команду этой группы.
Слайд 4Два основных вида циклов:
1. Цикл с известным числом повторений.
2. Циклы с
неизвестным количеством повторений.
Слайд 5Структура цикла
Начало: подготовка цикла
Проверка: определяет момент выхода из цикла
Тело цикла: содержит
рабочую часть и продвижение (обновление параметра или величины, его заменяющей)
Слайд 6Задача о «монетах»
Начало: …
Проверка: в кармане есть монеты?
Тело цикла: взять монету
из кармана
! Организовать цикл с известным числом повторений и цикл с неизвестным числом повторений
Слайд 8Const e=0.001;
Var s:real; n:integer;
begin
s:=0; n:=1;
while 1/n>e do
begin
s:=s+1/n;
inc(n);
end;
writeln('summ = ',s);
end.
inc(n);
end;
writeln('summ = ',s);
end.
Задача: найти сумму ряда
S = 1+1/2+1/3+…+1/n c точностью до e=0,001
Слайд 10Задача: среднее арифметическое введенных чисел
Var s,a:real; n:integer;
begin
s:=0; n:=0;
repeat
readln(a);
s:=s+x; inc(n);
until a=0;
writeln('srednee = ',s/n);
end.
until a=0;
writeln('srednee = ',s/n);
end.
Слайд 114. Цикл с параметром в Object Pascal
for := to
do <оператор>;
Для i от n до m выполнять
Серия
Конец –цикл
Да
Нет
i:=n,m
Слайд 12 Задача: найти сумму чисел от 1 до N
Var n, s, i
: integer;
begin
s:=0;
writeln('vvedite N');
readln(n);
for i:=1 to n do
s:=s+n;
writeln('sum = ',s);
readln;
end.
begin
s:=0;
writeln('vvedite N');
readln(n);
for i:=1 to n do
s:=s+n;
writeln('sum = ',s);
readln;
end.
Слайд 14Задача: вывести на экран символы в обратном порядке
Var i : integer;
begin
for i:=255 downto 0 do
write(chr(i),' ');
readln;
end.
write(chr(i),' ');
readln;
end.
