Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
1 / 1 / 0
Регистрация: 28.11.2009
Сообщений: 15

Тело брошено под углом

28.11.2009, 15:31. Показов 1255. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
народ помогите плиз решить на v бейсики
1 Тело брошено под углом. Задана начальная скорость и угол полета. Определить максимальную высоту полета.
2 В произвольно заданном двумерном массиве размера 4Х5 определить три элемента с наибольшими значениями.
ася 355160426
мыло wwwted@mail.ru
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
28.11.2009, 15:31
Ответы с готовыми решениями:

Нарисовать линию под углом
Нужно нарисовать линию под углом, угол заранее вводится в textBox. Незнаю как реализовать, помогите кто знает.

To Smalig: написание текста под углом
Хай, нашел в примерах то что мне надо - как написать текст под углом. http://www.relib.com/sources/code.asp?id=460 там в конце...

Подскажите как вывести текст в форме под углом
подскажите сабж, я то нашел один пример а он неработает, хотя и ошибок не выкидывает.

4
 Аватар для BasicMan
19318 / 2626 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
01.12.2009, 21:14
ты б формулы математические привел для 1
0
1 / 1 / 0
Регистрация: 28.11.2009
Сообщений: 15
02.12.2009, 22:27  [ТС]
Цитата Сообщение от CyberБурундукЪ Посмотреть сообщение
ты б формулы математические привел для 1
H = V^2 cos^2α/(2g)
я тут подумал плучилось что-то типо этого
"
Visual Basic
1
2
3
4
5
6
7
Dim a, v As Variant
Private Sub Command1_Click()
v = Val(Text1.Text)
a = Val(Text2.Text)
h = (v ^ 2 * Cos(a * 3.14 / 180) * Cos(a * 3.14 / 180)) / (2 * 9.8)
MsgBox (h)
End Sub
"
кто разбирается проверьте пожалуйста.
1
 Аватар для BasicMan
19318 / 2626 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
02.12.2009, 22:32
6 строка неправильно
Visual Basic
1
MsgBox h
Добавлено через 51 секунду
и формулу можно компактнее записать

h = (v * Cos(a * 3.14 / 180)) ^ 2 / 19.6

Добавлено через 58 секунд
а так - молодец
0
1 / 1 / 0
Регистрация: 28.11.2009
Сообщений: 15
03.12.2009, 14:33  [ТС]
Цитата Сообщение от CyberБурундукЪ Посмотреть сообщение
6 строка неправильно
Visual Basic
1
MsgBox h
Добавлено через 51 секунду
и формулу можно компактнее записать

h = (v * Cos(a * 3.14 / 180)) ^ 2 / 19.6

Добавлено через 58 секунд
а так - молодец
спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
03.12.2009, 14:33
Помогаю со студенческими работами здесь

Построить график тела, брошенного под углом к горизонту с автоподбором масштаба и меток
Доброго времени суток, котята. Есть приблизительный код Апостроффа, как его переделать только в отображение первой четверти и добавить...

Какова дальность полёта снаряда, выпущенного со скоростью V м/с под углом α к линии горизонта?
Пушка стреляет под углом α к линии горизонта. Начальная скорость V м/с. Какова дальность полёта снаряда?.(ускорение свободного ...

Кинематика: тело брошено под углом...
Простенькая задачка, но что-то я всё равно в ступоре.. Тело брошено со скоростью v0 под углом альфа. Найти v0 и альфа, если максимальная...

Визуализация физической задачи (тело брошено под углом к горизонту)
Подскажите пожалуйста как визуализировать физическую задачу (тело брошено под углом к горизонту) С физической частью вопросов нет а вот...

Тело брошено с башни высотой h вверх под углом к горизонту
Тело брошено с башни высотой h вверх под углом α к горизонту с начальной скоростью υо. Дальность бросания (по горизонтали) равна ...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Вывод данных через динамический список в справочнике
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Функция заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru