Программа для поиска площади трапеции

Для нахождения площади трапеции надо знать как минимум основания и высоту: s = (a+b)/2*h Дальше линейный алгоритм: var a,b,h:real; begin   writeln('Введите длины оснований (a,b) и высоты h');   readln(a,b,h);   writeln('Площадь трапеции = ', (a+b)/2+h); end.