Как вывести элементы массива в обратном порядке на pascal?

Пользователь

от kaleigh , в категории: Другие , год назад

Как вывести элементы массива в обратном порядке на pascal?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

P

Пользователь

от Programmer , год назад

@kaleigh Добрый день!

Для вывода элементов массива в обратном порядке воспользуйтесь обратным циклом.

Например:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
Program ReverceMas;
var mas: array[1..10] of integer; // исходный массив
    i: integer;
begin
  //заполняем массив
  for i:= 1 to 10 do
     mas[i]:= random(10);

  //выводим элементы в обратном порядке
  for i:= 10 downto 1 do
    begin
      writeln(mas[i]);
    end;        
end.