Program mode: COMP
Program syntax: ?→A: ?→B: ?→C: ?→D: ?→X: ?→Y: If B=D: Then B→M: Y→B: M→Y: A→M: X→A: M→X: IfEnd: If B=Y: Then B→M: D→B: M→D: A→M: C→A: M→C: IfEnd: (A－C)÷(D－B→M: (A－X)÷(Y－B: .5(M－Ans)-1(Y－D＋M(A＋C)－Ans(A＋X→X◢ M Ans＋.5(B＋D－M(A＋C→Y◢√((X－A)2+(Y－B)2 (89 bytes or 108 bytes or 153 bytes or 172 bytes)
Program description: There are 6 inputs for this program. Input the x- and y-coordinates of the three points respectively. For example, suppose we have A(3,2), B(1,4) and C(5,4), then type [3][EXE][2][EXE][1][EXE][4][EXE][5][EXE][4][EXE]. The coordinates of the circumcentre will be displayed. Since the coordinates of the circumcentre of the example above is (3,4), the first output will be 3 and the second output will be 4.
NOTES:
The syntax highlighted in yellow is not necessary as long as you do NOT type the coordinates of any of the 2 points (if any) with the SAME y-coordinates as the first 2 inputs. For the example above, since B and C have the same y-coordinate, do NOT enter the coordinates of any of them as the first 2 inputs without the syntax highlighted in yellow.
If you need the length of the radius, include the syntax highlighted in green as well. The radius will be displayed as the third output.