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

var mas:array[1..10] of integer; i:integer;beginwriteln('Введите элементы массива');for i:=1 to 10 do readln(mas[i]);for i:=1 to 10 dowriteln(mas[i]);readln;end.