Question

составьте программу для ввода значений 10 элементов массива с клавиатуры и вывода их на экран в обратном порядке ​

Answer 1

//pascal

var

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

i : integer;

begin

for i := 1 to 10 do

   readln(arr[i]);

for i := 10 downto 1 do

   write(arr[i], ' ');

end.