Question

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

Answer 1

Ответ:

Объяснение:

var i : integer;

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

begin

for i := 1 to 7 do begin

   write(i, ' = '); readln(arr[i]);

end;

for i := 7 downto 1 do write(arr[i], ', ');

end.