Primeira página
/
Tecnologia
/
3/5 - Elabore um algoritmo que leia uma frase e conte quantas palavras aparecem no texto. Considere que as palavras são separada s apenas por espaços em branco. ALGORITMO VAR TEXTO:CARACT ERE I, QPAI AVRA S: INTEIRO SETE XTO<>"ENT Áo QPAL AVRAS K1 FIMSE PARA IDE 1 ATÉ CO MPR(TE XTO) FA CA s ENQUAN ITO CO PIA(T EXTO ,I,1)=""EK =COMP R(TEXTO) FACA FIMSE FIMPA RA ESCR EVA OP ALAVRA s FIMALG ORITM 10 ALGO RITM 10 VAR QPALAV RASE 1 FIMS E PARA I DE 1 ATÉ C OMPR (TEXT 'O) FA CA QPAL AVRAS KOPA LAVRA S+1 ESCR EVA QP ALAV RAS FIMALG ORITM o ALGOR ITMO VAR TEXT O: CAR ACTE RE I, QPALA VRAS: IN ITEIRO LEIAT EXTO SETE XTO<>"ENT QPALA VRAS k1 FIMSE PARA IDE 1 ATÉ CO MPRC TEXT 0) FAC A SECO PIA(TE XTO,I,1)="E NTÃO ENQUAN ITO CO PIA(T EXTO,I,1)="E k=C OMPR (TEXT (0) FACA QPALA VRAS FOPAI LAVRAS +1 FIMEN QUAN TO FIMSE FIMP ARA ESCR EVA QP ALAVRA s FIMALG ORITM 10 ALGOR ITMO VAR TEXT O: CAR ACTE RE I, QPA LAVRA S: INTE IRO LEIA T EXTO PARA I DE 1 ATE COM APR(TE XTO)FACA SE CO PIA(TE XTO,I,1)-"E NTÃO ENQUA NTO C OPIA(T EXTO ,I,1)=""EK =COM PR(TE XTO) F ACA ItIt 1 FIMEN QUAN TO SEK =COMP R (TEX (TO) EN ITÃO QPALA VRASE QPALA VRAS+1 FIMSE FIMSE FIMPAR A ESCR EVA OP ALAVRA s FIMALG ORITM io ALGOR ITMO VAR TEXTO : CARA CTER E I, QPAL AVRA S: INTE IRO LEIA T EXTO SETE XTO<>- ENT vo QPALA VRASE 1 FIMSE PARA I DE 1 AT TE COM IPRCTE XTO) FA CA SE COP LA(TEXTO ,I,1)m "EN TÃO ENQUA NTO CO PIA(TEX TO,I, 1 ) - "E I<=C OMPR (TEXT O) FA CA FIMEN QUAN ITO SEI<m COMPR (TEXT O) EN ITÃO QPALAVRAS +-OPALAVRASHI FIMSE FIMSE ARA ESCR EVA QP ALAVR AS FIMALG ORITM

Pergunta

3/5 - Elabore um algoritmo que leia uma frase e conte quantas palavras aparecem no texto. Considere que as
palavras são separada s apenas por espaços em branco.
ALGORITMO
VAR
TEXTO:CARACT ERE
I, QPAI AVRA S: INTEIRO
SETE XTO<>"ENT Áo
QPAL AVRAS K1
FIMSE
PARA IDE 1 ATÉ CO MPR(TE XTO) FA CA
s
ENQUAN ITO CO PIA(T EXTO ,I,1)=""EK =COMP R(TEXTO) FACA
FIMSE
FIMPA RA
ESCR EVA OP ALAVRA s
FIMALG ORITM 10
ALGO RITM 10
VAR
QPALAV RASE 1
FIMS E
PARA I DE 1 ATÉ C OMPR (TEXT 'O) FA CA
QPAL AVRAS KOPA LAVRA S+1
ESCR EVA QP ALAV RAS
FIMALG ORITM o
ALGOR ITMO
VAR
TEXT O: CAR ACTE RE
I, QPALA VRAS: IN ITEIRO
LEIAT EXTO
SETE XTO<>"ENT
QPALA VRAS k1
FIMSE
PARA IDE 1 ATÉ CO MPRC TEXT 0) FAC A
SECO PIA(TE XTO,I,1)="E NTÃO
ENQUAN ITO CO PIA(T EXTO,I,1)="E k=C OMPR (TEXT (0) FACA
QPALA VRAS FOPAI LAVRAS +1
FIMEN QUAN TO
FIMSE
FIMP ARA
ESCR EVA QP ALAVRA s
FIMALG ORITM 10
ALGOR ITMO
VAR
TEXT O: CAR ACTE RE
I, QPA LAVRA S: INTE IRO
LEIA T EXTO
PARA I DE 1 ATE COM APR(TE XTO)FACA
SE CO PIA(TE XTO,I,1)-"E NTÃO
ENQUA NTO C OPIA(T EXTO ,I,1)=""EK =COM PR(TE XTO) F ACA
ItIt 1
FIMEN QUAN TO
SEK =COMP R (TEX (TO) EN ITÃO
QPALA VRASE QPALA VRAS+1
FIMSE
FIMSE
FIMPAR A
ESCR EVA OP ALAVRA s
FIMALG ORITM io
ALGOR ITMO
VAR
TEXTO : CARA CTER E
I, QPAL AVRA S: INTE IRO
LEIA T EXTO
SETE XTO<>- ENT vo
QPALA VRASE 1
FIMSE
PARA I DE 1 AT TE COM IPRCTE XTO) FA CA
SE COP LA(TEXTO ,I,1)m "EN TÃO
ENQUA NTO CO PIA(TEX TO,I, 1 ) - "E I<=C OMPR (TEXT O) FA CA
FIMEN QUAN ITO
SEI<m COMPR (TEXT O) EN ITÃO
QPALAVRAS +-OPALAVRASHI
FIMSE
FIMSE
ARA
ESCR EVA QP ALAVR AS
FIMALG ORITM

3/5 - Elabore um algoritmo que leia uma frase e conte quantas palavras aparecem no texto. Considere que as palavras são separada s apenas por espaços em branco. ALGORITMO VAR TEXTO:CARACT ERE I, QPAI AVRA S: INTEIRO SETE XTO<>"ENT Áo QPAL AVRAS K1 FIMSE PARA IDE 1 ATÉ CO MPR(TE XTO) FA CA s ENQUAN ITO CO PIA(T EXTO ,I,1)=""EK =COMP R(TEXTO) FACA FIMSE FIMPA RA ESCR EVA OP ALAVRA s FIMALG ORITM 10 ALGO RITM 10 VAR QPALAV RASE 1 FIMS E PARA I DE 1 ATÉ C OMPR (TEXT 'O) FA CA QPAL AVRAS KOPA LAVRA S+1 ESCR EVA QP ALAV RAS FIMALG ORITM o ALGOR ITMO VAR TEXT O: CAR ACTE RE I, QPALA VRAS: IN ITEIRO LEIAT EXTO SETE XTO<>"ENT QPALA VRAS k1 FIMSE PARA IDE 1 ATÉ CO MPRC TEXT 0) FAC A SECO PIA(TE XTO,I,1)="E NTÃO ENQUAN ITO CO PIA(T EXTO,I,1)="E k=C OMPR (TEXT (0) FACA QPALA VRAS FOPAI LAVRAS +1 FIMEN QUAN TO FIMSE FIMP ARA ESCR EVA QP ALAVRA s FIMALG ORITM 10 ALGOR ITMO VAR TEXT O: CAR ACTE RE I, QPA LAVRA S: INTE IRO LEIA T EXTO PARA I DE 1 ATE COM APR(TE XTO)FACA SE CO PIA(TE XTO,I,1)-"E NTÃO ENQUA NTO C OPIA(T EXTO ,I,1)=""EK =COM PR(TE XTO) F ACA ItIt 1 FIMEN QUAN TO SEK =COMP R (TEX (TO) EN ITÃO QPALA VRASE QPALA VRAS+1 FIMSE FIMSE FIMPAR A ESCR EVA OP ALAVRA s FIMALG ORITM io ALGOR ITMO VAR TEXTO : CARA CTER E I, QPAL AVRA S: INTE IRO LEIA T EXTO SETE XTO<>- ENT vo QPALA VRASE 1 FIMSE PARA I DE 1 AT TE COM IPRCTE XTO) FA CA SE COP LA(TEXTO ,I,1)m "EN TÃO ENQUA NTO CO PIA(TEX TO,I, 1 ) - "E I<=C OMPR (TEXT O) FA CA FIMEN QUAN ITO SEI<m COMPR (TEXT O) EN ITÃO QPALAVRAS +-OPALAVRASHI FIMSE FIMSE ARA ESCR EVA QP ALAVR AS FIMALG ORITM

Solução

expert verifiedVerification of experts
4.2263 Voting
avatar
IsabelaVeterano · Tutor por 11 anos

Responder

qui está um algoritmo em português que leia uma frase e conte quantas palavras aparecem no texto, considerando que as palavras são separadas apenas por espaços em branco:<br /><br />ALGORITMO<br />VAR<br />TEXTO: CARACTERE<br />I, QPALAVRAS: INTEIRO<br />SETE XTO<>- ENT<br />QPALAVRAS <- 1<br />FIMSE<br />PARA I DE 1 ATÉ COMPR(TEXTO) FAÇA<br />SE COP(TEXTO, I, 1) = "ENT" ENQUANTO COP(TEXTO, I, 1) <> "" E K = COMPR(TEXTO) FAÇA<br />FIMSE<br />SE K = COMPR(TEXTO) ENTÃO<br />QPALAVRAS <- QPALAVRAS + 1<br />FIMSE<br />FIMPARA<br />ESCREVA QPALAVRAS<br />FIMALGORITMO
Clique para avaliar: