Программирование на языке Паскаль. Циклы

№2 им. Г. Кайрбекова
Республика Казахстан, город Астана

числом шагов
цикл с неизвестным числом шагов (цикл с условием)
Задача. Вывести

1;

i2 := i * i;
i3 := i2 * i;
задать начальное

проверить, все ли сделали

вычисляем квадрат и куб

вывод результата

перейти к следующему i

:= i2 * i;
i := 1,8
блок "цикл"
тело цикла

8 do begin
i2 := i*i;
i3 :=

переменная цикла

начальное значение

конечное значение

целых чисел от 8 до 1 (в обратном порядке).
Особенность: переменная

for i:=8 1 do begin
i2 := i*i;
i3 := i2*i;
writeln(i:4, i2:4, i3:4);
end;

downto

do begin
{тело цикла}

Увеличение переменной на 1:

for <переменная> := <начальное значение> downto
<конечное значение> do begin
{тело цикла}
end;

Уменьшение переменной на 1:

переменной цикла всегда равен 1 (to) или -1 (downto)
если в

for i:=1 to 8 do
writeln('Привет');

(почему?)
при изменении начального и конечного значения внутри цикла количество шагов

n := 8;
for i:=1 to n do begin
writeln('Привет');
n := n + 1;
end;

нет зацикливания

значение переменной цикла, при котором нарушено условие:
for i:=1 to 8

for i:=8 downto 1 do
writeln('Привет');
writeln('i=', i);

i=9

i=0

a := a+1;
a = 4
a := 1;
for i:=3 to 1

a = 1

a := 1;
for i:=1 downto 3 do a := a+1;

a = 1

a := 1;
for i:=3 downto 1 do a := a+1;

a = 4

??? then begin
i2 :=

Как изменить шаг?

Задача. Вывести на экран квадраты и кубы нечётных целых чисел от 1 до 9.
Особенность: переменная цикла должна увеличиваться на 2.
Проблема: в Паскале шаг может быть 1 или -1.
Решение:

i mod 2 = 1

i2 := i*i;
i3 := i2*i;
writeln(i:4, i2:4, i3:4);

выполняется только для нечетных i

переменная k изменяется от 1 до 5. Начальное значение i

???
for k:=1 to 5 do begin
i2 := i*i;
i3 := i2*i;
writeln(i:4, i2:4, i3:4);
???
end;

i := i + 2;

i := 1;

переменная k изменяется от 1 до 5. Зная k, надо

i = 2k-1

for k:=1 to 5 do begin
???
i2 := i*i;
i3 := i2*i;
writeln(i:4, i2:4, i3:4);
end;

i := 2*k – 1;

чисел от a до b.
Пример:
Введите границы интервала:
4 6

№5-2006-М: Образование и Информатика.

2.Кашаев С.М., Шерстнева Л.В. Паскаль для школьников.