Написать программу вычисления
площади равнобедренной трапеции.
Значения основания и боковой стороны вводятся с клавиатуры.

var a,b,c,s:real;beginwriteln ('Введите основания и боковую сторону: ');readln(a,b,c);s:=(a+b)/2*sqrt(c*c-(a-b)*(a-b)/4);writeln('S=',s);end.