tenho o algoritmo abaixo:

Programa Cont_car_string
var
   string: conjunto [1..00] de caractere
   i,cont:inteiro
inicio
   escreva "Digite uma Frase:"
   leia string
   escreva "Frase digitada:", string
   cont=0
   para i de 1 até string[i]  <> "" passo 1 faça
    {  se (string[i] = "c") então}  A{[19/06/2005]}
         cont=cont+1
     {fim_se}  A{[19/06/2005]}
   fim_para
   escreva"Número de caracteres c =", cont
fim

mas como faço para contar quantas palavras tem na string? tem algum 
exemplo em algum site?
obrigado




-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a