Сделать одномерный массив, состоящий из целыхчисел. Элементы массива вводятся с клавиатуры

\\Пример программки на языке Паскаль.

var
    i : integer;                                   // объявляем переменную целочисленного типа.
    arr : array [1..10] of integer;        // объявляем массив размерностью 10 частей.
Begin
    writeln (Содержимое массива:);   // вывод строчки на экран.
    for i:= 1 to 10 do                          // начало цикла.
      begin
          read(arr[i]);                         // считываем элемент массива, введенный с клавиатуры.
          write(arr[i], );                    //вывод элемента массива на экран.
      end;
End.