Zdravim ucim sa programovat v Pascale toto vlakno som zalozil nato aby som sa tu mohol pytat ak niecomu nebudem chapat.
Chcel by mi tu niekto vysvetlit tento lahky program?
Kód:
Program Prevraceni1;
var delka, poradi: integer;
vstupni, vystupni: String;
begin
writeln('Zadej vstupní øetìzec (max. 255 znakù): ');
readln(vstupni);
delka := length(vstupni);
for poradi:=1 to delka do
begin
vystupni[poradi]:=vstupni[delka-poradi+1];
vystupni:=vystupni+vystupni[poradi];
end;
writeln();
writeln('Pøevrácený øetìzec: ', vystupni);
readln();
end.
Velmi nechapem tym podmienkam pod cyklom.
Dakujem
sa ucis pascal a uz na takypre teba zlozitejsi zdrojovy kod a este v cestine??! chod radsej na slovensku napr. trsek.com, alebo programovanie.kromsat.sk a tam mas vsetko vysvetlene od zakladov!
