calculo de porcentagem em vetores
Publicado por NewLinuxer 12/12/2005
[ Hits: 11.664 ]
este programma calcula a porcentagem de pessoas, de acordo com a idade que são menores de 18 anos, as idades estão armazenadas em um array de 12 posições
Program exercicio07; uses crt; Type Vetor = array[1..12] of integer; Var idade : array[1..12] of integer; Contador, soma : integer; Begin clrscr; Soma:=0; For contador := 1 To 12 do Begin Write('Digite a ',contador:2,'§ idade: '); Readln (idade[contador]); if idade[contador] < 18 then Soma:= soma+1; end; writeln((soma*100) div 12, '% das pessoas sÆo menores de idade'); Writeln; Readkey; End.
mais um modelo de programa com vetor
Calculadora Empresarial feita no Lazarus (Delphi 7 para Linux)
validando um triângulo e classificando-o como equilátero, isoceles ou escaleno.
Nenhum comentário foi encontrado.
Como gerar um podcast a partir de um livro em PDF
Automatizando digitação de códigos 2FA no browser
Resolver problemas de Internet
Como compartilhar a tela do Ubuntu com uma Smart TV (LG, Samsung, etc.)
Como Instalar o Microsoft Teams no Linux Ubuntu
Músicas de Andrew Hulshult no DOOM (WAD)
Instalar o Apache, MySQL e PHP no Oracle Linux 8
Bloqueando telemetria no Deepin 23.1
Como converter imagens PNG/JPEG para SVG em linha de comando