Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.85/13: Рейтинг темы: голосов - 13, средняя оценка - 4.85
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23

Найти объем шара

25.11.2009, 23:24. Показов 2840. Ответов 11
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить программу для решения задачи:ввести с клавиатуры координаты точки А(x1;y1;z1),которая лежит на поверхности шара,и координаты точки В(x2;y2;z2),которая является центром шара.Найти объем шара.
Подскажите пожалуйста.Я сам пробовал но результат плачевный
Буду признателен ,если откликнитесь,мастера быстрого BASICа
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.11.2009, 23:24
Ответы с готовыми решениями:

Найти объём шара и площадь полной поверхности шара
Дан радиус шара. Найти объём шара и площадь полной поверхности шара. решите пожалуйста без всяких процедур,и всякого такого...

Найти объём шара как объём стопки круглых площадей
https://pp.vk.me/c837729/v837729171/b25d/gEjJd2ejwT4.jpg б) Рассмотрите шар как стопку из круглых площадей, которые сложены одна на...

Найти объем шара
Напишите функцию, возвращающую объем шара по заданному значению радиуса.

11
Платежеспособный зверь
 Аватар для кот Бегемот
8964 / 4387 / 1654
Регистрация: 28.10.2009
Сообщений: 11,645
26.11.2009, 00:02
Найди в учебнике по аналитической геометрии формулу вычисления расстояния между двумя точками в пространстве и подставь в неё координаты, получишь радиус.
0
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23
26.11.2009, 10:20  [ТС]
Я использовал R = SQR((( x2 - x1 ) ^ 2) * (( y2 - y1 ) ^ 2) * (( z2 - z1) ^ 2)),
может что-то не то делаю,но нет результата...
0
Платежеспособный зверь
 Аватар для кот Бегемот
8964 / 4387 / 1654
Регистрация: 28.10.2009
Сообщений: 11,645
26.11.2009, 10:49
А разве там умножить? А не сложить?
0
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23
26.11.2009, 18:19  [ТС]
да умножить нужно...но не выходит...все время объем НУЛЮ равен получается...
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
26.11.2009, 18:22
Smerymanl, если у тебя хоть одно из равенств:
х1=х2
у1=у2
z1=z2
выполняется, то...
по твоей формуле
Цитата Сообщение от Smerymanl Посмотреть сообщение
все время объем НУЛЮ равен получается...
толи с формулой чо не так, толи кто-то не прав
1
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23
26.11.2009, 18:39  [ТС]
странно,но при смене даже знака "*" на "+",все же V = 0....
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
26.11.2009, 19:03
Smerymanl, вылож то что ты напрограммировал
1
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23
26.11.2009, 19:20  [ТС]
PureBasic
1
2
3
4
5
ClS
INPUT "Ведите координаты точки A";A
INPUT "Ведите координаты точки B";B
R = SQR((( x2 - x1 ) ^ 2) * (( y2 - y1 ) ^ 2) * (( z2 - z1) ^ 2))
V = ( 4 / 3 ) * 3.14 * R ^ 3
? V
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
26.11.2009, 21:22
Smerymanl, а где ты данные х1 ... й2 вводишь?

Добавлено через 56 секунд
и нафик тебе вводить А и Б? они ж давно с трубы свалились

Добавлено через 2 минуты
PureBasic
1
2
3
4
5
6
7
8
9
10
11
CLS
INPUT "Ведите координаты точки x1";x1
INPUT "Ведите координаты точки y1";y1
INPUT "Ведите координаты точки z1";z1
INPUT "Ведите координаты точки x2";x2
INPUT "Ведите координаты точки y2";y2
INPUT "Ведите координаты точки z2";z2
R = SQR((( x2 - x1 ) ^ 2) + (( y2 - y1 ) ^ 2) + (( z2 - z1) ^ 2))
V = ( 4 / 3 ) * 3.14 * R ^ 3
PRINT V
end
1
 Аватар для Smerymanl
0 / 0 / 0
Регистрация: 25.11.2009
Сообщений: 23
26.11.2009, 22:59  [ТС]
спасибо огромное...я бы сам не додумался
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
26.11.2009, 23:03
Smerymanl, не, можно, конечно, А и Б вводить, а потом их разделять на составляющие координаты
но все равно придется писать кусок программы для разбивки, и присваивать переменным ....
а так проще )))
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
26.11.2009, 23:03
Помогаю со студенческими работами здесь

Найти объём шара
Шар с диаметром в точке О касается плоскости в точке А.точка В лежит в плоскости касания.Найти объём шара если АВ=21см,ВО=29см

Найти объем и площадь шара.
#include "stdafx.h" #include "math.h" #include "conio.h" int _tmain(int argc, _TCHAR* argv) { double s,v,r; ...

Найти объем полого шара
Найти объем полого шара. Известны внешний и внутренний радиусы. Радиусы вводятся с клавиатуры.

С клавиатуры вводится радиус шара. Вычислить объем шара и площадь поверхности
помогите плиз, кто чем может.. очень надо сделать 2 проги на Visual Basic. 1. С клавиатуры вводится радиус шара. Вычислить объем шара и...

Дан радиус шара. Найти его объем
Дан радиус шара. Найти его объем.


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

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Новые блоги и статьи
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru