%%HP: T(1)A(R)F(.);
 CLEAR
"Area of a Triangle
Enter h(high) b(base)"
"" INPUT OBJ  H B
   '.5*H*B' EVAL
  

