Что используется для печати массива в окне результатов в Паскале?
Writeln('a[',i,'] = ', a[i]);
Readln (a[i]);
For i := 1 to 10 do