Презентация, доклад к уроку информатики Оператор цикла FOR

программы нет необходимости записывать эти команды несколько раз.

В языке программирования PASCAL существует три вида циклов:
Арифметический (перечисляемый) цикл FOR
Логический цикл с предусловием WHILE
Логический цикл с послеусловием REPEAT

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

Арифметический цикл FOR

если в выражении n2 используются переменные, которые изменяются в теле цикла, это никак не повлияет на количество выполнений тела цикла. Например, в следующей последовательности операторов:
n := 10;
For i := 1 to n do
Begin
Write (i);
n := 100;
End;
тело цикла будет выполняться 10 раз, хотя уже после первого выполнения тела цикла конечное значение параметра цикла станет равным 100.

–10, –9, –8, –7, –6, –5, –4,то есть 7 раз.
Цикл под номером 2 не будет выполняться ни разу, так как начальное значение счетчика больше конечного.
Цикл под номером 3 будет выполняться 1 раз для счетчика, равного 3.

и 3 в операторах тела цикла производится изменение значение счетчика цикла.

Значение счетчика цикла может использоваться в выражениях, входящих в операторы тела цикла, но изменение значения счетчика цикла этими операторами недопустимо.

обратный.
Прямой пересчет идет от известного меньшего числа до известного большего, на каждом шаге прибавляется единица (например, от 20 до 25: 20, 21, 22, 23, 24, 25).
Обратный пересчет – от большего к меньшему. И на каждом шаге вычитается единица.

оператора цикла for.

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.

readln (x);
for i:=2 to 20 do
begin
write ('Enter next');
readln (y);
if y end;
writeln ('min=',x:6:2);
readln;
end.

: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.

(0

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.

чтобы она вычисляла сумму чисел? Количество?
Какое начальное значение должно быть у переменной, в которой накапливаем сумму чисел?
Можно ли изменять значение переменной цикла в теле цикла?
Можно ли изменять значение верхней границы цикла в теле цикла?
Какие трудности возникли у вас в ходе урока?
Что вы посоветуете своим одноклассникам для преодоления этих трудностей?

клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во время работы программы.
Написать программу, которая находит сумму целых положительных чисел, которые больше 20, меньше 100, кратны 3 и заканчиваются на 2, 4 или 8.
Написать программу, которая выводит на экран таблицу стоимости порций мороженного.

5.
Написать программу, которая находит все двузначные числа и их количество, которые делятся на n или содержат цифру n (0