Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.69/13: Рейтинг темы: голосов - 13, средняя оценка - 4.69
0 / 0 / 0
Регистрация: 04.11.2013
Сообщений: 16

Найти среднее значение I для четырёх торов

04.12.2013, 14:19. Показов 2637. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Главный центральный момент инерции тора относительно оси, лежащей в его плоскости, вычисляется по формуле I=(m/8)*(4R2+5r2) . Найти среднее значение I для четырёх торов, если для каждого из них известны масса m, радиус R и радиус поперечного сечения r. Использовать подпрограмму-функцию.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
04.12.2013, 14:19
Ответы с готовыми решениями:

Найти среднее значение I для четырёх торов
Написать программу решения следующей задачи: Главный центральный момент инерции тора относительно оси, лежащей в его плоскости, вычисляется...

Найти среднее значение и среднее отклонение для элементов данных линейных массивов X (n), Y (m)
Найти среднее значение и среднее отклонение для элементов данных линейных массивов X(n),Y(m). Выполнить с использованием процедуры.

Написать программу, которая находит среднее значение четырех чисел введенных с клавиатуры
Среднее значение четырех чисел равна одной четверти суммы этих четырех чисел. Написать программу, которая находит среднее значение четырех...

1
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
04.12.2013, 14:32
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
function gcm(m,rt,rs:real):real;
begin
gcm:=m*(4*rt*rt+5*rs*rs)/8
end;
var i:integer;
    m,rt,rs,sr:real;
begin
writeln('Введите параметры 4х торов');
sr:=0;
for i:=1 to 4 do
 begin
  write('Масса=');read(m);
  write('Радиус тора=');read(rt);
  write('Радиус поперечного сечения=');read(rs);
  sr:=sr+gcm(m,rt,rs);
 end;
sr:=sr/4;
write('Среднее арифметическое главного центрального момента инерции=',sr:0:2)
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
04.12.2013, 14:32
Помогаю со студенческими работами здесь

Найти среднее значение двумерного массива. Найти среднее значение каждой строки
#include <cs50.h> #include <stdio.h> int main(void){ FILE*f; f = fopen("file", "w"); int x=2; int y=6; int...

Найти среднее арифметическое четырёх чисел
Решил написать маленькую программульку, которая находила бы среднее арифметическое из четырёх чисел ( от двух до пяти). Не работает. Что я...

Определить среднее значение всех элементов, значение которых превышает среднее для массива
в произвольно заданном одномерном массиве определить среднее значение всех элементов, значение которых превышает среднее значение....

Найти среднее арифметическое элементов, расположенных в четырех углах
Заполнить с клавиатуры двумерный массив на 16 элементов. Найти среднее арифметическое элементов, расположенных в четырех углах.

Найти среднее арифметическое элементов, расположенных в четырех углах массива
не могу разобраться,написал под условие,скобки расставил вроде верно,но выдается огромный ответ! вот условие: Дан двумерный массив. Найти...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru