125. Qbasic program to print first ten multiples of input number.

125. WAP to print first ten multiples of input number.

DECLARE SUB SERIES ( N)

CLS

INPUT “ENTER ANY NUMBER”; N

CALL SERIES (N)

END

SUB SERIES (N)

FOR I = 1 TO 10

PRINT N * I,

NEXT I

END SUB