Программирование на языке Паскаль Операторы повторений. - презентация

1 Программирование на языке Паскаль Операторы повторений

2 Виды повторений: Цикл с параметром; Цикл с предусловием; Цикл с постусловием.

3 Оператор цикла с параметром Оператор цикла с параметром используют, когда известно число повторений одного и того же действия

4 Структура цикла с параметром for := to do ; for, to, do – зарезервированные слова (для, до, выполнить) - переменная порядкового типа; - начальное значение параметра – выражение того же типа); - конечное значение параметра – выражение того же типа); - произвольный оператор Турбо Паскаля.

5 Последовательность выполнения оператора For При выполнении оператора For вначале вычисляется выражение и осуществляется присваивание :=. После этого циклически выполняется: Проверка условия ; если условие не выполнено, оператор for завершает свою работу; (если условие не выполняется в самом начале работы оператора for, исполняемый оператор не будет выполнен ни разу) Выполнение оператора ; наращивание переменной на единицу.

6 Пример: составить программу, подсчитывающую сумму всех натуральных чисел от 1 до N

7 program sum1; uses crt; var I,n,s:integer; begin clrscr; write(Введите число n'); read(n); S:=0; for I:=1 to n do S:=S+I; writeln('S=',s); readkey; end.

8 Оператор downto for := downto ; Выполняется аналогичным образом, но шаг наращивания параметра цикла равен (-1), поэтому, чтобы цикл выполнился хотя бы один раз, начальное значение параметра цикла должно быть не меньше конечного значения параметра. ………………………… for I:=1 downto 1 do S:=S+I; …………………

9 Оператор While (с предусловием) While do While do – зарезервированные слова (пока[выполняется условие],делать); - выражение логического типа; - произвольный оператор Турбо Паскаля. Если выражение имеет значение true (истина), то выполняется, после чего вычисление значения выражения и его проверка повторяются. Если выражение имеет значение false (ложь), оператор While прекращает свою работу

10 program sum2; uses crt; var I,n,s:integer; begin clrscr; write(Введите натуральное число n'); read(n); S:=0; I:=1; While I<=n do begin S:=S+I; I:=I+1; End; writeln('S=',s); readkey; end.

11 Оператор Repeat…Until (с постусловием) Repeat until ; Repeat…Until – зарезервированные слова (повторять до тех пор, пока не будет выполнено условие); - произвольная последовательность операторов Турбо Паскаля; - выражение логического типа; Операторы выполняются хотя бы один раз, после чего вычисляется выражение : если его значение ЛОЖЬ, операторы повторяются, в противном случае Repeat…Until завершает свою работу.

12 program sum3; uses crt; var I,n,s:integer; begin clrscr; write(Введите натуральное число n'); read(n); S:=0; I:=1; Repeat S:=S+I; I:=I+1; Until I