REM ****DISTANCE FORMULA**** REM PROGRAMMER: Dustin Hacker REM 8/22/2010 ' CLS REM X SIDE VARIABLES PRINT "PLEASE INSERT X2" INPUT X2 PRINT "PLEASE INSERT X1" INPUT X1 ' REM Y SIDE VARIABLES PRINT "PLEASE INSERT Y2" INPUT Y2 PRINT "PLEASE INSERT Y1" INPUT Y1 ' REM FORMULA X3 = X2 - X1 PRINT X2; "-"; X1; "="; X3 Y3 = Y2 - Y1 PRINT Y2; "-"; Y1; "="; Y3 X4 = X3 * X3 PRINT X3; "*"; X3; "="; X4 Y4 = Y3 * Y3 PRINT Y3; "*"; Y3; "="; Y4 XY = X4 + Y4 PRINT X4; "+"; Y4; "="; XY PRINT "This is your answer"; SQR(XY) END