Помогите пожалуйста,задание по информатике
Написать программу,осуществляющую ввод значений массива с клавиатуры(10 элементов) и вывод их в строчку.

Программа:const n=10; var a:array[1..n] of integer;i:integer;beginwriteln('Введите массив:');for i:=1 to n do begin write('a[',i,'] = '); readln(a[i]); end;writeln;for i:=1 to n do write(a[i]:4);writeln;end.Пример:Введите массив:a[1] = 15a[2] = -8a[3] = 24a[4] = -31a[5] = 45a[6] = -61a[7] = 72a[8] = 19a[9] = 55a[10] = -28  15  -8  24 -31  45 -61  72  19  55 -28