Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Pascal/Turbo Pascal » realizar un programa sabiendo que este es una secuencia que tiene una oración

Pascal/Turbo Pascal - realizar un programa sabiendo que este es una secuencia que tiene una oración

Volver
Nuevo Tema
<<>>
 
Vista:

realizar un programa sabiendo que este es una secuencia que tiene una oración

Publicado por paul (1 intervención) el 13/05/2007 18:26:19
FreE pascAL´ `DE ` ` pROgrAmaS` `EjecutAdas%%%%´ `eN` `el TRAbaJO` NUmeCuatro`...`ttulos%%%%%%` `` GGGGGGGjegegGFheljhgsghhsjsjsjsjk(HOlas....yyyyyyyyyyyyyyy*....ttttttttttttt....llalalalaalalALLOPklkllpKKKJHHHGJJYGTAHh:****hHHo Hh:****hHHo
Como puedo realizar un programa sabiendo que este es una secuencia que tiene una oración y esta separados por mas de unos blancos y me objetibo es saber cantidad caracteres leidos y cantidad de palabras mayusculas leidas,hasta ler un * y teniendo un modulo función , que repite la lectura de caracteres hasta leer un blanco.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

realizar un programa sabiendo que este es una secuencia que tiene una oración

Publicado por damian castelli lluch (31 intervenciones) el 14/05/2007 05:42:05
hola, tenes que declarar conjuntos...de este modo

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
type
 
conj=set of char; //un ejemplo con chars
 
var
  cant:integer;  //variable para sumar la cantidad de caracteres en mayuscula
  c:conj;  //variable tipo conjunto donde estan definidas las letras
  x:char;  //variable para leer un char
 
begin
 
  cant:=0;
  c:=['A'..'Z'];
  read(x):
 
  if(x in c)then
    cant:=cant+1;
.....
esto es basicamente lo que debes usar, despues tu programa se basa en tener un par de bucles nada mas, un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar