Найти площадь трапеции если известны ее высота и основание . на языке бейсик

это алгоритм

но площадь ещё не знаю как надеюсь алгоритм

CLS  

INPUT "Vvedite verhnee osnovanie a: ", a  

INPUT "Vvedite nizhnee osnovanie b: ", b  

INPUT "Vvedite vysotu h: ", h  

S = h * (a + b) / 2  

SCREEN 7  

Yn = 25  

m = 17  

COLOR 5  

LINE (160 - (a / 2) * m, Yn)-(160, Yn)  

LINE (160, Yn)-(160 + (a / 2) * m, Yn)  

COLOR 8  

LINE (160 - (b / 2) * m, Yn + h * m)-(160, Yn + h * m)  

LINE (160, Yn + h * m)-(160 + (b / 2) * m, Yn + h * m)  

COLOR 6  

LINE (160, Yn)-(160, Yn + h * m)  

COLOR 9  

LINE (160 - (a / 2) * m, Yn)-(160 - (b / 2) * m, Yn + h * m)  

LINE (160 + (a / 2) * m, Yn)-(160 + (b / 2) * m, Yn + h * m)  

COLOR 5  

LOCATE 3, 17  

PRINT "a ="; a  

COLOR 6  

LOCATE 12, 22  

PRINT "h ="; h  

COLOR 8  

LOCATE 24, 17  

PRINT "b ="; b;  

COLOR 10  

PRINT " S ="; S  

COLOR 4