TI 81 Distance Formula Program Prgm 4:DISTANCE :float :disp "Distance Formula" :disp "From (A,B) to (C,D) :disp "A=" :input A :disp "B=" :input B :disp "C=" :input C :disp "D=" :input D :((C-A)2+(D-B)2) :disp "Distance is" :disp ans :end