Составьте программу для ввода с клавиатуры в массив 7 целых чисел и вывода этих чисел в обратном порядке.

Используется язык pascal

program pr;

var

mas:array[1 ... 7] of integer;

i:integer;

begin

writeln ('Вводим значения в массив') ;

for i:=1 to 7 do readln (mas[i]) ;

writeln ('Выводим значения из массива') ;

for i:=7 downto 1 do writeln (mas[i]) ;

readln;

end;