Публикую справочную информацию для тех, кто что-то пропустил.
Операторы цикла используются для реализации многократного выполнения одной или нескольких команд. Различают 3 типа циклов:
Цикл с параметром
Примеры:
1. Программа выводит на экран числа от 1 до 7 (в столбик)
Program prog1;
var i:integer;
begin
for i:=1 to 7 do writeln(i);
end.
2. Программа выводит на экран числа от 7 до 1
Program prog2;
var i:integer;
begin
for i:=7 downto 1 do writeln(i);
end.
3. Программа вычисляет S=1+2+…+N, где N - введенное целое число
Program sum1;
var i,n,s:integer;
begin
write('n=');
readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('s=',s);
end.
Операторы цикла используются для реализации многократного выполнения одной или нескольких команд. Различают 3 типа циклов:
- цикл с параметром;
- цикл с предусловием;
- цикл с постусловием.
Цикл с параметром
Цикл с параметром используется тогда, когда заранее известно количество повторений и шаг постоянен. Этот тип цикла реализуется в языке Pascal оператором For, который имеет 2 варианта записи:
1) For параметр цикла:=начальное значение to конечное значение do тело цикла
2) For параметр цикла:=начальное значение downto конечное значение do тело цикла
Параметр цикла – переменная целого типа;
начальное и конечное значения – выражения того же типа;
тело цикла – простой или составной оператор.
- Цикл повторяется, пока значение параметра лежит в интервале между начальным и конечным значениями
- При каждом повторении цикла значение параметра автоматически изменяется: в первом варианте увеличивается, а во втором уменьшается на 1.
- Значение параметра цикла можно использовать, но нельзя изменять внутри цикла.
Примеры:
1. Программа выводит на экран числа от 1 до 7 (в столбик)
Program prog1;
var i:integer;
begin
for i:=1 to 7 do writeln(i);
end.
2. Программа выводит на экран числа от 7 до 1
Program prog2;
var i:integer;
begin
for i:=7 downto 1 do writeln(i);
end.
3. Программа вычисляет S=1+2+…+N, где N - введенное целое число
Program sum1;
var i,n,s:integer;
begin
write('n=');
readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('s=',s);
end.
А вот еще несколько примеров программ. Для сдающих ОГЭ рекомендую обязательно внимательно изучить решение последней задачи. Для закрепления можно самостоятельно решить задачи с последнего слайда
