Question

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

Answer 1

Используется язык 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;