Неупругое столкновение
Главная / ЭКВМ / Программы для ЭКВМ / Демонстрации

Неупругое столкновение

Программа моделирует абсолютно неупругое столкновение.

Для примера в начале программы вводятся некоторые значения в ячейки П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.

Если представить, что тела - это две одинаковые машины, мы увидим аварию. Этот сюжет бесконечен, потому что скорость тел после столкновения нулевая и они никогда не улетят с экрана.



Программа "Неупругое столкновение"

  0 1 2 3 4 5 6 7 8 9
000 0 5 П 5 5 П 4 0 5 /-/ П 7 5
010 П 8 K НОП K НОП K НОП K НОП 1 П C 0 , 5
020 П D FFh FFh FFh FFh FFh FFh FFh FFh FFh
030 FFh FFh FFh FFh FFh FFh FFh FFh FFh FFh
040 FFh FFh FFh FFh FFh FFh FFh FFh FFh FFh
050 ИП 4 ИП 5 × ИП 7 ИП 8 × + ИП 5 ИП 8 +
060 П 6 ÷ П 9 1 2 8 П B FFh FFh FFh
070 2 PP П 90 10 0 П A K НОП 3 PP П 90
080 01 P ПП 01 05 P БП 01 40 FFh FFh FFh
090 FFh FFh FFh FFh FFh FFh FFh FFh FFh FFh
100 FFh FFh FFh FFh FFh 2 0 B↑ ИП A PP П
110 90 00 ИП 5 ИП C × B↑ PP П 90 13 2
120 0 B↑ K НОП K НОП K НОП ИП B K НОП PP П 90 00
130 ИП 8 ИП C × B↑ PP П 90 13 В/О FFh FFh
140 K ГРФ ПП 05 K НОП ИП A ИП 4 ИП D × + П A
150 ИП B ИП 7 ИП D × + П B ПП 05 ИП A ИП B
160 ИП 5 ИП C × - - ИП 8 ИП C × - F x≥0
170 40 ИП 9 П 4 П 7 ИП A F x≥0 90 1 2 8
180 - F x<0 90 1 2 7 - F x=0 40 K НОП
190 0 B↑ B↑ B↑ ИП 9 С/П FFh FFh FFh FFh

Контрольная сумма ADD 23688, контрольная сумма XOR 48 - при условии, что остальные байты содержат 0FFh.


Автор - Кушнарёва Л.

E-mail - K.Lidia(AT)list.ru
НПП "СЕМИКО" (383) 271-01-25 (многоканальный)