Area of four walls

CLS
INPUT "Enter length";l
INPUT "Enter breadth";b
INPUT "Enter height";h
A=2*h*(l+b)
PRINT "Area of four walls=";A
END