Помогите с паскалем, фото прикреплено. Очень прошу вас... Завтра уже нужно сдавать......

Question

Помогите с паскалем, фото прикреплено. Очень прошу вас... Завтра уже нужно сдавать... ПОМОГИТЕ...

---

Answer 1

Var  a: array [1..5] of integer := (1, 2, 3, 4, 5);
  i: integer;
begin
  for i := 5 downto 1 do
    writeln(i, ' ');
end.

Так:)

Comments

Массив из вещественных чисел)

---

Оу... Ну, смысл не меняется, заменить тип на real или double и радоваться...)