//pascal
var
arr : array[1..10] of integer;
i : integer;
begin
for i := 1 to 10 do
readln(arr[i]);
for i := 10 downto 1 do
write(arr[i], ' ');
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
//pascal
var
arr : array[1..10] of integer;
i : integer;
begin
for i := 1 to 10 do
readln(arr[i]);
for i := 10 downto 1 do
write(arr[i], ' ');
end.