fork download
copy 
  1. Program BilanganTerbalik;
  2. Var
  3.  N , i: integer;
  4.  A : array[1..1000]of integer;
  5. begin
  6.   readln(N);
  7.  
  8.   for i := 1 to N do
  9.   read(A[i]);
  10.  
  11.   for i := N downto 1 do
  12.   write(A[i],' ');
  13.  
  14.  writeln;
  15. end.
Success #stdin #stdout 0s 5308KB
comments (?)
stdin
copy 
6
1 2 3 4 5 6
stdout
copy 
6 5 4 3 2 1
https://ideone.com/56aNI6
language:
Pascal (fpc 3.0.4)
created:
14 hours ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!