area of triangle

CLS
INPUT"Enter base";b
INPUT"Enter height";h
A=1/2*b*h
PRINT"Area of triangle=";A
END