portugol

[netus 0]

pessoal xou novo por aki, e estou pcisando mesmo de help:

no portugol qndo declaramos uma variavel como caracter, ela ñ só aceita letras + tbem nrs.

alguem me pode ajudar ,em como fazer para que ele aceite so caracteres alfabeticos.

(que comandos devo utilizar)? :wacko:

[quitZAUMMM 18]

como é caracter soh aceita um unico caracter pq você ainda naum deve estar trabalhando com vetores!

eu faria assim:

faça
	escreva("Digite um caracter);
	leia (caracter);
enquanto(caracter='1' ou caracter='2' ... ou caracter='9');

em Ling C até dava pra restringir pq tem funções da ctype.h, agora em portugol nunca me deparei com um problema assim!

 

[]'s

[netus 0]

ola pessoal.

deixa ser + especifico:

eis uma parte do algoritmo que fiz, a variavel produto e supermercado sao do tipo caracter + sendo q produto de supermercado

so é dado em caracteres alfabeticos eu não tó consiguindo fazer que esta variavel só aceite letras. a ideia é q qndo alguem digitaç um

valor numerico qualquer deve dar msg d erro, do tipo " digite corretamente o nome do produto".

podem me ajudarrrrrrrrrrrrrrrr.

 

var
	 pr1, pr2 :real // Declaração da variavel preço
	 smdo1, smdo2 :literal // Declaração da variavel supermercado
	 pdto :literal // declaração da variavel produto
inicio
// Seção de Comandos
	 escreval("Insira o nome do produto") // mensagem orientadora
	 
	 leia(pdto) // lê e armazena o nome do produto colectado
	 
	 escreval("insira o nome do 1ºsupermercado") // mensagem orientadora
	 
	 leia(smdo1)// lê o nome do supermercado informado e armazena
	 
	 escreval("insira o preço do ",pdto) // mensagem orientadora
	 
	 leia(pr1) // lê o preço do produto e armazena
	 
	 escreval("insira o nome do 2ºsupermercado")// mensagem orientadora
	
	 leia(smdo2)// Lê o nome do supermercado e o armazena :!:

[quitZAUMMM 18]

o unico jeito em portugol q eu imagino isso foi da maneira q te passei, você varre o vetor de caracteres atras de um numero c ele existir pede pra digitar outra palavra, faça isso usando um loop!

 

[]'s

[Raphael_Suporte 0]

ola pessoal.

deixa ser + especifico:

eis uma parte do algoritmo que fiz, a variavel produto e supermercado sao do tipo caracter + sendo q produto de supermercado

so é dado em caracteres alfabeticos eu não tó consiguindo fazer que esta variavel só aceite letras. a ideia é q qndo alguem digitaç um

valor numerico qualquer deve dar msg d erro, do tipo " digite corretamente o nome do produto".

podem me ajudarrrrrrrrrrrrrrrr.

var
	 pr1, pr2 :real // Declaração da variavel preço
	 smdo1, smdo2 :literal // Declaração da variavel supermercado
	 pdto :literal // declaração da variavel produto
	  i = 1
inicio
// Seção de Comandos
   i = 1
   enquanto  i = 1 faça
	  escreval("Insira o nome do produto") // mensagem orientadora
	  leia(pdto) // lê e armazena o nome do produto colectado
	  se ((pdto) <= 0 e >= 9) então
		  i = 1
	  senão
		  i = 0
	 repita
	 escreval("insira o nome do 1ºsupermercado") // mensagem orientadora
	 
	 leia(smdo1)// lê o nome do supermercado informado e armazena
	 
	 escreval("insira o preço do ",pdto) // mensagem orientadora
	 
	 leia(pr1) // lê o preço do produto e armazena
	 
	 escreval("insira o nome do 2ºsupermercado")// mensagem orientadora
	
	 leia(smdo2)// Lê o nome do supermercado e o armazena :!:

Lembrando que você não está usando string ou seja, como nosso amigo avisou em cima só entrará um caracter