Menor número, maior número, soma e multiplicação
Publicado por Santiago Staviski (última atualização em 13/11/2009)
[ Hits: 11.733 ]
Homepage: http://allenkonstanz.blogspot.com
Download questaovalendoponto01.pas
O programa a seguir lê 10 números informados pelo usuário e em seguida informa como saída: o resultado da soma, resultado da multiplicação, o maior número e o menor número.
program questao01; var contador: integer; numero,soma,mult,maior,menor:real; BEGIN soma:=0; numero:=0; mult:=1; for contador:=1 to 10 do begin Write('Entre com o ',contador,'º numero: '); read(numero); soma:=soma+numero; mult:=numero*mult; mult:=mult; if contador=1 then begin maior:=numero; menor:=numero; end; if numero>maior then maior:=numero; if numero<menor then menor:=numero; end; writeln('As soma dos numeros eh: ',soma:0:2); writeln('As multiplicação dos numeros eh: ',mult:0:2); writeln('O maior numero eh: ',maior:0:2); writeln('O menor numero eh: ',menor:0:2); END.
Extenso em dll, com parâmetros adicionais
programa pra carregear duas matrizes e achar o maior
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)