Correção Avaliação de ILP

Segue abaixo a correção da avaliação de ILP realizada nos dias 23 e 24/03/09:

AVALIAÇÃO DIA 23

Exercício 1 algoritmo "Exercicio 1" // Função : // Autor : // Data : 30/3/2009 // Seção de Declarações var PIM,PD,CF,VC:REAL inicio // Seção de Comandos LEIA(CF) LEIA(PIM) LEIA(PD) VC<-CF+(CF*PIM/100)+(CF*PD/100) ESCREVAL(VC) fimalgoritmo

Exercício 2
algoritmo "Exercicio 2"
// Função :
// Autor :
// Data : 30/3/2009
// Seção de Declarações
var
AREA:CARACTER
SA,VA,P,SN:REAL
inicio
// Seção de Comandos
LEIA(AREA)
LEIA(SA)
SE AREA="P" ENTAO
      SE SA<=700 ENTAO
   P<-15
   SENAO
         SE SA<=1800 ENTAO
      P<-10
      SENAO
         SE SA<=2500 ENTAO
            P<-7
            SENAO
            P<-0
         FIMSE
      FIMSE
   FIMSE
FIMSE

SE AREA="A" ENTAO
   SE SA<=700 ENTAO
      P<-18
   SENAO
      SE SA<=1800 ENTAO
         P<-12
      SENAO
         SE SA<=2500 ENTAO
            P<-8
         SENAO
            P<-5
         FIMSE
      FIMSE
   FIMSE
FIMSE
VA<-SA*P/100
SN<-SA+VA
ESCREVAL(P)
ESCREVAL(VA)
ESCREVAL(SN)
fimalgoritmo



AVALIAÇÃO DIA 24

Exercício 1
algoritmo "Exercicio 1"
// Função :
// Autor :
// Data : 30/3/2009
// Seção de Declarações
var
VD,VDP,VM,VMP,LP:REAL
inicio
// Seção de Comandos
LEIA (VD)
VD<-VD-VD*0.22
VM<-VD*42*0.40*4
VMP<-VDP*42*0.70*4
LP<-VMP-VM
ESCREVAL(VDP)
ESCREVAL(VM)
ESCREVAL(LP)
fimalgoritmo

Exercício 2
algoritmo "Exercicio 2"
// Função :
// Autor :
// Data : 30/3/2009
// Seção de Declarações
var
ID,COTA:REAL
SX:CARACTER
inicio
// Seção de Comandos
LEIA(ID)
LEIA(SX)
SE SX="F" ENTAO
   SE ID<=18 ENTAO
      COTA<-3.2*32.50
   SENAO
         SE ID<=40 ENTAO
            COTA<-4*32.50
         SENAO
            COTA<-5.5*32.50
         FIMSE
   FIMSE
FIMSE

SE SX="M" ENTAO
   SE ID<=18 ENTAO
      COTA<-3*32.50
   SENAO
      SE ID<=40 ENTAO
         COTA<-4*32.50
      SENAO
         COTA<-6*32.50
      FIMSE
   FIMSE
FIMSE
ESCREVAL(COTA)
fimalgoritmo

Comentários

Comentários fechados.