Algoritmos

[C_CWB 0]

Olá

Preciso criar um algoritmo em portugol e não consigo fazê-lo de jeito nenhum...na verdade entrei em um cursinho "express"de algoritmos para conhecer a base de linguagens de programação e estou, literalmente, me lascando!

 

Bem, aí vai o problema:

 

"escreva um algoritmo que leia uma vogal e mostre na tela a subsqüente. (utilize a estrutura "escolha/caso")".

 

Se alguém tiver exercícios com resolução desse tipo ( escolha/caso, se então se, enqto/faça, etc) e puder me mandar eu agradeço, pois com o exercício resolvido pelo menos eu consigo entender um pouco melhor.

 

Valeu http://forum.imasters.com.br/public/style_emoticons/default/natal_noel.gif

[Kandrade 7]

Aqui no fórum tem vários exercícios com essa estrutura, procure pelos que comecam por [resolvido]

 

http://forum.imasters.com.br/index.php?showtopic=257457

http://forum.imasters.com.br/index.php?showtopic=257688

[C_CWB 0]

Olá,

 

Obrigado por me responder. Eu já havia tentado resolver estes exercícios (o do dia da semana) e não deu muito certo. Se não for pedir muito você pode me dizer o que fiz de errado?

 

Eis o algoritmo:

_____________________________________________________________________________

var

 

OP:inteiro

 

 

inicio

 

ESCREVAL("DIGITE UM NÚMERO")

LEIA(OP)

 

CASO 1:

ESCREVAL("Hoje é domingo 1!")

CASO 2:

ESCREVAL("Hoje é segunda 2!")

CASO 3:

ESCREVAL("Hoje é terça 3!")

CASO 4:

ESCREVAL("Hoje é quarta 4!")

CASO 5:

ESCREVAL("Hoje é quinta 5!")

CASO 6:

ESCREVAL("Hoje é sexta 6!")

CASO 7:

ESCREVAL("Hoje é sabado 7!")

 

OUTROCASO:

ESCREVAL("Você nao digitou um numero entre 1 e 7!")

FIMESCOLHA

 

________________________________________________________________________________

 

 

Na tela, ele se apresente desta forma:

 

 

 

DIGITE UM NÚMERO

2

Hoje é domingo 1!

Hoje é segunda 2!

Hoje é terça 3!

Hoje é quarta 4!

Hoje é quinta 5!

Hoje é sexta 6!

Hoje é sabado 7!

Você nao digitou um numero entre 1 e 7!

 

*** Fim da execução.

*** Feche esta janela para retornar ao Visualg.

 

---------------------------------------------------------------------------------------------------------------

 

 

Obrigado....tenha um bom dia http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

[Gustavo Rodrigues Torre 0]

Bem

O erro foi que você nao colocou o escolha op

e no CASO 1 ate CASO 7 voce colocou assim: caso 1:

E isto nao pode acontecer

 

Espero ter ajudado

 

Abracos

 

 

algoritmo "semnome"

// Função :

// Autor :

// Data : 20/11/2007

// Seção de Declarações

var

 

OP:inteiro

inicio

ESCREVAL("DIGITE UM NÚMERO")

LEIA(OP)

 

escolha op

CASO 1

ESCREVAL("Hoje é domingo 1!")

CASO 2

ESCREVAL("Hoje é segunda 2!")

CASO 3

ESCREVAL("Hoje é terça 3!")

CASO 4

ESCREVAL("Hoje é quarta 4!")

CASO 5

ESCREVAL("Hoje é quinta 5!")

CASO 6

ESCREVAL("Hoje é sexta 6!")

CASO 7

ESCREVAL("Hoje é sabado 7!")

OUTROCASO

ESCREVAL("Você nao digitou um numero entre 1 e 7!")

FIMESCOLHA

 

fimalgoritmo

 

Olá,

 

Obrigado por me responder. Eu já havia tentado resolver estes exercícios (o do dia da semana) e não deu muito certo. Se não for pedir muito você pode me dizer o que fiz de errado?

 

Eis o algoritmo:

_____________________________________________________________________________

var

 

OP:inteiro

 

 

inicio

 

ESCREVAL("DIGITE UM NÚMERO")

LEIA(OP)

 

CASO 1:

ESCREVAL("Hoje é domingo 1!")

CASO 2:

ESCREVAL("Hoje é segunda 2!")

CASO 3:

ESCREVAL("Hoje é terça 3!")

CASO 4:

ESCREVAL("Hoje é quarta 4!")

CASO 5:

ESCREVAL("Hoje é quinta 5!")

CASO 6:

ESCREVAL("Hoje é sexta 6!")

CASO 7:

ESCREVAL("Hoje é sabado 7!")

 

OUTROCASO:

ESCREVAL("Você nao digitou um numero entre 1 e 7!")

FIMESCOLHA

 

________________________________________________________________________________

 

 

Na tela, ele se apresente desta forma:

 

 

 

DIGITE UM NÚMERO

2

Hoje é domingo 1!

Hoje é segunda 2!

Hoje é terça 3!

Hoje é quarta 4!

Hoje é quinta 5!

Hoje é sexta 6!

Hoje é sabado 7!

Você nao digitou um numero entre 1 e 7!

 

*** Fim da execução.

*** Feche esta janela para retornar ao Visualg.

 

---------------------------------------------------------------------------------------------------------------

 

 

Obrigado....tenha um bom dia http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

[Kandrade 7]

Isso mesmo, deve ter esquecido o escolha.

Teste e de um retorno pra gente.

 

http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

 

 

Bem

O erro foi que você nao colocou o escolha op

e no CASO 1 ate CASO 7 voce colocou assim: caso 1:

E isto nao pode acontecer

[C_CWB 0]

Olá

 

Consegui! Deu certo o algoritmo dos dias de semana (havia esquecido do escolha e tirei os 2 : após o caso).

________________________________________________________________________________

__

var

 

OP:INTEIRO

 

inicio

 

ESCREVAL("DIGITE UM NÚMERO")

LEIA(OP)

 

ESCOLHA(OP)

 

CASO 1

ESCREVAL("Hoje é domingo 1!")

CASO 2

ESCREVAL("Hoje é segunda-feira 2!")

CASO 3

ESCREVAL("Hoje é terça-feira 3!")

CASO 4

ESCREVAL("Hoje é quarta-feira 4!")

CASO 5

ESCREVAL("Hoje é quinta-feira 5!")

CASO 6

ESCREVAL("Hoje é sexta-feira 6!")

CASO 7

ESCREVAL("Hoje é sabado 7!")

 

OUTROCASO

ESCREVAL("Você nao digitou um numero entre 1 e 7!")

 

FIMESCOLHA

________________________________________________________________________________

 

 

 

Por conseguinte, resolvi o primeiro problemas das vogais:

 

________________________________________________________________________________

 

 

var

 

OP:CARACTER

 

 

inicio

 

ESCREVAL("DIGITE UMA VOGAL")

LEIA(OP)

 

ESCOLHA (OP)

 

 

CASO "A"

ESCREVAL("A PRÓXIMA VOGAL É: E ")

CASO "E"

ESCREVAL("A PRÓXIMA VOGAL É: I ")

CASO "I"

ESCREVAL("A PRÓXIMA VOGAL É: O ")

CASO "O"

ESCREVAL("A PROXIMA VOGAL É: U ")

 

 

OUTROCASO

ESCREVAL(" OPÇÃO INVÁLIDA!")

FIMESCOLHA

 

fimalgoritmo

___________________________________________________________________________

 

Mas percebi que no caso do dia da semana, não digitei CASO "1" e sim CASO 1. Já, no outro problema as vogais ficaram entre " ". Por que isto ocorre? Sem as aspas ele não executa de forma alguma.

 

CASO 1
ESCREVAL("Hoje é domingo 1!")
CASO 2
ESCREVAL("Hoje é segunda-feira 2!")

 

CASO "A"
ESCREVAL("A PRÓXIMA VOGAL É: E ")
CASO "E"
ESCREVAL("A PRÓXIMA VOGAL É: I ")

Pessoal, muito obrigado pela atenção, e principalmente pela paciência! É um privilégio poder aprender com vocês!

 

http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

[Gustavo Rodrigues Torre 0]

O caso "A"

Você precisa colocar aspas por se tratar de letra(caractere)

Você só deve colocar aspas em se tratando de caracter nos demais casos não precisa

Espero ter ajudado

 

Olá

 

Consegui! Deu certo o algoritmo dos dias de semana (havia esquecido do escolha e tirei os 2 : após o caso).

________________________________________________________________________________

__

var

 

OP:INTEIRO

 

inicio

 

ESCREVAL("DIGITE UM NÚMERO")

LEIA(OP)

 

ESCOLHA(OP)

 

CASO 1

ESCREVAL("Hoje é domingo 1!")

CASO 2

ESCREVAL("Hoje é segunda-feira 2!")

CASO 3

ESCREVAL("Hoje é terça-feira 3!")

CASO 4

ESCREVAL("Hoje é quarta-feira 4!")

CASO 5

ESCREVAL("Hoje é quinta-feira 5!")

CASO 6

ESCREVAL("Hoje é sexta-feira 6!")

CASO 7

ESCREVAL("Hoje é sabado 7!")

 

OUTROCASO

ESCREVAL("Você nao digitou um numero entre 1 e 7!")

 

FIMESCOLHA

________________________________________________________________________________

 

 

 

Por conseguinte, resolvi o primeiro problemas das vogais:

 

________________________________________________________________________________

 

 

var

 

OP:CARACTER

 

 

inicio

 

ESCREVAL("DIGITE UMA VOGAL")

LEIA(OP)

 

ESCOLHA (OP)

 

 

CASO "A"

ESCREVAL("A PRÓXIMA VOGAL É: E ")

CASO "E"

ESCREVAL("A PRÓXIMA VOGAL É: I ")

CASO "I"

ESCREVAL("A PRÓXIMA VOGAL É: O ")

CASO "O"

ESCREVAL("A PROXIMA VOGAL É: U ")

 

 

OUTROCASO

ESCREVAL(" OPÇÃO INVÁLIDA!")

FIMESCOLHA

 

fimalgoritmo

___________________________________________________________________________

 

Mas percebi que no caso do dia da semana, não digitei CASO "1" e sim CASO 1. Já, no outro problema as vogais ficaram entre " ". Por que isto ocorre? Sem as aspas ele não executa de forma alguma.

 

CASO 1
ESCREVAL("Hoje é domingo 1!")
CASO 2
ESCREVAL("Hoje é segunda-feira 2!")

 

CASO "A"
ESCREVAL("A PRÓXIMA VOGAL É: E ")
CASO "E"
ESCREVAL("A PRÓXIMA VOGAL É: I ")

Pessoal, muito obrigado pela atenção, e principalmente pela paciência! É um privilégio poder aprender com vocês!

 

http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif