PascalABC.NET Составьте программу для ввода значений - вопрос №2032176610 от Stall124 28.02.2023 15:57

Question

Информатика: PascalABC.NET Составьте программу для ввода значений 10 элементов массива с клавиатуры и вывода их на экран в обратном порядке.

Stall124 · Answer

var

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

i: integer;

begin

for i := 1 to 10 do Read(a[i]);

Writeln('Введённые числа в обратном порядке:');

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

end.