Новое баловство с физическими процессами

Изображение пользователя Black_queen152.

Здесь будут заготовки программ, моделирующих какие-либо простые процессы. Может быть, когда-нибудь объединю их в одну.

1. Неупругое столкновение.
Программа моделирует абсолютно неупругое столкновение. Для примера в начале программы вводятся некоторые значения в ячейки П4 (скорость первого тела), П5 (масса первого тела), П7 (скорость второго тела - обязательно должна быть отрицательной, иначе оно улетит в загадочные дали за край экрана), П8 (масса второго тела), ПД - коэффициент, на который умножается скорость для более удобного рассмотрения на экране МК [чем он больше, тем быстрее проходит процесс на экране], ПС - коэффициент пропорциональности между массами тел и их размерами [для наглядности].
После показа мультфильма про два удивительных чёрных квадрата, символизирующих тела, программа останавливается и показывает скорость, с которой они начинают двигаться после неупругого столкновения.
Запуск программы.
Чтобы просмотреть пример, просто запустите её. Чтобы ввести свои значения, нужно стереть первые 15 шагов [или выполнить, например, БП 50, чтобы пропустить задания данных для примера] и программно или вручную задать новые значения П4,П5,П7,П8,ПС,ПД, а затем выполнить программу.
Скрытые возможности программы.
При некоторой доле воображения можно увидеть при выполнении программы много захватывающих сюжетов.
1 сюжет. Данные для примера:
10 -> П4, 10 -> П5, -05 -> П7, 02 -> П8.
Если вообразить себе, что более тяжёлое тело - это автомобиль, а более лёгкое - человек, можно увидеть видеозапись трагедии: машина сбила пешехода.
2 сюжет. Данные для примера:
00 -> П4, 10 -> П5, -10 -> П7, 01 -> П8.
Если вообразить, что тяжёлое тело - человек, а лёгкое - пуля, то мы увидим военную хронику: кого-то пристрелили.
3 сюжет. Данные для примера:
05 -> П4, 05 -> П5, -05 -> П7, 05 -> П8.
Если представить, что тела - это две одинаковые машины, мы увидим аварию. Этот сюжет бесконечен, потому что скорость тел после столкновения нулевая и они никогда не улетят с экрана.

Почему-то весёлых интерпретаций не придумывается, один чёрный юмор... депрессия, однако.

Оценка: 4 (Голосов 1)
Прикрепленный файлРазмер
Неупругое столкновение401 байта

Настройки просмотра комментариев

Выберите нужный метод показа комментариев и нажмите "Сохранить установки".
А что так Автор: SMB
Еще можно Автор: Vitasam
Жаль что нет Автор: khusamov
mk.exe Автор: AtH
Как так? Автор: AtH
Я *.exe запускал Автор: khusamov
Компилятор Автор: AtH
Так, верно я Автор: khusamov
Декомпилятор Автор: AtH
Проблема в том, Автор: Vitasam
Хэк Автор: AtH
Роскошь Автор: AtH
Меню Автор: SMB
попробуйте Автор: khusamov