Презентация на тему Программирование циклов

Содержание

Слайд 2

ВОПРОСЫ ДЛЯ ПОВТОРЕНИЯ

Какая геометрическая фигура обозначает в блок-схеме действие?
Прямоугольник
Какая геометрическая фигура обозначает

ВОПРОСЫ ДЛЯ ПОВТОРЕНИЯ Какая геометрическая фигура обозначает в блок-схеме действие? Прямоугольник Какая
в блок-схеме условие?
Ромб
Какой оператор описывает в программе ввод данных?
Read, readln
Какой оператор описывает в программе вывод данных?
Write, writeln

Слайд 3

ОПЕРАТОРЫ ЦИКЛА

Цикл с предусловием (цикл - пока)
While <условие> do <тело цикла>;
Цикл с

ОПЕРАТОРЫ ЦИКЛА Цикл с предусловием (цикл - пока) While do ; Цикл
постусловием (цикл - до)
Repeat <тело цикла> until <условие>;
Цикл с параметром (цикл - для)
for i:=In to Ik do <тело цикла>;
for i:=In downto Ik do <тело цикла>;

Слайд 4

ЦИКЛ С ПРЕДУСЛОВИЕМ (ЦИКЛ - ПОКА)

While <условие> do <тело цикла>;
Пока условие – истинно,

ЦИКЛ С ПРЕДУСЛОВИЕМ (ЦИКЛ - ПОКА) While do ; Пока условие –
выполняется тело цикла. Тело цикла может быть простым или составным оператором.

условие

да

нет

тело цикла

Слайд 5

ЦИКЛ С ПОСТУСЛОВИЕМ (ЦИКЛ - ДО)

Repeat <тело цикла> until <условие>;
Повторяется выполнение тела цикла

ЦИКЛ С ПОСТУСЛОВИЕМ (ЦИКЛ - ДО) Repeat until ; Повторяется выполнение тела
до истинности условия. Тело цикла с постусловием выполняется хотя бы один раз.

тело цикла

условие

да

нет

Слайд 6

ЦИКЛ С ПАРАМЕТРОМ (ЦИКЛ - ДЛЯ)

for i:=In to Ik do <тело цикла>;

ЦИКЛ С ПАРАМЕТРОМ (ЦИКЛ - ДЛЯ) for i:=In to Ik do ;
for i:=In downto Ik do <тело цикла>;
i – параметр цикла – простая переменная порядкового типа;
In – выражение того же типа, определяющее начальное значение параметра;
Ik – выражение того же типа, определяющее конечное значение параметра;
Цикл повторяется, пока значение параметра лежит в интервале между In и Ik.

тело цикла

i:=In, Ik

Слайд 7

СКОЛЬКО РАЗ ВЫПОЛНИТСЯ ТЕЛО ЦИКЛА?

1) x:=5;
for i:=-1 to 5 do
x:=x+1;
Ответ:
7
2) s:=0;
for i:=4

СКОЛЬКО РАЗ ВЫПОЛНИТСЯ ТЕЛО ЦИКЛА? 1) x:=5; for i:=-1 to 5 do
to 1 do
s:=s+1;
Ответ:
ни разу

Слайд 8

КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА:

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

КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА: x:=3; while x x:=x+3; x:=x+1; Ответ: 13

Слайд 9

КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА:

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

КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА: x:=3; while x

Слайд 10

СКОЛЬКО РАЗ БУДЕТ ПОВТОРЕН ЦИКЛ, ЧЕМУ БУДУТ РАВНЫ S, A, B?

a:=1; b:=1;
While

СКОЛЬКО РАЗ БУДЕТ ПОВТОРЕН ЦИКЛ, ЧЕМУ БУДУТ РАВНЫ S, A, B? a:=1;
a+b < 8 do
begin
a:=a+1;
b:=b+2;
end;
S:=a+b;
Ответ:
2 раза
S=8, a=3, b=5

Слайд 11

ОПРЕДЕЛИТЕ ЗНАЧЕНИЕ ПЕРЕМЕННОЙ S ПОСЛЕ ВЫПОЛНЕНИЯ ПРОГРАММЫ:

Var a,S: integer;
Begin
S:=0;
For a:=5 downto 1

ОПРЕДЕЛИТЕ ЗНАЧЕНИЕ ПЕРЕМЕННОЙ S ПОСЛЕ ВЫПОЛНЕНИЯ ПРОГРАММЫ: Var a,S: integer; Begin S:=0;
do
S:=s+2*a;
Writeln('S=', S);
End.
Ответ:
S=30

Слайд 12

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N

Program summa1;
Var N,i,S: integer;
Begin
Write('N=');

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa1; Var
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

да

нет

Слайд 13

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N

Program summa2;
Var N,i,S: integer;
Begin
Write('N=');

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa2; Var
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

да

нет

Слайд 14

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N

Program summa3;
Var N, i,

ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa3; Var
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

Слайд 15

КОМПЬЮТЕРНЫЙ ТЕСТ

Мультимедийный тест по информатике "Язык программирования Pascal. Циклы"

КОМПЬЮТЕРНЫЙ ТЕСТ Мультимедийный тест по информатике "Язык программирования Pascal. Циклы"

Слайд 16

ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ

Найти сумму квадратов от 1 до N. (S =

ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ Найти сумму квадратов от 1 до N. (S
1 + 4 + 9 + … + n2)
Найти произведение 1 ∙ 2 ∙ 3 ∙ … ∙ n.
Найти сумму 1! + 2! + 3! +…+ n!
(n!= 1 ∙ 2 ∙ 3 ∙ … ∙ n)