Média e soma de números
Publicado por Santiago Staviski (última atualização em 27/10/2009)
[ Hits: 7.296 ]
Homepage: http://allenkonstanz.blogspot.com
Programa pede uma quantidade ilimitada de números e como saída dá a soma e a média dos números.
program repeat_questao04; var numeros,soma,contador,x: integer; media:real; BEGIN write('Digite a quantidade de numeros que deseja informar: '); read(x); soma:=0; numeros:=0; contador:=x; repeat write('Digite um numero: '); read(numeros); soma:=soma+numeros; contador:=contador-1; until contador=0; writeln('As soma dos numeros eh: ',soma); media:=soma/x; writeln('As media dos numeros eh: ',media:0:2); END.
Calculadora Empresarial Lazarus
Calculadora de décimo terceiro no Lazarus
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Um modo leve de ouvir/ver áudio/vídeo da internet em máquinas pererecas
Resolver algumas mensagens de erro do SSH
Instalar módulo de segurança do Banco do Brasil Warsaw do tipo .run
Aprendendo mais sobre Linux com livro (5)
Procrastinação e autossabotagem são problemas muito comuns na sociedad... (6)