Menor número, maior número, soma e multiplicação
Publicado por Santiago Staviski (última atualização em 13/11/2009)
[ Hits: 11.960 ]
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.
controle de notas de uma clase com vetor e registro
programa que te ajuda em matematica
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Como gerar um podcast a partir de um livro em PDF
Organizando seus PDF com o Zotero
Erro no realm join [Resolvido]
Um programa para baixar vídeos: Parabolic
Como Definir o Painel Principal em Múltiplos Monitores no Linux Mint
Sempre que vou baixar algum pacote acontece o erro dpkg (2)
BlueMail não abre no Kubuntu 25.04 (6)
Não consigo montar meu cartão SD (5)
aplicativos criados com webapp-manager não aparecem no menu do xfce (1)