QBASIC PROJECT WORK
1. WAP to input number and check whether the given no. is divisible by 3 and 7 or not. Ans: CLS INPUT "Enter any number";n IF n MOD 3 =0 AND n MOD 7=0 THEN PRINT "The number is divisible by 3 and 7" ELSE PRINT "The given number is not divisible by 3 and 7" END IF END 2. WAP to input any number and check whether the given no.is positive or negative. Ans: CLS INPUT "Enter any number";n IF n>0 THEN PRINT "the given number is positive" ELSEIF n=0 THEN PRINT "the given number is zero" ELSE PRINT "the given number is negative" END IF END 3. WAP to input any number and display whether it is odd or even. Ans: CLS INPUT "Enter any number";N IF N MOD 2