Цикл с параметром for в паскале

Цикл FOR задаёт определённое условие по которому программа будет работать до его выполнения, допустим нужно нам 5 (или n) раз зациклить программу, то это легко сделать с помощью данного цикла. У цикла FOR есть характерная черта - счетчик который обычно обозначается буквой i или j.

Внешний вид цикла с параметром в паскале:

for i:= 1 to n do // присваиваем i сначала одному, потом двум, трем, ..., n

После 1-го прохода переменной i присваиваем 1, после второго присваиваем 2 и так до тех пор, пока не дойдем до n. to - это до .. в порядке возрастания, также есть downto - до .. в порядке убывания.

Блок - схема цикла с параметром:

"для значений переменной d от 25 до 35 выполнять:"

Что будет являться телом цикла?

В нашем случае для каждого значения доллара мы должны выполнить 2 команды: перевести текущее количество доллара в рубли; вывести на экран полученное значение. Таким образом, в теле цикла у нас будет более одной команды, поэтому необходимо заключить их в операторные скобки.

Тело цикла будет иметь вид:

Begin

r:=d*k;

writeln(d, '$=', r, 'руб');

end;

Итак, наш цикл выглядит так:

for d:=15 to 20 do

Begin

r:=d*k;

writeln(d, '$=', r, 'руб'); end;

пример:

Измените и дополните ее так, чтобы она вычисляла следующую сумму:

1! + 2! + 3! + ... + n!.

Разберем другие, на мой взгляд, более интересные примеры с использованием циклов for ... to ... do ..., а также вложенных друг в друга циклов (циклов в циклах), совмещение циклов с параметром с другими циклами.
Пример 2. Квадрат любого натурального числа n равен сумме n первых нечетных чисел:
12 = 1
22 = 1 + 3
32 = 1 + 3 + 5
42 = 1 + 3 + 5 + 7
52 = 1 + 3 + 5 + 7 + 9
. . . . . . . . . . . . . . . . . . .

Основываясь на этом свойстве, составить программу, позволяющую напечатать квадраты натуральных чисел от 1 до n.