Trabalho algoritmo

Disponível somente no TrabalhosFeitos
  • Páginas : 5 (1096 palavras )
  • Download(s) : 0
  • Publicado : 4 de abril de 2013
Ler documento completo
Amostra do texto
Faça um algoritmo usando CASO e SE – Exercícios 26 e 27.

26 – Faça um algoritmo que leia seu peso na terra e o numero de um planeta e imprima o seu peso neste planeta.
1 – Mercúrio 0,37
2 – Vênus 0,88
3 – Marte 0,38
4 – Júpiter 2,64
5 – Saturno 1,15
------------------SE-------------------------------------------------------------------------------------------------------------
DeclarePes, Plan, Pes1 Real{
Digite (“Entre com o seu peso”);
Leia Pes;
Digite (“Entre com o Planeta: 1-Mercúrio, 2-Vênus, 3-Marte, 4-Júpiter, 5-Saturno”);
Leia Plan;{
Se (Plan==1)
Pes1=((Pes/10) x 0,37));
Senao se (Plan==2)
Pes1=((Pes/10)x 0,88));
Senao se (Plan==3)
Pes1=((Pes/10) x 0,38));
Senao se (Plan==4)
Pes1=((Pes/10) x 2,64));
Senao se (Plan==5)
Pes1=((Pes/10) x 1,15));
SenaoImprima (“Este Planeta não existe”);}
Imprima (“O seu peso no Planeta será ´,Pes1);}

Ou

Declare Pes, Plan, Pes1 Real{
Digite (“Entre com o seu peso”);
Leia Pes;
Digite (“Entre com o Planeta: 1-Mercúrio, 2-Vênus, 3-Marte, 4-Júpiter, 5-Saturno”);
Leia Plan;{
Se (Plan==1)
Pes1=((Pes/10) x 0,37));
Imprima (“O seu peso no Planeta Mercurio será ´,Pes1);}
Senao se (Plan==2)Pes1=((Pes/10)x 0,88));
Imprima (“O seu peso no Planeta Venus será ´,Pes1);}
Senao se (Plan==3)
Pes1=((Pes/10) x 0,38));
Imprima (“O seu peso no Planeta Marte será ´,Pes1);}
Senao se (Plan==4)
Pes1=((Pes/10) x 2,64));
Imprima (“O seu peso no Planeta Jupiter será ´,Pes1);}
Senao se (Plan==5)
Pes1=((Pes/10) x 1,15));
Imprima (“O seu peso no Planeta Saturno será ´,Pes1);}Senao
Imprima (“Este Planeta não existe”);}}



------------------CASO---------------------------------------------------------------------------------------------------------
Declare Pes, Plan, Pes1 Real{
Digite (“Escolha um Planeta para descobrir seu peso nele”);
Digite (“1 - Mercúrio);
Digite (“2 - Venus);
Digite (“3 - Marte);
Digite (“4 - Jupiter);
Digite (“5 - Saturno);
LeiaPlan;
Digite (“Entre com o seu peso”);
Leia Pes;
Escolha (Plan);{
Caso1:
Pes1=((Pes/10) x 0,37));
Pare;
Caso2:
Pes1=((Pes/10)x 0,88));
Pare;
Caso3:
Pes1=((Pes/10) x 0,38));
Pare;
Caso4:
Pes1=((Pes/10) x 2,64));
Pare;
Caso5:
Pes1=((Pes/10) x 1,15));
Pare;
Senao
Imprima (“Este Planeta não existe”);}
Imprima (“O seu peso no planeta é ´,Pes1);}

OU

Declare Pes, Plan,Pes1 Real{
Digite (“Escolha um Planeta para descobrir seu peso nele”);
Digite (“1 - Mercúrio);
Digite (“2 - Venus);
Digite (“3 - Marte);
Digite (“4 - Jupiter);
Digite (“5 - Saturno);
Leia Plan;
Digite (“Entre com o seu peso”);
Leia Pes;
Escolha (Plan);{
Caso1:
Pes1=((Pes/10) x 0,37));
Imprima (“O seu peso no Planeta Mercurio será ´,Pes1);}
Pare;
Caso2:
Pes1=((Pes/10)x 0,88));Imprima (“O seu peso no Planeta Venus será ´,Pes1);}
Pare;
Caso3:
Pes1=((Pes/10) x 0,38));
Imprima (“O seu peso no Planeta Marte será ´,Pes1);}

Pare;
Caso4:
Pes1=((Pes/10) x 2,64));
Imprima (“O seu peso no Planeta Jupter será ´,Pes1);}
Pare;
Caso5:
Pes1=((Pes/10) x 1,15));
Imprima (“O seu peso no Planeta Saturno será ´,Pes1);}
Pare;
Senao
Imprima (“Este Planetanão existe”);}}

27 – Faça algoritmo que leia um número e mostre o mês referente a este número.
--------------------SE-----------------------------------------------------------------------------------------------------------Declare Mes Real{
Digite (“Entre com um número”);
Leia Mes;{
Se ((Mes12)
Imprima (“Mês invalido”);
Senao se (Mes==1)
Imprima (“Janeiro”);
Senao se (Mes==2)
Imprima(“Fevereiro”);
Senao se (Mes==3)
Imprima (“Março”);
Senao se (Mes==4)
Imprima (“Abril”);
Senao se (Mes==5)
Imprima (“Maio”);
Senao se (Mes==6)
Imprima (“Junho”);
Senao se (Mes==7)
Imprima (“Julho”);
Senao se (Mes==8)
Imprima (“Agosto”);
Senao se (Mes==9)
Imprima (“Setembro”);
Senao se (Mes==10)
Imprima (“Outubro”);
Senao se (Mes==11)
Imprima (“Novembro”);
Senao se (Mes==12)...
tracking img