panda_hxc

lab_1_2

Nov 8th, 2011
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
QBasic 0.13 KB | None | 0 0
  1. CLS
  2.  
  3. a = .6
  4. b = 1
  5. Z = .2
  6.  
  7.  
  8. x = b / (SQR(1 - (LOG(Z) / LOG(10))))
  9.  
  10. p = SIN(a) ^ (1 / 3) * ATN(x / SQR(1 - x ^ 2))
  11.  
  12. PRINT p
Add Comment
Please, Sign In to add comment