cadena [30] nom
entero n1,n2,n3,prom,nef,pef,ntf,ptf

inicio
escriba "digite el nombre: "
lea nom
escriba "digite la n1 "
lea n1
escriba "digite n2 "
lea n2
escriba "digite n3 "
lea n3
prom<- (((n1+n2+n3)/3)*55)/100
escriba "digite la nota del examen final: "
lea nef
pef<-(nef*30)/100
escriba "digite la nota del trabajo final: "
lea ntf
ptf<-(ntf*15)/100
escriba "la nota final de ",nom,"es de ",(prom+pef+ptf)
fin