Advertisement
Guest User

Untitled

a guest
Mar 30th, 2015
225
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.40 KB | None | 0 0
  1. //NWW
  2. //wpisujemy 2 liczby max dwucyfrowe, po kazdej liczbie spacja
  3. petla1: wpr 1
  4. ode ascii // -48
  5. soz blad //nie moze byc 0
  6. som blad
  7. ład C1
  8. cyfra2: wpr 1
  9. ode spacja //w kodzie ascii 32
  10. soz jednocyfrowa //jesli spacja to liczba jednocyfrowa
  11. ode st16 // 32+16=48 a tyle trzeba odjac w ascii
  12. som blad //jakis inny znak, ani spacja ani liczba czyli blad
  13. ład C2
  14. odstep: wpr 1
  15. ode spacja
  16. soz dwucyfrowa
  17. sob blad //jesli nie spacja to blad (tylko dwucyfrowe)
  18. dwucyfrowa: pob C1 //pierwsza cyfra
  19. mno st10
  20. dod C2 //tworzymy jedna liczbe
  21. dns //zapisujemy pierwszą liczbę
  22. sob kolejna
  23. jednocyfrowa: pob C1
  24. ład L1
  25. dns
  26. kolejna: pob n
  27. ode st1
  28. ład n
  29. soz dalej1
  30. sob petla1
  31. dalej1: pzs
  32. ład L2
  33. pzs
  34. ład L1
  35. licznwd: ŁAD C1 //ponowne wykorzystanie zmiennych C1 i C2
  36. POB L2
  37. Petla: ŁAD C2
  38. Dalej: ODE C1
  39. SOZ rowne
  40. SOM L1wieksze
  41. SOB Petla
  42. rowne: POB C1
  43. ŁAD pomocniczy //pomocniczy=nwd
  44. SOB mnozenie
  45. L1wieksze: POB C1
  46. ODE C2
  47. ŁAD C1
  48. POB C2
  49. SOB Dalej
  50. mnozenie: Pob L1
  51. mno L2
  52. dzi pomocniczy
  53. ład nww
  54. dzi st10
  55. soz jednocyfr
  56. ład pomocniczy
  57. dzi st10
  58. soz dwucyfr
  59. dod ascii
  60. wyp 2
  61. ode ascii
  62. mno st10
  63. dwucyfr: ład C2 //ponowne wykorzystanie zmiennej
  64. pob pomocniczy
  65. ode C2
  66. dod ascii
  67. wyp 2
  68. jednocyfr: pob nww
  69. ode st10
  70. ład nww
  71. soz zero
  72. som reszta
  73. sob jednocyfr
  74. reszta: dod st10
  75. zero: dod ascii
  76. wyp 2
  77. blad: stp
  78. C1: RPA
  79. C2: RPA
  80. st16: RST 16
  81. spacja: RST 32
  82. L1: RPA
  83. L2: RPA
  84. ascii: RST 48
  85. st10: RST 10
  86. pomocniczy: RPA
  87. nww: RPA
  88. st1: RST 1
  89. n: RST 2
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement