Помогите.... Для массива С[8], элементы которого случайные целые числа [5; 53] вывести...

Question

Помогите.... Для массива С[8], элементы которого случайные целые числа [5; 53] вывести все элементы в обратном порядке.

Comments

for i := 8 downto 1 do Write(a[i],' ')

---

а program, var, end?

---

а лучший ответ будет?

---

Задачи полностью нет, поэтому и лучшего ответа нет

---

Так я и спрашиваю, будет лучший ответ, если будет решение?

Answer 1

program ArrayPrintBack;

var

 a: array[1..8] of integer;

 i: integer;

begin

 Randomize;

 for i := 1 to 8 do

 begin

   a[i] := 5 + Random(49);

   Write(a[i]:3)

 end;

 

 Writeln;

 

 for i := 8 downto 1 do

   Write(a[i]:3)

end.

Comments

Спасибо)