20) CIRCUMFERENCE OF A CIRCLE.(SUB)
DECLARE SUB CIR(R)
CLS
INPUT " ENTER RADIUS "; R
CALL CIR(R)
END
SUB CIR(R)
C= 2 * 22/7 * R
PRINT " CIRCUMFERENCE OF CIRCLE ="; C
END SUB
DECLARE SUB CIR(R)
CLS
INPUT " ENTER RADIUS "; R
CALL CIR(R)
END
SUB CIR(R)
C= 2 * 22/7 * R
PRINT " CIRCUMFERENCE OF CIRCLE ="; C
END SUB
0 comments