Area of circle(sub)


DECLARE SUB AREA(R)
CLS
INPUT"ENTER RADIUS";R
CALL AREA(R)
END

SUB AREA(R)
A=22/7*R^2
PRINT"AREA OF CIRCLE";A
END SUB

Comments

Popular posts from this blog

Hiking

experience of SEE exam cancelled and covid -19

My journey in jagat mandir school