English
English
Slovensky
Slovensky
Česky
Česky
Šarišsky
Šarišsky
Kategórie: Programy v Pascalu (KMP)

Autor: Unknown - please send me mail
Program: Reverse.pas
Soubor exe: Reverse.exe
User enters a phrase and program outputs the same phrase in reverse.
Zobrazené: 789x


{ REVERSE.PAS                                                       }
{ User enters a phrase and program outputs the same phrase in reverse}
{                                                                   }
{ Author: Unknown                                                   }
{ Datum: 20.01.2009                            http://www.trsek.com }
 
program output_reverse_string;
 
uses crt;
 
var
 s : string;
 i : integer;
 
begin
 clrscr;
 writeln ('PLease enter your name so it can be outputed in reverse order');
 readln (s);
 writeln;
 for i := 1 to length(s) do
 begin
 end;
 writeln;
 for i := length(s) downto 1 do
 begin
  write(s[i]);
 end;
 readkey
end.
 
 

[Spustit] [Uložit] [Tlačit] [Poslat e-mailom]