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

0 голосов
41 просмотров

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


Информатика (23 баллов) | 41 просмотров
Дан 1 ответ
0 голосов

1.Боковая площадь пов-ти конуса

var
r, l: integer;

begin
readln(r, l);
writeln(pi * r * l);
end.

 

2. Полная площадь пов-ти конуса

var
r, l: integer;

begin
readln(r, l);
writeln(pi * r * (r+l));
end.

 

Примечание: r- радиус, l - образующая

Если l неизвестна,ее можно вычислить по формуле l = sqrt(r*r+h*h), где h - высота конуса

(652 баллов)