Proceso NumeroParOImpar
Escribir Sin Saltar "Ingrese el valor de numero:";
Leer numero;
Si numero MOD 2 = 0 Entonces
Escribir "El número es par";
SiNo
Escribir "El número es impar";
FinSi
FinProceso
___________________________________________________
Proceso Descuento
definir a Como real;
Escribir ("ingrese costo del producto: ");
Leer a;
definir b como real;
b<-(a/100)*10;
definir c como real;
c<-(a-b);
Escribir ("El precio final mas el 10% de descuento es: "),c ;
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
Proceso NumeroParOImpar
Escribir Sin Saltar "Ingrese el valor de numero:";
Leer numero;
Si numero MOD 2 = 0 Entonces
Escribir "El número es par";
SiNo
Escribir "El número es impar";
FinSi
FinProceso
___________________________________________________
Proceso Descuento
definir a Como real;
Escribir ("ingrese costo del producto: ");
Leer a;
definir b como real;
b<-(a/100)*10;
definir c como real;
c<-(a-b);
Escribir ("El precio final mas el 10% de descuento es: "),c ;
FinProceso