Нужен пример циклического алгоритма

Question

Нужен пример циклического алгоритма

Answer 1

//Pascal ABC.NET v3.1 сборка 1172

Var
 i:integer;
begin
 for i:=1 to 10 do
 writeln('*');
end.