calculo de porcentagem em vetores
Publicado por NewLinuxer 12/12/2005
[ Hits: 11.774 ]
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.
Array de números aleatórios não-repetidos de um intervalo em Pascal
controle de notas de uma clase com vetor e registro
dizer se o aluno passou ou nao
Cálculadora de décimo terceiro
Nenhum comentário foi encontrado.
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
converter algoritmo C++ em C? (1)
Programa fora de escala na tela do pc (22)
Problemas com Driver NVIDIA (1)
Fedora KDE plasma 42 X Módulo de segurança BB (Warsaw-2) (1)









