-
Notifications
You must be signed in to change notification settings - Fork 0
/
068.por
65 lines (59 loc) · 1.34 KB
/
068.por
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
programa
{
//exercício 068
funcao inicio()
{
caracter sexo
real peso
inteiro mulher = 0
real homem_peso = 0
real tot_p = 0
real pesado = 0, leve = 0
real media
para (inteiro c = 1; c <= 8; c++){
escreva ("------",c,"º------")
escreva ("\nSexo: [M ou F] ")
leia(sexo)
escreva ("Peso [Kg]: ")
leia(peso)
limpa()
se (sexo=='f'){
mulher++
tot_p += peso
}
se (sexo=='m'){
se (peso > 100){
homem_peso++
}
}
se (c==1){
pesado = peso
leve = peso
}senao{
se (peso > pesado){
pesado = peso
}senao{
se (peso < leve){
leve = peso
}
}
}
}
media = tot_p/mulher
escreva ("\nA) Quantas mulheres foram cadastradas? Resp.: ", mulher)
escreva ("\nB) Quantos homens pesam mais de 100kg? Resp.: ", homem_peso)
escreva ("\nC) A média de peso entre as mulheres? Resp.: ", media)
escreva ("\nD) O maior peso entre os homens? Resp.: ", pesado)
}
}
/* $$$ Portugol Studio $$$
*
* Esta seção do arquivo guarda informações do Portugol Studio.
* Você pode apagá-la se estiver utilizando outro editor.
*
* @POSICAO-CURSOR = 656;
* @PONTOS-DE-PARADA = ;
* @SIMBOLOS-INSPECIONADOS = ;
* @FILTRO-ARVORE-TIPOS-DE-DADO = inteiro, real, logico, cadeia, caracter, vazio;
* @FILTRO-ARVORE-TIPOS-DE-SIMBOLO = variavel, vetor, matriz, funcao;
*/