Wednesday, October 2, 2019

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

No comments:

Post a Comment

My JM Experience

School life is very important part of one's life, because it provides opportunity for study and discipline. Besides these, the scho...