For i: =1 to n do begin write('c[',i,']='); readln (c[i]); end * фрагмент программы, предназчен для 1 вывода массива в столбец 2 вывода массива в строку 3 формирования массива случайными числами 4 ввода массива с клавиатуры for i: =1 to n do writeln('c[',i,']=',c[i]); end. * фрагмент программы, предназчен для 1 ввода массива с клавиатуры 2 вывода массива в столбец 3вывода массива в строку 4формирования массива случайными числами