PERFECT SQUARE NO USING FUNCTION

PERFECT SQUARE NO USING FUNCTION

DECLARE SUB SQU(N)
CLS
INPUT"ENTER ANY NO";N
CALL SQU(N)
END

SUB SQU(N)
S=SQU(N)
IF S=INT(S)THEN
PRINT"SUPPLIED NO IS PEFECT SQUARE"
ELSE
PRINT"SUPPLIED NO IS NO PERFECT SQUARE"
END IF
END SUB

Comments

Popular posts from this blog

Hiking

experience of SEE exam cancelled and covid -19

My journey in jagat mandir school