Matheus Vidal Tenório

programa
{
	
	funcao inicio()
	{
		inteiro salario, cp = 0, totm = 0, totf = 0, salariototalhomem = 0, maiorsalariohomem = 0, maiorquemil = 0, qtdmaiorsalariof = 0
		cadeia nome, sx, nomeM = " ", nomeF = " "
 		caracter resp
		enquanto(verdadeiro){
			escreva("Nome: ")
			leia(nome)
			escreva("Sexo: [M/F]: ")
			leia(sx)
			escreva("Salário: R$")
			leia(salario)
			
			
			
			se(sx == "m" ou sx == "M"){
				totm++
				salariototalhomem+= salario
				se(totm == 1){
					nomeM = nome
					maiorsalariohomem = salario
				}senao{
					se(salario > maiorsalariohomem){
						maiorsalariohomem = salario
					}
				}
			}senao{
				se(sx == "f" ou sx == "F"){
					totf++
					se(totf == 1){
						nomeF = nome
						maiorquemil = salario
					}senao{
						se(salario > 1000){
							maiorquemil = salario
							qtdmaiorsalariof++
						}
					}
				}
			}
			cp++
			escreva("Quer continuar? [S/N]: ")
			leia(resp)
			se(resp=='n' ou resp == 'N'){
				escreva("\n====== RESULTADOS ======")
				pare 
			}
			
		}
		escreva("\nTotal de pessoas cadastradas: ",cp)
		escreva("\nTotal de Homens: ",totm)
		escreva("\nTotal de Mulheres: ",totf)
		escreva("\nMédia Salaria dos homens: R$",(salariototalhomem/totm))
		escreva("\nTotal de mulheres que ganham mais que Mil reais: ",qtdmaiorsalariof)
		escreva("\nMaior salário entre os homens: R$",maiorsalariohomem)
	}	
}

eu fiz, mas acredito q esteja certo, rodei apenas para homem, mas confio em mim, se tiver errado dps volto aq.

nÃO, SÓ POSTO PARA VER SE TEM ALGUM ERRO, AI FICO ESPERANDO FEEDBACK DE VOCES KK

programa
{
inclua biblioteca Matematica –> m
funcao inicio()
{
inteiro num
real c = 1.0, s = 0.0, vp, vi, cp, ci
cp = 0.0
ci = 0.0
vp = 0.0
vi = 0.0
enquanto(c<=5){
escreva(“Digite o “,c,”º valor:”)
leia(num)
se(num%2==0){
cp++
vp+=num
}
se(num%2!=0){
ci++
vi+=num
}
c++
}
escreva(“\nVocê digitou “,cp,” números pares. A média é “,m.arredondar(vp/cp, 2))
escreva(“\nVocê digitou “,ci,” números pares. A média é “,(vi/ci))
}
}`

programa
{ //EX028

funcao inicio()
{
inteiro vr, opc
escreva(“Digite o preço de um produto: R$”)
leia(vr)
escreva(” \n ESCOLHA UM PERÍODO “)
escreva(” \n ====================”)
escreva(” \n 1 Carnaval [+10%] “)
escreva(” \n 2 Férias Escolares [+20%] “)
escreva(” \n 3 Dias das Crianças [+5%] “)
escreva(” \n 4 Black Friday [-30%] “)
escreva(” \n 5 Natal [-5%] “)
escreva(” \n ====================”)
escreva(” \n Digite sua opção => “)
leia(opc)
escolha(opc){
caso 1:
escreva(“\n————————————————-“)
escreva(“\nNa época das CARNAVAL, O preço do produto vai para R$”+ (vr + (vr * 10/100)) )
pare
caso 2:
escreva(“\n————————————————-“)
escreva(“\nNa época das FÉRIAS ESCOLARES, o preço do produto vai para R$”+ (vr +(vr * 20/100)) )
pare
caso 3:
escreva(“\n————————————————-“)
escreva(“\nNa época das DIAS DAS CRIANÇÃS, o preço do produto vai para R$”+ (vr +(vr * 5/100)) )
pare
caso 4:
escreva(“\n————————————————-“)
escreva(“\nNa época das BLACK FRIDAY, o preço do produto vai para R$”+ (vr -(vr * 30/100)) )
pare
caso 5:
escreva(“\n————————————————-“)
escreva(“\nNa época das NATAL, o preço do produto vai para R$”+ (vr -(vr * 5/100)) )
pare
caso contrario:
escreva(“\n————————————————-“)
escreva(“\nConsulte o mercado novamente para atualização dos preços e descontos.”)
}
}
}`

programa
{ //EXERCÍCIO 025 – TRÊS VALORES EM ORDEM

funcao inicio()
{
inteiro n1, n2, n3
escreva(“Digite um número: “)
leia(n1)
escreva(“Digite outro número: “)
leia(n2)
escreva(“Digite outro número: “)
leia(n3)
se (n1 > n2 e n1 > n3 e n2 > n3){

escreva(“MAIOR: “+ n1 +”\nINTERMEDIÁRIO: “+ n2 +”\nMENOR: “+ n3)

} senao se(n1 > n2 e n1 > n3 e n3 > n2){

escreva(“MAIOR: “+ n1 +”\nINTERMEDIÁRIO: “+ n3 +”\nMENOR: “+ n2)

} senao se(n2 > n1 e n2 > n3 e n3 > n1){

escreva(“MAIOR: “+ n2 +”\nINTERMEDIÁRIO: “+ n3 +”\nMENOR: “+ n1)

} senao se(n2 > n1 e n2 > n3 e n1 > n3){

escreva(“MAIOR: “+ n2 +”\nINTERMEDIÁRIO: “+ n1 +”\nMENOR: “+ n3)

} senao se(n3 > n2 e n3 > n1 e n1 > n2){

escreva(“MAIOR: “+ n3 +”\nINTERMEDIÁRIO: “+ n1 +”\nMENOR: “+ n2)

} senao se(n3 > n2 e n3 > n1 e n2 > n1){

escreva(“MAIOR: “+ n3 +”\nINTERMEDIÁRIO: “+ n2 +”\nMENOR: “+ n1)

} senao se(n1==n2 e n1>n3){

escreva(“O “+ n1 +” e o “+ n2 +” são iguais, porém o “+ n3 +” é menor que os dois”)

} senao se(n1==n3 e n1>n2){

escreva(“O “+ n1 +” e o “+ n3 +” são iguais, porém o “+ n2 +” é menor que os dois”)

} senao se(n2==n1 e n2>n3){

escreva(“O “+ n2 +” e o “+ n1 +” são iguais, porém o “+ n3 +” é menor que os dois”)

} senao se(n2==n3 e n2>n1){

escreva(“O “+ n2 +” e o “+ n3 +” são iguais, porém o “+ n1 +” é menor que os dois”)

} senao se(n3==n1 e n3>n1){

escreva(“O “+ n3 +” e o “+ n1 +” são iguais, porém o “+ n1 +” é menor que os dois”)

} senao se(n3==n2 e n3>n2){

escreva(“O “+ n3 +” e o “+ n2 +” são iguais, porém o “+ n2 +” é menor que os dois”)

} senao{
escreva(“TODOS OS VALORES SÃO IGUAIS”)
}
}
}`

REALMENTE, TINHA FEITO N TESTES ANTES DE MANDAR, E QUERIA REALMENTE DAR AQUELE INSIGHT PARA DIZER “AHHHHHHHHHHHHHH”, ESPEROQ EU MEU CÉREBRO DÊ O ESTALO. EU SENTIA QUE ESTAVA ESTRANHO, INCORRETA.

NÃO SEI SE A LÓGICA ESTÁ CERTA. POIS CHEGOU UMA PARTE(SÃO 3 DA MANHÃ AQUI), QUE EU N SABIA COMO ERA MAIS. POIS HAVIA OUTRA VARIAVEL PARA O SEGUNDO SENAO, Q SERIA O ATRASO E (EU TENHO COLCOADO PAS), MAS TIREI E DIEXEI O REST, E FUI TESTANDO, AI DEU CERTO, MAS TO QUASE ENTENDNEDO, MAS QUERO ENTENDER BEMMMM.
programa
{
//EXERCÍCIO 023 – SERVIÇO MILITAR 2.0

inclua biblioteca Calendario –> cd
funcao inicio()
{
inteiro id, rest
escreva(“Em que ano você nasceu ? “)
leia(id)
escreva(“——————————–\n”)
id = cd.ano_atual()-id
rest = id – 18

se(id == 18){
escreva(“Você completará 18 anos este ano. Procure se alistar”)
} senao se(id < 18){
escreva(“\nVocê ainda não completou 18 anos. Vai acontecer em “+ (cd.ano_atual()+rest) +”\nAinda falta “+rest+” ano(s)”)
} senao se(id > 18){
escreva(“\nVocê já deveria ter se alistado em “+ (cd.ano_atual()-rest) +”\nVocê está com um atraso de “+ rest +” anos(s)”)
}

}
}
`

programa
{
//EXERCÍCIO 019 – INVERSO OU OPOSTO

inclua biblioteca Matematica
inclua biblioteca Tipos
funcao inicio()
{
real n,nv
escreva(“===================”)
escreva(” Digite um numero: “)
escreva(“===================”)
escreva(” \nCAMPO DE DIGITO : “)
leia(n)
se (n > 0){
nv = 1/n
escreva(“\nO inverso de “+ n +” é igual a “+ nv)
} senao {
nv = Matematica.valor_absoluto(n)
escreva(“\nO oposto de “+ n +” é “+ nv)
}

}
}
`

programa
{

//EXERCÍCIO 014 – CONSUMIDOR GANHA 10% DE DESCONTO SE PASSAR DE 500 TERÁ O DESCONTO.
funcao inicio()
{
real pg, nv

escreva(“Qual foi o valor total das suas compras? R$”)
leia(pg)
nv = pg-(pg*10/100)
escreva(“———————————————“)
se ( pg > 500 ){
escreva(“\nVocê comprou R$”+ pg +” na nossa loja. Obrigado!”)
escreva(“\n ===== ATENÇÃO =====”)
escreva(“\nPor fazer mais de R$500 em compras, você vai receber R$”+ (pg*10/100) +(” de desconto “))
escreva(“\nO valor a ser pago é de R$”+ nv+”! Volte Sempre! “)
}
se (pg <= 500){
escreva(“\nVocê comprou R$”+ pg +” na nossa loja. Obrigado! “)
}

}
}
`

FOI UM DIA, QUASE DOIS PARA FINALIZAR. TAVA QUASE NA LÓGICA, SABIA QUE TINHA COMO CONSIDERAR O ESPAÇO UM TEXTO, SÓ QUE ESTAVA ME TRAVANDO. NÃO CONSEGUIA LIGAR AS COISAS, VI O MODO DE FAZER E ENTENDI, MAS TAMBÉM FIZ OUTRO MÉTODO KKKKK.

programa
{

inclua biblioteca Texto –> t
funcao inicio()
{
cadeia nome
inteiro ind
escreva(“Digite seu nome completo: “)
leia(nome)

ind = t.posicao_texto(” “, nome, 0)

escreva(“Seu primeiro nome é “+ t.extrair_subtexto(nome, 0, ind))
}
}

programa
{
	
inclua biblioteca Texto --> t
	funcao inicio()
	{
		cadeia nome, sobrenome
		escreva("Digite seu nome completo: ")
		leia(nome, sobrenome)
		
		escreva("Seu primeiro nome é "+ nome)
	}
}

O meu ficou assim, eu fiquei testando várias variáveis, até que quando fui multiplicar 1 hora = 60 min por 24hrs(no dia), apareceu ficou igual a resposta do guanabara, mas ainda não entendi a lógica, porque antes eu tava tentando tirar 50 min dia do cara, já que ele fuma 5 por dia.

programa
{
//Exercicio 010 – não fume.
inclua biblioteca Matematica –> m
funcao inicio()
{
inteiro ano, qtd_cig
real pd, final
escreva(“Cada cigarro reduz 10 minutos de vida\n”)
escreva(“————————————–\n”)
escreva(“Há quantos anos você fuma? “)
leia(ano)
escreva(“Quantos cigarros você fuma por dia? “)
leia(qtd_cig)
pd = ((60.0*24.0)/10.0)
final = (ano*365*qtd_cig)/pd
escreva(“————————————–“)
escreva(“\nAo todo, até agora você já fumou “+ (ano*365*qtd_cig) + ” Cigarros!\nEstima-se que você já perdeu ” + m.arredondar(final, 2) + ” dias de vida!\n”)`

exercicio 08 mod01
fiz assim, fiquei brincando depois.
mas essa parte de arrendondamento fica meia chata mesmo, até pegar, mas vai dar certo.

programa
{

inclua biblioteca Matematica –> m
inclua biblioteca Util –> j
funcao inicio()
{

real prod, r
escreva(“Qual é o preço do produto? “)
leia(prod)
r = prod-(prod*5/100)
escreva(“\n\n————— RESULTADO —————“)
escreva(“\n\nValor sendo gerado…\n”)
Util.aguarde(2000)
escreva(“\nCom 5% de desconto, o produto sai por R$”+ m.arredondar(r, 2)+”\n\n”)
Util.aguarde(2000)
escreva(” Finalizando processo…\n\n”)
Util.aguarde(2000)
escreva(” \n——————————————-\n”)
escreva(” Fim”)
escreva(” \n——————————————-\n”)

}
}
`

programa
{

//exercicio 06
inclua biblioteca Matematica –> m
funcao inicio()
{
real medida
escreva(“Distância em metros: “)
leia(medida)

escreva(“\n——— CONVERTENDO ———\n”)
escreva(m.arredondar(medida/1000, 2)+ ” Km\n”)
escreva(m.arredondar(medida/100, 10)+ ” Hm\n”)
escreva(m.arredondar(medida/10, 2)+ ” Dam\n”)
escreva(m.arredondar(medida*10, 2)+ ” dm\n”)
escreva(m.arredondar(medida*100, 8)+ ” cm\n”)
escreva(m.arredondar(medida*1000, 2)+ ” mm\n”)
`

DEPOIS ENTENDI, DEPOIS DA EXPLICAÇÃO DO IRMÃO AÍ, POIS EU ESTAVA COLOCANDO ASSIM “M.ARREDONDAR(MEDIDA, 4)/1000”, DEPOIS EU ENTENDI QUE O “nUMERO” CARACTERIZA O CALCULO DO METROS CONVERTIDO. TENTEI DE TODO JEITO, NO FINAL ERA SO AJUSTE COLCOANDO DESSA FORMA Q ESTÁ AÍ.

programa
{

//exercicio 03
funcao inicio()
{
inteiro n, ante, suce
escreva(“Me diga um número: “)
leia(n)
suce = n + 1
ante = n – 1
escreva(“\nO antecessor de “+ n +” é o valor “+ ante + “\n”)
escreva(“O Sucessor de “+ n +” é o valor “+ suce)
`

Fiz dessa forma, possível acho que está certo. Não sabia que dava para fazer dessa forma compacta.

Olá galera, boa noite. eu fiz de algumas maneiras.

1º
cadeia nome
		escreva("Olá!, Qual é o seu nome? ")
		leia(nome)
		escreva("Tudo bem, "+ nome + "?\nÉ um grande prazer te conhecer")

2º:
COM \N
cadeia nome
		escreva("Olá!, Qual é o seu nome? ")
		leia(nome)
		escreva("Tudo bem, "+ nome +"?"+" É um grande prazer te conhecer")
3º:
SEM \N
cadeia nome
		escreva("Olá!, Qual é o seu nome? ")
		leia(nome)
		escreva("Tudo bem, "+ nome +"? É um grande prazer te conhecer")