Dashain homework

WAP to find area of rectangle 

CLS
INPUT "INTER LENGTH";L
INPUT "INTER BREADTH";B
A=L*B
PRINT "AREA OF RECTANGLE=";A
END


WAP to find area of circle

CLS
INPUT "ENTER RADIUS";R
A=22/7 *R^2
PRINT"AREA OF CIRCLE=";A
END


WAP to find a area of square


CLS
INPUT "ENTER Length";L
A=L^2
PRINT "area of square =";A
END


WAP to find a area of triangle


CLS
INPUT "ENTER base";B
INPUT "ENTER height";H
A=1/2 *B*H
PRINT "AREA of triangle";A
END



WAP to find a volume of cylinder

CLS
INPUT "ENTER Radius";R
INPUT "INTER Height";H
V=22/7 *R^2*H
PRINT "Volume of cylinder =";V
END


WAP to find input percentage and display pass or fail

CLS
INPUT "ENTER Percentage";P
IF P> =40 THEN
PRINT"PASS"
ELSE
PRINT" FAIL"
END


WAP to input any number and check odd or even

CLS
INPUT "ENTER any number";N
IF N MOD 2=O THEN
PRINT "EVEN NUMBER"
ELSE
PRINT "ODD NUMBER"
END IF
END

WAP to display 5,10,15............50
CLS
For I =5 to 10 50 STEPS
PRINT I
NEXT I
END

WAP to display 100,90,80.........10
CLS
I =100
WHILE I =10 
PRINT I
I = I-10
WEND
END

WAP to display 2,4,6,8...........20
CLS
I =2
DO WHILE I<=20
PRINT I
I= I+2
LOOP
END
END

WAP to display 100,90,80...10 
CLS
FOR 1= 100 To 10 STEP-10 
PRINT I 
NEXT I 
END 

WAP to display 2,4,6,8,...20
CLS 
FOR I=2TO20 STEP 2
PRINT I 
NEXT I 
END 

WAP TO DISPLAY 50,45,40...5
CLS 
FORI=50TO5 STEP5
PRINT I 
NEXT I 
END 








Comments

Popular posts from this blog

Experience of excursion