Презентация, доклад Программирование циклов на языке Pascal

обозначает в блок-схеме условие?
Ромб
Какой оператор описывает в программе ввод данных?
Read, readln
Какой оператор описывает в программе вывод данных?
Write, writeln

с постусловием (цикл - до)
Repeat <тело цикла> until <условие>;
Цикл с параметром (цикл - для)
for i:=In to Ik do <тело цикла>;
for i:=In downto Ik do <тело цикла>;

истинно, выполняется тело цикла. Тело цикла может быть простым или составным оператором.

условие

да

нет

тело цикла

цикла до истинности условия. Тело цикла с постусловием всегда выполнится хотя бы один раз.

тело цикла

условие

да

нет

цикла>;
for i:=In downto Ik do <тело цикла>;
i – параметр цикла – простая переменная порядкового типа;
In – выражение того же типа, определяющее начальное значение параметра;
Ik – выражение того же типа, определяющее конечное значение параметра;
Цикл повторяется, пока значение параметра лежит в интервале между In и Ik.

тело цикла

i:=In, Ik

i:=4 to 1 do
s:=s+1;
Ответ:
ни разу

do
x:=x+3;
x:=x+1;
Ответ:
13

do
begin
x:=x+3;
x:=x+1;
end;
Ответ:
11

b:=1;
While a+b < 8 do
begin
a:=a+1;
b:=b+2;
end;
S:=a+b;
Ответ:
2 раза
S=8, a=3, b=5

1 do
S:=s+2*a;
Writeln('S=', S);
End.
Ответ:
S=30

integer;
Begin
Write('N='); readln(N);
S:=0; i:=1;
While i<=N do
begin
S:=S+i;
i:=i+1;
end;
Writeln('S=', S);
End.

начало

конец

ввод N

S:=0; i:=1

i<=N

S:=S+i;
i:=i+1

Вывод S

да

нет

integer;
Begin
Write('N='); readln(N);
S:=0; i:=1;
Repeat
S:=S+i;
i:=i+1;
Until i>N;
Writeln('S=', S);
End.

начало

конец

ввод N

S:=0; i:=1

i>N

S:=S+i;
i:=i+1

Вывод S

да

нет

i, S: integer;
Begin
Write('N='); readln(N);
S:=0;
For i:=1 to N do
S:=S+i;
Writeln('S=', S);
End.

начало

конец

ввод N

S:=0;

i:=1, N

S:=S+i;

Вывод S

= 1 + 4 + 9 + … + n2)
Найти произведение 1 ∙ 2 ∙ 3 ∙ … ∙ n.
Найти сумму 1! + 2! + 3! +…+ n!
(n!= 1 ∙ 2 ∙ 3 ∙ … ∙ n)

М.: БИНОМ. Лаборатория знаний, 2010
http://www.uchportal.ru/load/283-1-0-51684
Рисунок из коллекции Microsoft Office.