Составьте программу, которая 7 раз выведет на экран фразу «алгоритмы с повторением.» в одну строку через пробел (оператор for).

var name:
string;i:byte;
begin
readln(name);
for i:=1 to 6 do
write(name,' ');
readln;
end.