Создать функцию вычисления объема усеченного конуса, входные данные для функции: R - радиус нижнего основания, r - радиус верхнего основания, h - высота конуса. Через язык C Без всяких библиотек только
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var n:=ReadInteger('Количество строк в массиве:'); var m:=ReadInteger('Количество столбцов в массиве:'); Writeln('*** Исходный массив [',n,',',m,'] ***'); var a:=MatrRandom(n,m,0,1); a.Println(2); Writeln(2*a.ColCount*'-'); var b:=a.ElementsByRow.Where(x->x=1).ToArray; var k:=b.Count; b.Println; Writeln('k=',k) end.
Код:
#include <stdio.h>
float V(float R, float r, float h)
{
if(R <= r || h <=0 || r <= 0 || R <=0)
return -1;
return (3.14 * h * (R*R + R*r + r*r)) / 3;
}
int main()
{
float test = V(10, 5, 5);
printf("%f\n", test);
test = V(5, 5, 1);
printf("%f\n", test);
test = V(10, 5, 0);
printf("%f\n", test);
test = V(5, 6, 5);
printf("%f\n", test);
test = V(4, 3.99, 6);
printf("%f", test);
return 0;
}