Tijmen1o1

Untitled

Jun 18th, 2019
132
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.19 KB | None | 0 0
  1. ClrHome
  2. "en start?
  3. Disp "Linker helling",Ans
  4. Prompt A,B
  5. Disp "Rechter helling",Ans
  6. Prompt C,D
  7. ClrHome
  8. A-C
  9. Ans^^-1(D-B)->E
  10. If Ans:Then:Disp "X:",E,"Y:",AE+B:Else:Disp "Geen snijpunt":End
Advertisement
Add Comment
Please, Sign In to add comment