VisualG População dos paisA maior ou igual que a população dos paisB!

[Lusgaa]

Supondo que a população de um país A seja da ordem de 80000 habitantes com
uma taxa anual de crescimento de 3% e que a população de B seja 200000
habitantes com uma taxa de crescimento de 1.5%. Faça um programa que calcule
e escreva o número de anos necessários para que a população do país A
ultrapasse ou iguale a população do país B, mantidas as taxas de crescimento. 

(Fiz esse, porém, não consegui fazer o próximo)

 

Altere o programa anterior permitindo ao usuário informar as populações e as taxas
de crescimento iniciais. Valide a entrada e permita repetir a operação.

 

(Como faço para essa operação se repetir? Pedir novos dados de paisA e paisB!)

 

Var

   paisA, paisB: real
   anos: inteiro


Inicio

   Escreval("O numero de habitantes no paisA: ")
   leia(paisA)
   Escreval("O numero de habitantes no paisB: ")
   leia(paisB)
   anos <- 0;

   Se( paisA > paisB)entao
      escreval("O paisA é maior que o paisB!")
   fimse

   enquanto (paisA <= paisB) faca
      anos <- anos + 1;
      paisA <- paisA * 0.03;
      paisB <- paisB * 0.015;

   fimenquanto
   Escreval("Em", anos, " anos o paisA será maior que paisB!")


Fimalgoritmo

 

[Matheus Dutra]

@Lusgaa Eu já fiz um exercício idêntico a esse só que no portugol, para repetir, eu usei o "enquanto", assim : enquanto ( resposta !=não). no caso o "resposta" tu tem que declarar como cadeia, no final do "enquanto" tu coloca um "escreval" perguntando se a pessoa quer repetir, se ela digitar "não", o programa acaba, ficaria mais ou menos assim :

Var

   paisA, paisB: real
   anos: inteiro
   RESPOSTA : CADEIA 
 

Inicio
   ENQUANTO( RESPOSTA != NÃO ) FACA

   Escreval("O numero de habitantes no paisA: ")
   leia(paisA)
   Escreval("O numero de habitantes no paisB: ")
   leia(paisB)
   anos <- 0;

   Se( paisA > paisB)entao
      escreval("O paisA é maior que o paisB!")
   fimse

   enquanto (paisA <= paisB) faca
      anos <- anos + 1;
      paisA <- paisA * 0.03;
      paisB <- paisB * 0.015;

   fimenquanto
   Escreval("Em", anos, " anos o paisA será maior que paisB!")
     
     ESCREVAL(" voce QUER REPETIR A OPERAÇÃO ? ")
     LEIA(RESPOSTA)
     
     FIMENQUANTO


Fimalgoritmo

 

eu nunca usei visualG, mas tentei me adaptar, espero que de para entender, as alterações em coloquei em maiúsculo 

pera, agora que vi que respondi errado, só um momento

você vai ter que fazer vários escreval ao invés de já colocar um valor na variável

tipo assim : 

 

escreval("Qual a quantidade de habitantes da cidade A ?")

leia(cidadeA)

escreval("Qual a quantidade de habitantes da cidade B ?")

leia(cidadeB)

escreval("Qual vai ser a taxa de crescimento da cidade A ?")

leia(taxaA)

escreval("Qual vai ser a taxa de crescimento da cidade B ?")

leia(taxaB)

 

@Lusgaa  ali voce já tinha dado as taxas prontas, que no caso é 0.03 e 0.015, agora tu tem que trocar elas por variáveis 

da uma olhada aqui como fica > https://github.com/matheusdutraa/Atividade-6-e/blob/main/Atividade 11

só que esse está em portugol, mas da de entender eu acho 

[Lusgaa]

@Matheus Dutra Entendi, vou testar aqui. Muito obrigado pela ajuda, tenha um bom final de semana!

[Lusgaa]

@Matheus DutraVi lá e entendi, mas surgiu uma dúvida... Porque você multiplicou por 3 e por 1.5? Não era pra ser pelos valores inseridos pelo usuário?

 

[Matheus Dutra]

@Lusgaa pois ééé, vi isso agora que tu disse, eu esqueci de substituir os valores por variáveis, mas que bom que tu entendeu