Презентация на тему Циклы в Pascal 8 класс

Типы циклов
цикл while с предусловием
циклы с параметром for
цикл repeat - until с постусловием
циклы с предусловием

Цикл с предусловием в Паскале - WHILE
Оператор цикла с предусловием выполняет действия заранее неизвестное число раз. Выход из цикла осуществляется, если некоторое логическое выражение или его результат окажется ложным.
Так как верность логического выражения проверяется в начале, тело цикла может не выполнится ни одного раза.

Структура цикла WHILE
WHILE <условие> DO
begin
<тело цикла>;
end;

Блок – схема цикла WHILE
условие
нет
да
оператор

Пример
Задача: Написать программу, которая вычисляет сумму всех четных чисел до 50.
var
sum: integer;
n: integer;
begin
sum:=0;
n:=2;
while n <= 50 do
begin
sum:= sum + n;
n:= n + 2;
end;
writeln ('Сумма равна: ',sum);
end.

Задача
Написать программу, которая ищет n!.

Цикл с постусловием в Паскале – REPEAT-UNTIL
Этот оператор аналогичен оператору цикла с предусловием, но отличается от него тем, что проверка условия производится после выполнения тела (действий) цикла. Это обеспечивает его выполнение хотя бы один раз в отличие от ранее разобранных циклов.
Обратите внимание на то, что данный оператор цикла предполагает наличие нескольких операторов в теле цикла, то есть можно выполнять несколько действий, поэтому служебные слова Begin и End не нужны.

REPEAT
<тело цикла>;
UNTIL
<условие>;
Структура цикла
REPEAT-UNTIL

Блок – схема цикла REPEAT-UNTIL
условие
нет
да
оператор

Задача: Написать программу, которая определяет сумму первой и последней цифр в числе. var
a,b,c,d:integer;
begin
writeln('введите число');
readln(a);
d:=a mod 10;
repeat
b:=a mod 10;
a:=a div 10;
until a=0;
c:=d+b;
writeln(‘Сумма первой и последней цифры равна:‘c);
end.
Пример

Написать программу, которая определяет является ли число простым.
Задача

Цикл с параметром в Паскале - FOR
Цикл FOR задаёт условие по которому программа будет работать до его выполнения, допустим нужно n раз зациклить программу, то это легко сделать с помощью данного цикла.
У цикла FOR есть характерная черта - счетчик который обычно обозначается буквой i или j.
В цикле счетчик можно задавать как в прямом (служебное слово to), так и в обратном порядке (служебное слово downto).

Структура цикла FOR
FOR i:= n1 TO n2 DO
begin
<тело цикла>; end;
FOR i:= n2 DOWNTO n1 DO
begin
<тело цикла>;
end;
1 – ая форма записи
2 – ая форма записи

Блок – схема цикла FOR
i:= n1 … n2
Тело цикла

Пример
Задача: Написать программу, которая вычисляет n-ую степень заданного числа.
var
a, n, i, pr: integer;
begin
writeln (‘Введите число');
readln (a);
writeln (‘Введите степень числа');
readln (n);
pr:= 1;
for i:= 1 to n do
begin
pr:= pr * a;
end;
writeln (‘Степень числа равна’,pr);
end.

Задача
Написать программу, которая находит число P = (1-1/2)(1-1/3)*…*(1-1/n).
N вводится с клавиатуры.