Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.95/21: Рейтинг темы: голосов - 21, средняя оценка - 4.95
0 / 0 / 1
Регистрация: 18.09.2011
Сообщений: 31
1

Вычислить объём треугольной пирамиды по известным сторонам основания

14.10.2011, 20:10. Просмотров 3964. Ответов 1
Метки нет (Все метки)


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program func;
Var 
    x,u,z,y:real;
Function step(a:real):real; 
    Begin   
        step:=5*sqr(a)*a-a+1;
    End;                        
Begin                           
    Write('Введите числа x,u,z:');
    Readln(x,u,z);
    y:=exp(step(u)/x)*ln((exp(step(x)*ln(x)))/exp(x*ln(step(z))));
    Writeln('y=',y:2:1);
    Readln;
End.
Вычислить объём треугольной пирамиды по известным сторонам основания a, b, углу между ними и высоте пирамиды. Вычисление площади основания организовать через процедуру,функцию.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program l4_8;                               
Var
  V,a,b,t,h: real;           
function S(a,b,t:real):real;
     Begin
     S:=0.5*a*b*sin(t)
     End;
Begin 
writeln('введите a и b');Readln (a,b);
writeln('введите значение угла'); Readln (t);
writeln('введите высоту'); readln (h);
V:=1/3*s(a,b,t)*h;
Writeln ('V=',V:2:4);
End.
0
Изображения
 
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.10.2011, 20:10
Ответы с готовыми решениями:

Вычислить объем треугольной пирамиды
Помогите составить формулу, дальше я сам :) Вот сама задача Не смог вставить картинку через...

Вычислить объем правильной треугольной пирамиды
Возникла проблема при расчете формулы Вычислить объем правильной треугольной пирамиды если...

Вычислить объем правильной треугольной пирамиды
2. Составьте программу вычисления объема правильной треугольной пирамиды, высота основания которой...

Найти сторону основания и боковое ребро правильной треугольной пирамиды
Помогите пожалуйста с заданием!Как такое делать? Найти сторону основания и боковое ребро...

1
23 / 22 / 29
Регистрация: 16.12.2010
Сообщений: 71
15.10.2011, 12:41 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Program l4_8;
uses crt;
Var
  V,a,b,t,h,g: real;
procedure S(var g:real; a,b,t:real);
     Begin
     g:=0.5*a*b*sin(t);
     End;
Begin
writeln('ââåäèòå a è b');Readln (a,b);
writeln('ââåäèòå çíà÷åíèå óãëà'); Readln (t);
writeln('ââåäèòå âûñîòó'); readln (h);
S(g,a,b,t);
V:=1/3*g*h;
Writeln ('V=',V:2:4);
End.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.10.2011, 12:41

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Вычислить объем V либо площадь боковой поверхности S правильной треугольной призмы, если заданы периметр основания призмы P и ее высота H
Вычислить значение выражения и вывести его на экран монитора, при этом необходимо предусмотреть...

Найдите объём правильной треугольной пирамиды
Найдите объём правильной треугольной пирамиды, середина высоты которой удалена от боковой грани и...

Найти площадь основания и объем пирамиды
Пожалуйста помогите решить блок-схема+программа У пирамиды основанием служит квадрат. Найти...

Метод, позволяющий рассчитать площадь и объем поверхности ТРЕУГОЛЬНОЙ пирамиды
Ребят, помогите, пожалуйста, кто может. Есть что-то вроде примера, но ума все равно не хватает...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.