QBASIC PROGRAM TO CALCULATE DISTANCE TRAVELLED BY A BODY(FUNCTION)

DECLARE FUNCTION DISTANCE(U,T,A)
CLS
INPUT "ENTER ACCELERATION";A
INPUT "ENTER TIME";T
INPUT "ENTER INITIAL VELOCITY";U
PRINT "DISTANCE TRAVELED";DISTANCE(U,T,A)
END

FUNCTION DISTANCE (U,T,A)
D=U*T+1/2*A*T^2
DISTANCE=D
END FUNCTON