QBASIC to find Area of Rectangle

CLS
INPUT "Enter the length"; L
INPUT "Enter the breadth"; B
A = L*B
PRINT "Area of rectangle="; A
END