Question

Заполнить массив из десяти элементов значениями , вводимыми с клавиатуры и вывести эти элементы в строчку через пробел ( Паскаль)

Answer 1

const N=10;
var   mas: array [1..N] of integer;
  i: integer;
 begin 
write('Введите элементы массива: '); 
 for i:=1 to N do 
   read(mas[i]); 
write('Вывод элементов массива: '); 
 for i:=1 to N do
    write(mas[i],' ');
end.