Algoritmo factura
	// Diseñar un programa que realice una factura de un mercado
	
	Definir nombre Como Cadena
	Definir unblanq,unlava,undet,unagu,unbre,uncoca,unlen,unfri,unmai Como Entero;
	unblanq=0
	unlava=0
	undet=0
	unagu=0
	unbre=0
	uncoca=0
	unlen=0
	unfri=0
	unmai=0
	
	Escribir "¿A nombre de quien estara la factura?";
	leer nombre;
	
	
	
	Escribir "En el mercado tendra que incluir al menos una unidad de los siguientes productos que son escenciales para el hogar";
	Escribir " ";
	
	Escribir "ASEO"
	Escribir "¿Cuantas unidades de blanqueador comprara?"
	Leer unblanq;
	Escribir "¿Cuantas unidades de lavaplatos comprara?"
	leer unlava;
	Escribir "¿Cuantas unidades de detergente comprara?";
	leer undet;
	Escribir " ";
	
	Escribir "BEBIDAS";
	Escribir "¿Cuantos botellones de agua comprara?";
	leer unagu;
	Escribir "¿Cuantas unidades de bretaña comprara?";
	leer unbre;	
	Escribir "¿Cuantas unidades de Coca-Cola comprara?";
	leer uncoca;	
	Escribir " ";
	
	Escribir "GRANOS";
	Escribir "En esta seccion se entendera cada unidad como una libra del respectivo grano";
	Escribir "¿Cuantas unidades de lentejas comprara?";
	leer unlen;
	Escribir "¿Cuantas unidades de frijol comprara?";
	leer unfri;	
	Escribir "¿Cuantas unidades de maiz comprara?";
	leer unmai;	
	
	Limpiar Pantalla;
	
	
	Escribir "MERCALIZ S.A";
	Escribir "22/mar/2024";
	Escribir "Calle 100 N.20-35";
	Escribir "NIT. 840.143.054-8";
	Escribir "Tel:2343212";
	Escribir "Gerente: Liz Angely Gil";
	Escribir "Cliente: ", nombre;
	Escribir " ";
	
	
	
	Escribir "ASEO";
	Escribir "Blanqueador", "-----------", unblanq, "-----------",4.550*unblanq;
	Escribir "Lavaplatos", " -----------", unlava, "----------", 10.299*unlava;
	Escribir "Detergente", " -----------", undet, "-----------", 18.298*undet;
	Escribir " ";
	
	Escribir "BEBIDAS";
	Escribir "Botellon de agua", "------", unagu, "-----------", 10.000*unagu;
	Escribir "Bretaña", " --------------", unbre, "------------", 4.999*unbre;
	Escribir "Coca-Cola", " ------------", uncoca, "-----------", 6.999*uncoca;
	Escribir" ";
	
	Escribir "GRANO";
	Escribir "Lenteja", "----------------", unlen, "------------",4.590*unlen;
	Escribir "Frijoles", " --------------", unfri, "----------", 9.599*unfri;
	Escribir "Maiz", " ------------------", unmai, "----------", 14.598*unmai;
	Escribir " ";
	
	Escribir "El total de su factura es ", (4.550*unblanq)+(10.299*unlava)+(18.298*undet)+(10.000*unagu)+(4.999*unbre)+(6.999*uncoca)+(4.590*unlen)+(9.599*unfri)+(14.598*unmai)
	Escribir "";
FinAlgoritmo