programa pra somar e tirar média
Publicado por NewLinuxer 14/12/2005
[ Hits: 8.075 ]
Programa que pede números inteiros ao usuário, mostrando sua soma a cada numero digitado e a média no final da execução
Program exemplo; {Programa que pede n£meros inteiros ao usu rio, mostrando sua soma a cada numero digitado e a m‚dia no final da execu‡Æo} uses crt; Var soma,contador,entrada:integer; Begin clrscr; Writeln('Informe n£meros inteiros ou <0> para sair'); soma:=0; entrada:=1; contador:=0; While (entrada<>0) do Begin writeln; write('Digite o n£mero-------------------->'); read(entrada); soma:=soma+entrada; if entrada<>0 then Begin contador:=contador+1; Writeln('A soma dos n£meros informados ‚ --->',soma); end; end; writeln; if contador <> 0 then writeln('A m‚dia ‚ ------------------------->',(soma/contador):3:3); readkey; end.
Crivo de Eratóstenes Simples em Ada 95
Calculadora Empresarial (Baseada nas fórmulas de Logística)Lazarus
Existência de triângulo, em Pascal
Nenhum comentário foi encontrado.
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado
Preciso atualizar o Vim [RESOLVIDO] (8)
QUERO REVIVER UM COMPUTADOR ANTIGO, MAS TIVE PROBLEMAS COM OS LINUX QU... (9)