voltear caracteres
Publicado por Cesar (3 intervenciones) el 04/04/2016 01:58:22
Quiero hacer un programa en pascal que me voltee los caracteres string y me los muestre, pero da error. qe estoy haciendo mal?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
program inicio;
uses crt;
var
texto,volteado:string;
i:integer;BEGIN
writeln ('Escribe texto a voltear');
readln (texto);
writeln;
volteado:='';
i:=length (texto);
while (i>0) do
begin
volteado:= volteado+texto[i];
i:=i+1;
end;
writeln ('El texto volteado es ',volteado);
readkey;
END.Valora esta pregunta
1
