Area of rectangle

CLS
INPUT Enter length";l
INPUT "Enter breadth";b
A=l*b
PRINT "Area of rectangle=";A
END