CLS

INPUT "ENTER ANY NUMBER"; N

PRINT "ODD DIGITS ARE ";

WHILE N <> 0

R = N MOD 10

IF R MOD 2 = 1 THEN PRINT R;

N = N \ 10

WEND

END

USING SUB PROCEDURE

DECLARE SUB ODD (N)

CLS

INPUT "ENTER ANY NUMBER"; N

CALL ODD (N)

END

SUB ODD (N)

PRINT "ODD DIGITS ARE ";

WHILE N <> 0

R = N MOD 10

IF R MOD 2 = 1 THEN PRINT R;

N = N \ 10

WEND

END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION ODD (N)

REM

CLS

INPUT "ENTER ANY NUMBER"; N

PRINT " ODD DIGITS ARE ";

D = ODD(N)

END

FUNCTION ODD (N)

WHILE N <> 0

R = N MOD 10

IF R MOD 2 = 1 THEN PRINT R;

N = N \ 10

WEND

END FUNCTION

## WAP TO ENTER ANY DIGIT AND DISPLAY ODD DIGITS

**Notice**: compact(): Undefined variable: limits in

**/home/bhimgautam34/public_html/wp-includes/class-wp-comment-query.php**on line

**853**

**Notice**: compact(): Undefined variable: groupby in

**/home/bhimgautam34/public_html/wp-includes/class-wp-comment-query.php**on line

**853**

## No Comments