Составьте программу для вычисления площади трапеции при известных основаниях и высоте.

Var a,b,h:real;
begin
   write('Vvedita osnovaniya:');
   read(a,b);
   write('Vvedite visotu:');
   read(h);
   writeln('S=',(a+b)/2*h);
end.