Tijmen1o1

Untitled

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