Program to find Area of Rectangle in QBASIC
CLS
INPUT "Enter Length of Rectangle"; l
INPUT "Enter Breadth of Rectangle"; b
a = l * b
PRINT "Area ="; a
END