PascalABC.NET Составьте программу для ввода значений - вопрос №1020322166 от anna18181818 18.01.2022 06:45

Question

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

anna18181818 · 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.