Pascal

Alejandro_N12

Lanero Reconocido
4 Jul 2006
205
Una pregunta alguno sabe algun comando para que cuando llegue a determinada parte del programa se cierre ?

Y tambien probe una cosa... lo que quiero hacer es que sea lo mismo poner HOLA Hola hola HOla
puse asi:
const
'H'='h';
'O'='o';
'L'='l';
'A'='a';


pero no anda... nose si alguno me puede decir de que manera lo puedo hacer
 

Lmsilva

Lanero Reconocido
Lanero VIP
26 Mar 2005
919
Hmmm... eso está bastante raro... lo mejor es que cuando el programa valide la entrada la convierta a mayúsculas o a minúsculas todas y luego compare. Ejemplo.

Código:
Program Tal;
Var
  I: Integer;
Begin
  Readln(TalCosa);
  For I := 1 To Length(TalCosa) do
    NuevaCosa[I] := UpCase(TalCosa[I]);
  WriteLn(NuevaCosa);   (* Debe imprimir la misma TalCosa pero en mayúsculas *)
End.

El problema es que a un valor como tal no se le puede asignar otro, pero a variables si. Todo esto depende también del compilador que esté usando. ¿Qué Pascal es?
 

cperc

Lanero Regular
15 Oct 2006
8
hola. alguien me podria guiar con este problema: tengo que escribir un programa en freepascal y estoy trancado en una parte del desarrollo y es esta: tengo que leer un texto de entrada, caracter por caracter, y contar cuantas veces se repite el mismo caracter de forma seguida es decir: ejemplo de entrada OOOp98999:
serian tres ceros, una p, un ocho, tres nueves. Si alguien me puede dar una mano mil gracias.