fork download 
  1. program ideone;
  2. var
  3.   x : string;
  4.   i : integer;
  5. begin
  6.   readln(x);
  7.   for i:=Length(x) downto 1 do Write(x[i]);
  8. end.
Success #stdin #stdout 0s 288KB
comments (?)
stdin 
1033
stdout 
3301
https://ideone.com/SoLiqv
language:
Pascal (fpc 3.0.4)
created:
9 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!