Greatest number among three number using sub procedure.
DECLARE SUB GREAT(A,B,C)
DECLARE SUB GREAT(A,B,C)
CLS
INPUT"ENTER FIRST NO";A
INPUT"ENTER SECOND NO";B
INPUT"ENTER THIRDTHIRD NO";C
CALL GREAT(A,B,C)
END
SUB GREAT(A,B,C)
IF A>B AND A>C THEN
PRINT"THE GREATEST NO IS";A
ELSEIF B>C ANDB>A THEN
PRINT"THE GREATEST NO IS";B
ELSE
PRINT"THE GREATEST NO IS";C
END IF
END FUNCTION
Comments
Post a Comment