составить алгоритм нахождение площади трапеции по двум основаниям s=? a b h

Ну, без высоты же не обойтисьvar  a, b, h: real;begin  readln(a, b, h);  writeln('S = ', (a * 0.5 + b / 2) * h);end.