programa pra somar e tirar média
Publicado por NewLinuxer 14/12/2005
[ Hits: 7.905 ]
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 mdia 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 mdia ------------------------->',(soma/contador):3:3); readkey; end.
programa pra carregear duas matrizes e achar o maior
escreve os números de 1 a 9 com repeat - until
cadastro de multiplos clientes com registro
Nenhum comentário foi encontrado.
Atenção a quem posta conteúdo de dicas, scripts e tal (2)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
ASRock H310CM-HG4 vs Linux [RESOLVIDO] (18)
Microfone do meu headset não é recinhecido. Meu notebook é um Acer Asp... (12)