|
vecej jak 450 programoch ľem tak zadarmo
|
![]() English |
![]() Slovensky |
![]() Česky |
![]() Šarišsky |
|
Kategorija: Zadaňa zos Pascalu Zrobil: Pheo web: pascalsource.ic.cz Program: Obrat_text.pas Subor exe: Obrat_text.exe Slovo zapísané odzadu.
Kuklo še: 741x
{ OBRAT_TEXT.PAS Copyright (c) Pheo } { Slovo zapísané odzadu. } { } { Datum:15.03.2005 http://www.trsek.com } program obrat_text; var v:string; n,i:integer; begin writeln('Program obrati text zapisany odzadu.'); writeln('zadaj text'); read(v); n:=length(v); for i:=n downto 1 do write(v[i]); writeln; readln; end. [Naj beži] [Ulož] [Ciskaj] [Naj idze meilom] |
|