"for i := a to/downto b do" используется, если известно, сколько раз точно будет выполнен цикл.
Да с: с: с: с: с: с: с: с: с: с:
Звуковые излучители такие как радио магнитофон
var
<span>i:integer;</span>
a:string;
<span>begin</span>
a='PRIVET'
<span>for i:=1 to 10 do</span>
<span>write(a, ' ');</span>
<span>end.</span>
===== PascalABC.NET =====
begin
var n := ReadInteger('Длина последовательности:');
ReadSeqInteger('Вводи:', n).SortedDescending.Println
end.