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

Содержание

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

Слайд 1Программирование циклов
Операторы цикла

Программирование цикловОператоры цикла

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

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

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

Слайд 3ОПЕРАТОРЫ ЦИКЛА
Цикл с предусловием (цикл - пока)
While do ;
Цикл

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


ОПЕРАТОРЫ ЦИКЛАЦикл с предусловием (цикл - пока)While do ;Цикл с постусловием (цикл - до)Repeat until ;Цикл с

Слайд 4ЦИКЛ С ПРЕДУСЛОВИЕМ (ЦИКЛ - ПОКА)
While do ;





Пока условие –

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




условие

да

нет

тело цикла


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

Слайд 5ЦИКЛ С ПОСТУСЛОВИЕМ (ЦИКЛ - ДО)
Repeat until ;






Повторяется выполнение тела

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

тело цикла

условие

да

нет


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

Слайд 6ЦИКЛ С ПАРАМЕТРОМ (ЦИКЛ - ДЛЯ)
for i:=In to Ik do

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

тело цикла

i:=In, Ik


ЦИКЛ С ПАРАМЕТРОМ (ЦИКЛ - ДЛЯ)  for i:=In to Ik do ; for i:=In downto Ik

Слайд 7СКОЛЬКО РАЗ ВЫПОЛНИТСЯ ТЕЛО ЦИКЛА?
1) x:=5;
for i:=-1 to 5 do
x:=x+1;
Ответ:
7
2) s:=0;
for

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

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

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

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

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

Слайд 10СКОЛЬКО РАЗ БУДЕТ ПОВТОРЕН ЦИКЛ, ЧЕМУ БУДУТ РАВНЫ S, A, B?
a:=1;

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

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

Слайд 11ОПРЕДЕЛИТЕ ЗНАЧЕНИЕ ПЕРЕМЕННОЙ S ПОСЛЕ ВЫПОЛНЕНИЯ ПРОГРАММЫ:
Var a,S: integer;
Begin
S:=0;
For a:=5 downto

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

Слайд 12ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N
Program summa1;
Var N,i,S:

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

да

нет


ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa1;Var N,i,S: integer;BeginWrite('N='); readln(N);S:=0; i:=1;While i

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

да

нет


ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa2;Var N,i,S: integer;BeginWrite('N='); readln(N);S:=0; i:=1;RepeatS:=S+i; i:=i+1;Until i>N;Writeln('S=',

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




начало

конец

ввод N



S:=0;

i:=1, N

S:=S+i;

Вывод S



ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa3;Var N, i, S: integer;BeginWrite('N='); readln(N);S:=0;For i:=1

Слайд 15ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ
Найти сумму квадратов от 1 до N. (S

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

ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯНайти сумму квадратов от 1 до N.  (S = 1 + 4 +

Слайд 16
i:=In, Ik
тело цикла


тело цикла
Условие
нет
да

тело цикла

Условие
да
нет

i:=In, Ikтело циклатело циклаУсловиенетдатело циклаУсловиеданет

Слайд 17ИСПОЛЬЗОВАННАЯ ЛИТЕРАТУРА:
Семакин И.Г., Хеннер Е.К. Задачник-практикум в 2 т.: Том 1.

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

ИСПОЛЬЗОВАННАЯ ЛИТЕРАТУРА:Семакин И.Г., Хеннер Е.К. Задачник-практикум в 2 т.: Том 1. М.: БИНОМ. Лаборатория знаний, 2010http://www.uchportal.ru/load/283-1-0-51684Рисунок из

Что такое shareslide.ru?

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.


Для правообладателей

Яндекс.Метрика

Обратная связь

Email: Нажмите что бы посмотреть