Для написания циклического алгоритма на Паскале воспользуемся конструкцией цикла "for".
Пример циклического алгоритма, который выводит числа от 1 до 10:

program CycleAlgorithm;
var
i: Integer;
begin
for i := 1 to 10 do
begin
writeln(i);
end;
end.

Этот алгоритм будет выполняться 10 раз и выводить числа от 1 до 10 на экран.