DISTANCE for TI-84+ CE

prgmCLEAR
Input "INPUT X[1]: ",A
Input "INPUT Y[1]: ",B
Input "INPUT X[2]: ",C
Input "INPUT Y[2]: ",D
prgmCLEAR
√((C-A)²+(D-B)²)→E
prgmCLEAR
Text(1,1,"DISTANCE= ",E)