Alex oliveira

programa
{
	inclua biblioteca Tipos--> u
	funcao inicio()
	{
		inteiro nun=0, cont=1,soma=0
		caracter resp
		cadeia teclado
		faca{
					
			enquanto(verdadeiro){
				escreva("=======================\n")
			     escreva( cont ," ° Valor \n")
			     escreva("========================\n")
			
				escreva("DIgite um numero entre 1- 10 : ")
			     leia(teclado) 
			     
				se (u.cadeia_e_inteiro(teclado, 10)){
					nun=u.cadeia_para_inteiro(teclado, 10)
					se (nun>=1 e nun<=10) {
						pare
					}senao {
						escreva ("<<ERRO!>> Digite um numero de 1 a 10 \n")
					}
				}senao {
					escreva("<<ERRO ! >> DIgite um número inteiro\n ")
				}
			 }
			cont++
			soma+= nun
			enquanto(verdadeiro){
			escreva("Deseja continuar : ")
			leia(teclado)
			se (u.cadeia_e_caracter(teclado)){
				resp=u.cadeia_para_caracter(teclado)
				se(resp=='S' ou resp=='s' ou resp=='N' ou resp=='n'){
					pare
				}
			  } senao {
			  	escreva(" <<ERRO>> Digite uma letra \n")
			  }
			}
			
		   
		} enquanto (resp=='s' ou resp=='S')
		escreva("\n\n=========================")
		escreva("\n Você digitou ", cont , " valores")
		escreva("\n A soma deles são :", soma)
		escreva("\n\n=========================")
	}
}