Алгоритм цикла в программирования

Алгоритм цикла

Условие  да Действие  нет Алгоритм, при котором  повторяются одни и те же  действия, называется  циклом Количество повторов  зависит от условия • конечный • бесконечный  • нулевой

нет Условие  да Ввод данных Вывод ответов Расчет  нет Условие  да Действие  Тело цикла Действие  Действие

Цикл с предусловием нет Условие  да  Тело цикла Структура цикла  While <условие> do    begin             <тело цикла>    end;

Задача 1. Вычислить сумму чисел натурального ряда от 1 до N. нет начало N S:= 0  a:= 1  a<=N да   S:=S+a  a:=a+1 S  конец Program summa; Var a, S , N: integer; Begin           write (‘N=‘);           readln (N);           a:=1; S:=0; While a<=N do  begin            S:=S+a;            a:=a+1; end; Writeln(‘Сумма ’,N,’ чисел равна ’,S); end.

Задача 2. Вычислить сумму чисел 1+1,5+2+2,5+…+30. Задача 3. Подсчитать целое количество отрезков  длиной 1,5м получающиеся из бруска длиной 20м. Задача 4. Вычислить N! (N факториал).

Цикл с  постусловием  Тело цикла нет Условие  да Структура цикла  Repeat <тело цикла>  Until <условие>  Repeat (повторять тело цикла)   Until ( до  условия)

Задача. Вычислить сумму натурального ряда чисел от 1 до N начало N S:= 0  a:= 1   S:=S+а   a:=a+1  a>N да S  конец нет Program summa; Var a, S , N: integer; Begin           write (‘N=‘);           readln (N);           a:=1; S:=0; Repeat            S:=S+a;            a:=a+1 Until a>N; Writeln(‘Сумма равна’,S); end.

Цикл «c параметром» Параметр (i)– это простая переменная задающая количество  повторов от начального(a) до конечного(b),                          Структура цикла   For i:=a to b do   begin <тело цикла>   end; нет  i:= а to b да Тело цикла   i:=1 to N

Задача. Вычислить сумму натурального ряда чисел от 1 до N нет начало N S:= 0   i:= 1 to N да  S:= S + i  S конец Program summa; Var i, S , N: integer; Begin           write (‘N=‘);           readln (N);           S:=0;          for i:=1 to N do            S:= S + i; Writeln(‘Сумма равна’,S); end.