Рабочие листы
к вашим урокам
Скачать
1 слайд
Оператор цикла For
2 слайд
Циклы позволяют многократно выполнять одну или группу команд, причем в тексте программы нет необходимости записывать эти команды несколько раз.
В языке программирования PASCAL существует три вида циклов:
Арифметический (перечисляемый) цикл FOR
Логический цикл с предусловием WHILE
Логический цикл с послеусловием REPEAT
3 слайд
Особенностью арифметического цикла является то, что число повторений операторов цикла должно быть известно заранее. Решение о выполнении или невыполнении в очередной раз тела цикла принимается до начала его прохождения, поэтому может случиться так, что тело цикла не будет выполнено ни разу.
Арифметический цикл FOR
4 слайд
Порядок выполнения цикла FOR
5 слайд
Количество выполнений тела цикла определяется до первого выполнения тела цикла, поэтому, если в выражении n2 используются переменные, которые изменяются в теле цикла, это никак не повлияет на количество выполнений тела цикла. Например, в следующей последовательности операторов:
n := 10;
For i := 1 to n do
Begin
Write (i);
n := 100;
End;
тело цикла будет выполняться 10 раз, хотя уже после первого выполнения тела цикла конечное значение параметра цикла станет равным 100.
6 слайд
Цикл под номером 1 будет выполняться для счетчика, последовательно принимающего значения –10, –9, –8, –7, –6, –5, –4,то есть 7 раз.
Цикл под номером 2 не будет выполняться ни разу, так как начальное значение счетчика больше конечного.
Цикл под номером 3 будет выполняться 1 раз для счетчика, равного 3.
7 слайд
Правильно записаны фрагменты под номерами 1 и 4. Во фрагментах 2 и 3 в операторах тела цикла производится изменение значение счетчика цикла.
Значение счетчика цикла может использоваться в выражениях, входящих в операторы тела цикла, но изменение значения счетчика цикла этими операторами недопустимо.
8 слайд
В Турбо-Паскале имеются два способа для организации регулярного цикла: прямой и обратный.
Прямой пересчет идет от известного меньшего числа до известного большего, на каждом шаге прибавляется единица (например, от 20 до 25: 20, 21, 22, 23, 24, 25).
Обратный пересчет – от большего к меньшему. И на каждом шаге вычитается единица.
9 слайд
Вывести на экран значение y2 (y=1,2,…,10)
в возрастающем и убывающем порядке
Использование оператора цикла for.
10 слайд
начало
y:=1, 10
Kw:=sqr(y)
Y,kw
конец
y:=10, 1
Kw:=sqr(y)
Y,kw
Program KWADRAT;
Uses crt;
Var kw, y: integer;
Begin
Clrscr;
For y:=1 to 10 do
Begin
kw:= sqr(y);
Writeln (y:3,kw:5);
End;
Writeln;
For y:=10 downto 1 do
Begin
kw:=sqr(y);
Writeln (y:3,kw:5);
End;
Readln;
End.
11 слайд
Выбрать наименьшие значение из 20 чисел, вводимых с клавиатуры:
12 слайд
program min;
uses crt;
var i:integer;
x,y : real;
begin
clrscr;
writeln ('Enter first');
readln (x);
for i:=2 to 20 do
begin
write ('Enter next');
readln (y);
if y<x then x:= y
end;
writeln ('min=',x:6:2);
readln;
end.
конец
начало
Вывести X
Ввести первое число Х
Ввести второе число Y
Y<X
X:=Y
i:=2, 20
+
-
13 слайд
Вычисление
суммы и
количества чисел
14 слайд
Вычислить сумму
n чисел, вводимых
с клавиатуры.
program Summa;
uses crt;
var I, n :integer;
x, sum : real;
begin
clrscr;
writeln (‘Enter n’);
readln (n);
sum:=0;
for i:=1 to n do
begin
write (‘Enter x’);
readln (x);
sum:=sum+ x;
end;
writeln (‘sum=’, sum:6:2);
readln;
end.
15 слайд
Среди всех двузначных чисел найти те, сумма цифр которых равна n (0<n≤18) и количество этих чисел.
Program Chisla;
uses crt;
var n, i, k, p1, p2:integer;
begin
clrscr;
k:=0;
writeln (‘Vvesti n’);
readln (n);
for i:=10 to 99 do
begin
p1:=i div 10;
p2:= i mod 10;
if (p1+ p2) =n then
begin
writeln (i);
k:=k+1;
end;
end;
writeln (‘Koli4estvo 4isel ’, k);
readln;
end.
16 слайд
Итоги урока
Для чего используются команды цикла?
Как в цикле записать команду присваивания, чтобы она вычисляла сумму чисел? Количество?
Какое начальное значение должно быть у переменной, в которой накапливаем сумму чисел?
Можно ли изменять значение переменной цикла в теле цикла?
Можно ли изменять значение верхней границы цикла в теле цикла?
Какие трудности возникли у вас в ходе урока?
Что вы посоветуете своим одноклассникам для преодоления этих трудностей?
17 слайд
Задания для самостоятельного выполнения
Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во время работы программы.
Написать программу, которая находит сумму целых положительных чисел, которые больше 20, меньше 100, кратны 3 и заканчиваются на 2, 4 или 8.
Написать программу, которая выводит на экран таблицу стоимости порций мороженного.
18 слайд
Домашнее задание
Выучить конспект.
Глинський, Частина 1. §17.
ст. 126, № 1, 5.
Написать программу, которая находит все двузначные числа и их количество, которые делятся на n или содержат цифру n (0<n<10).
Рабочие листы
к вашим урокам
Скачать
6 665 151 материал в базе
Настоящий материал опубликован пользователем Васильев Роман Ильич. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
300 ч. — 1200 ч.
Курс профессиональной переподготовки
600 ч.
Курс профессиональной переподготовки
300 ч. — 1200 ч.
Мини-курс
6 ч.
Мини-курс
8 ч.
Мини-курс
4 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.