Pseudo - Men´s Club

1. [Tiendita]
2. [Declarar variables]
Resp: chart
Nomprod: strin [15]
Cant: int
Precio, importe, suma, total: real
3. [Pedir datos]
Write (‘desea hacer una compra S/N’)
Read (respuesta)
4. [Inicializar suma]
Suma 0
5. [Establecer ciclo]
While resp==S or resp==chart (83) or resp! =S or resp! =chart (83)
6. [Establecer ciclo]
While resp<>S or resp<> respchar (83) and resp<>N or resp<> char (78)
7. [Imprimir datos]
Write (‘Error)
8. [Pedir datos]
Write (‘desea hacer una compra S/N’)
Read (resp)
9. [Establecer ciclo]
While resp ==n or resp==chart 78
10. [Imprimir]
Write (‘gracias por su compra’)
11. [Pedir datos]
Write (‘desea hacer una compra’)
Read (resp)
12. [Establecer ciclo}
While resp ==S or resp==char (83)
13. [Pedir datos]
Write (‘nombre del producto’)
Read (nom prod)
Write (‘precio’)
Read (precio)
Write (‘cantidad’)
Read (cant)
14. [Calcular]
Importe precio*cant
Suma suma+importe
Total suma
15. [Preguntar]
Write (‘desea comprar’)
Read (resp)
16. [Imprimir]
Write (‘total:’ total)
17. [Fin del pseudocódigo]
@