определить площадь треугольника, если известны основания и высота. BASIC

Question

определить площадь треугольника, если известны основания и высота. BASIC

Answer 1

CLS

a:

INPUT "введи основание"; a

IF a<=0 THEN PRINT "не может быть": GOTO a</p>

b:

INPUT "введи высоту"; h

IF h<=0 THEN PRINT "не может быть": GOTO a</p>

S=a*h/2

PRINT "площадь треугольника равна"; S

END