• Предмет: Информатика
  • Автор: Странный1111
  • Вопрос задан 9 лет назад

площадь трапеции на языке ABC pascal

Ответы

Ответ дал: bulat13375
0
1 2 3 4 5 6 7 8 9 10 11 12 uses crt; var a,c,h,s,x:real; begin clrscr; writeln('Введите длины большего основания, боковой стороны и высоты '); writeln('равнобедренной трапеции:'); readln(a,c,h); x:=sqrt(c*c-h*h); s:=(a-x)*h; write('Площадь=',s:0:2); readln end.
Похожие вопросы