Advertisement
xNatural

23.03.17

Mar 23rd, 2017
257
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.87 KB | None | 0 0
  1. Redon (4,3) 0,5 - 0,4^
  2. Trunc ( ) 4,xxxx
  3.  
  4. estacionamiento
  5.  
  6. Proceso sin_titulo
  7. Definir tiempo como entero;
  8.  
  9. tiempo = 0;
  10.  
  11. Escribir "Ingrese los minutos:";
  12. Leer tiempo;
  13.  
  14. Si tiempo <= 59 entonces
  15. Escribir "el precio es ", (tiempo*4);
  16. Sino
  17. Escribir "";
  18. FinSi
  19.  
  20. Si tiempo >= 60 && tiempo <= 119 entonces
  21. Escribir "el precio es ", (tiempo*5);
  22. Sino
  23. Escribir "";
  24. FinSi
  25.  
  26. Si tiempo >= 120 && tiempo <= 180 entonces
  27. Escribir "el precio es ", (tiempo*6);
  28. Sino
  29. Escribir "";
  30. FinSi
  31.  
  32. Si tiempo > 180 entonces
  33. Escribir "el precio es ", (tiempo*7);
  34. sino
  35. Escribir "";
  36. FinSi
  37.  
  38. FinProceso
  39.  
  40.  
  41. donas
  42.  
  43. Proceso sin_titulo
  44. Definir donas,dinero,cantidad como entero;
  45.  
  46. Escribir "Ingrese el dinero:";
  47. Leer dinero;
  48.  
  49. donas = 700;
  50.  
  51. Escribir "usted compra: " , trunc(dinero/donas), " donas" ;
  52. Escribir "" , ();
  53.  
  54. FinProceso
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement