Program to calculate distance using FUNCTION
DECLARE FUNCTION DISTANCE(A,U,T)
CLS
INPUT"ENTER ACCELERATION",A
INPUT"ENTER INITIAL VELOCITY";U
INPUT"ENTER TIME";T
PRINT"DISTANCE TRAVELLED=";DISTANCE(A,U,T)
END
FUNCTION DISTANCE(A,U,T)
S=U*T+1/2*A*T^2
DISTANCE=S
END FUNCTION
CLS
INPUT"ENTER ACCELERATION",A
INPUT"ENTER INITIAL VELOCITY";U
INPUT"ENTER TIME";T
PRINT"DISTANCE TRAVELLED=";DISTANCE(A,U,T)
END
FUNCTION DISTANCE(A,U,T)
S=U*T+1/2*A*T^2
DISTANCE=S
END FUNCTION
No comments:
Post a Comment