Aes_Sedia5

Untitled

Nov 6th, 2011
88
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.61 KB | None | 0 0
  1. If J=93
  2. Then
  3. Disp "QUADRATIC FORMULA
  4. Input "AX^^2",C
  5. Input "BX",D
  6. Input "C",E
  7. Lbl 11
  8. (~D+sqrt(D^^2-4CE))/(2C)->X
  9. (~D-sqrt(D^^2-4CE))/(2D)->Y
  10. Disp X
  11. Pause Y
  12. End
  13. If J=94
  14. Then
  15. Disp "SYNTHETIC DIVISION
  16. Input "AX^6",A
  17. Input "BX^5",B
  18. Input "CX^4",C
  19. Input "DX^3",D
  20. Input "EX^2",E
  21. Input "FX",F
  22. Input "G",G
  23. Disp "OPPOSITE OF H
  24. Input "X+H",H
  25. AH->T
  26. T+B->Z
  27. HS->R
  28. R+C->B
  29. QH->P
  30. D+P->C
  31. OH->N
  32. E+N->D
  33. MH->Q
  34. F+Q->E
  35. JH->X
  36. G+X->F
  37. Disp Z,A,B,C,D,E,F
  38. Pause
  39. Z->A
  40. If not(F
  41. Then
  42. 94->J
  43. 0->K
  44. End
  45. If not(F)not(E
  46. Then
  47. Goto 11
  48. Delvar K
  49. End
  50. End
  51. End
  52.  
  53.  
Advertisement
Add Comment
Please, Sign In to add comment