SIMPLE INTEREST(FUNCTION)
DECLARE FUNCTION SI(P,T,R)
CLS
INPUT "ENTER THE PRINCIPLE";P
INPUT "ENTER THE TIME";T
INPUT "ENTER THE RATE";R
PRINT "SIMPLE INTEREST";SI(P,T,R)
END
FUNCTION SI(P,T,R)
S=P*T*R
SI= S
END FUNCTION
CLS
INPUT "ENTER THE PRINCIPLE";P
INPUT "ENTER THE TIME";T
INPUT "ENTER THE RATE";R
PRINT "SIMPLE INTEREST";SI(P,T,R)
END
FUNCTION SI(P,T,R)
S=P*T*R
SI= S
END FUNCTION
Comments
Post a Comment