fork download 
  1. program ideone;
  2. Var
  3.   s : string;
  4.   i : Integer;
  5. begin
  6.   readln(s);
  7.   for i:= Length(s) downto 1 do Write( s[ i ] );
  8. end.
Success #stdin #stdout 0s 2004KB
comments (?)
stdin 
124567
stdout 
765421
https://ideone.com/NXQycE
language:
Pascal (gpc 20070904)
created:
10 years 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!