Найти площадь осевого сечения прямого кругового конуса с радиусом основания R и образующей L. сделать в Паскале

VaSa4547 VaSa4547    1   26.09.2021 02:30    8

Ответы
АУЕ282 АУЕ282  28.11.2021 04:50

var

 r,l:integer;

begin

 write('Введите радиус(R) и образующую(L):'); readln(r,l);

 write('Площадь сечения(S): S=0,5*2*R*h: ',r*sqrt(sqr(l)-sqr(r)));

end.

Если моё решение вам, пометьте его лучшим !

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика