Похожие презентации:
Алгоритм цикла
1. Алгоритм цикла
2.
нетУсловие
Алгоритм, при котором
повторяются одни и те же
действия, называется
циклом
да
Действие
Количество повторов зависит
от условия
• конечный
• бесконечный
• нулевой
3.
нетнет
Условие
Условие
да
да
Вывод
Ввод
Расчет
данных
ответов
Тело
Действие
цикла
Действие
Действие
4. Цикл с предусловием
Структура цикланет
Условие
да
While <условие> do
begin
<тело цикла>
Тело цикла
end;
5.
Задача 1. Вычислить сумму чисел натурального рядаот 1 до N.
Program summa;
начало
Var a, S , N: integer;
N
Begin
write (‘N=‘);
S:= 0
a:= 1
readln (N);
a:=1; S:=0;
нет
a<=N
да
While a<=N do
begin
S:=S+a
a:=a+1
S:=S+a;
a:=a+1;
end;
Writeln(‘Сумма ’,N,’ чисел равна ’,S);
S
конец
end.
6. Цикл с постусловием
Структура циклаТело цикла
нет
Условие
да
Repeat
<тело цикла>
Until <условие>
Repeat (повторять тело цикла)
Until ( до условия)
7. Задача. Вычислить сумму натурального ряда чисел от 1 до N
началоProgram summa;
Var a, S , N: integer;
Begin
N
write (‘N=‘);
S:= 0
a:= 1
readln (N);
a:=1; S:=0;
S:=S+а
a:=a+1
Repeat
S:=S+a;
нет
a:=a+1
a>N
да
S
Until a>N;
Writeln(‘Сумма равна’,S);
end.
конец
8.
Цикл «c параметром»Параметр (i)– это простая переменная задающая количество
повторов от начального(a) до конечного(b),
Структура цикла
i:= а to b
да
Тело цикла
нет
For i:=a to b do
begin
<тело цикла>
end;
i:=1 to N
9.
Задача. Вычислить сумму натурального ряда чисел от 1 до Nначало
Program summa;
N
Var i, S , N: integer;
Begin
S:= 0
write (‘N=‘);
i:= 1 to N
нет
readln (N);
S:=0;
да
for i:=1 to N do
S:= S + i
S:= S + i;
Writeln(‘Сумма равна’,S);
end.
S
конец
10. 1. Записать в тетрадь 3адачу 1 (3 блок-схемы и программы на Паскале) 2.Построить блок-схему и написать на языке Паскаль
программу в тетради кзадачам 2-4, используя любой вид цикла.
Задача 2. Вычислить сумму чисел
1+1,5+2+2,5+…+30.
Задача 3. Подсчитать целое количество
отрезков длиной 1,5м получающиеся из
бруска длиной 20м.
Задача 4. Вычислить N! (N факториал).