Biomoleculas

Programa 9
Proceso sin_titulo
total<-0;
Escribir "Precio y código de las películas por Categorías";
Escribir "Terror $20 12345";
Escribir "Comedia $30 54321";
Escribir "Ciencia y Ficción $27 23415";
Escribir "Suspenso $26 42351";
Escribir "Documentales $28 12354";
Escribir "*Valor de recargo por día = 30 pesos";Escribir "Escriba el código de la pelicula a reportar";
Leer a;
Escribir "Días de atraso";
Leer b;
Si a=12345 Entonces
total<-20 + (b*30);
Sino
Si a=54321 Entonces
total<-30 + (b*30);
Sino
Si a=23415 Entonces
total<-27 + (b*30);
Sino
Si a=42351 Entonces
total<-26 + (b*30);
Sino
Si a=12354 Entonces
total<-28 + (b*30);Sino
Escribir "El código esta mal";
FinSi
FinSi
FinSi
FinSi
FinSi

Escribir "El Total a pagar por la película es ", total;

FinProceso

Problema 11
Proceso sin_titulo
total<-0;
Escribir "Precio en Bolívares por litro de los tipos de aceite";
Escribir "De primera (1) 500000";
Escribir "De segunda (2) 400000";
Escribir "De tercera (3) 300000";Escribir "Inserte el código del vendedor";
Leer a;
Escribir "Escriba 1, 2 o 3 dependiendo del tipo de aciete que quiera";
Leer b;
Escribir "Escriba la cantidad en litros a vender";
Leer c;
Si b=1 Entonces
total<-c*500000;
Sino
Si b=2 Entonces
total<-c*400000
Sino
Si b=3 Entonces
total<-c*300000
Sino
Escribir "El tipo de aceite no existe";FinSi
FinSi
FinSi
Escribir "El vendedor ", a, " compró ", c, " litros de aceite del tipo ", b, " a un total de ", total, " bolívares.";
FinProceso

Problema 12
Proceso sin_titulo
Escribir "Escriba la calificación del alumno";
Leer a;
Si a=10 Entonces
Escribir "El alumno es excelente";
Sino
Si a=9 Entonces
Escribir "El alumno es regular";
Sino
Si a=8 EntoncesEscribir "El alumno entiende";
Sino
Si a=7 Entonces
Escribir "El alumno es suficiente ";
Sino
Si a<7 Entonces
Escribir "El alumno es insuficiente";
Sino
Escribir "Error en la calificación del alumno";
FinSi
FinSi
FinSi
FinSi
FinSi
FinProceso

Problema 13
Proceso sin_titulo
importe<-0;
descuento<-0;
compra<-0;Escribir "Precio y descuento del producto";
Escribir "1) 100000 5%";
Escribir "2) 150000 15%";
Escribir "3) 200000 25%";
Escribir "Escriba 1, 2 o 3 dependiendo el producto que quiera";
Leer b;
Escribir "Cantidad del producto";
Leer a;
Si b=1 Entonces
importe<-100000*a;
descuento<-((100000*a)*5)/100;
compra<-(100000*a) - (((100000*a)*5)/100);
Sino
Sib=2 Entonces
importe<-150000*a;
descuento<-((150000*a)*15)/100;
compra<-(150000*a) - (((150000*a)*15)/100);
Sino
Si b=3 Entonces
importe<-200000*a;
descuento<-((200000*a)*25)/100;
compra<-(200000*a) - (((100000*a)*25)/100);
Sino
Escribir "El tipo de producto no existe";
FinSi
FinSi
FinSi
Escribir "Importe:", importe;
Escribir "Descuento: ", descuento;
Escribir "Compra: ", compra;
FinProceso

Problema 14
Proceso sin_titulo
total<-0;
Escribir "Escriba cuanto debe el cliente";
Leer a;
Escribir "Escriba cuantos días se atraso a partir de 30 días en adelante";
Leer b;
Si b>=30 y b<=60 Entonces
total<-a + (2*a)/100;
Sino
Si b>60 y b<91 Entoncestotal<-a + (5*a)/100;
Sino
Si b>90 y b<130 Entonces
total<-a + (7*a)/100;
Sino
Si b>129 Entonces
total<-a + (15*a)/100;
Sino
Escribir "Los días son incorrectos";
FinSi
FinSi
FinSi
FinSi
Escribir "Pago parcial ", a;
Escribir "Pago total ", total;
FinProceso

Problema 15
Proceso sin_titulo
x<-0;
a<-0;
b<-0;...