Question

помогите пожалуйста написать программу .срочно
​

Answer 1

Дан массив из 10 целых чисел. Написать программу вывода этих чисел наоборот. Язык паскаль

Программа:

Pascal:

var

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

 i: integer;

begin

 for i := 1 to 10 do arr[i] := random(100);  // заполняем массив рандомными числами

 writeln('Начальный массив: ', arr);  // вывод начального массива

   

 for i := 10 downto 1 do write(arr[i], ' ');  // вывод массива "задом наперёд"

end.