Программирование циклических алгоритмов
Цикл - многократное повторение последовательности действий по некоторому условию.
Известны три типа циклических алгоритмических структур 1.цикл с предусловием, 2.цикл с постусловием, 3.цикл с параметром.
Цикл с предусловием (цикл-пока) while do Пока значение логического выражения - true, выполняется тело цикла. Лог.выр. Тело цикла данет
Цикл с постусловием (цикл-до) Повторяется выполнение тела цикла. Цикл заканчивается, когда логическое выражение принимает значение true. Тело цикла с постусловием выполняется хотя бы один раз. repeat until Тело цикла Лог.выр. нетда
Цикл с параметром 1.for I:= А to В do ; (+1) 2.for I:= А downto В do ; (-1) Здесь I - параметр цикла порядкового – типа А и В - выражение того же типа, определяющее начальное и конечное значение параметра Для I от А до В Тело цикла
Если тело цикла состоит из нескольких операторов, то для ограничения составного тела цикла требуется begin и end для всех типов циклов, кроме цикла с постусловием.
Задача Вычислить сумму натурального ряда чисел от 1 до N
1 способ var n,i,s: integer; begin write (' n=' ) ; readln (n) ; i:=1; s:=0; while i
2 способ var n,i,s: integer; begin write (' n=' ) ; readln (n) ; i:=1; s:=0; repeat s:=s+i; i:=i+l until i>N; Writeln ('s=', s); end.
3 способ var n,i,s: integer; begin write (' n=' ) ; readln (n) ; s:=0; for i:= 1 to N do s:=s+i; Writeln ('s=', s); end.