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

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

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.