Поверхности.
Поверхности.
У нас наверно разная нумерация. Под номером 108 я вижу ваше ообщение
Последний раз редактировалось Draeden 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Draeden писал(а):Source of the post
У нас наверно разная нумерация. Под номером 108 я вижу ваше ообщение
Ой, и правда! Чудеса какие-то. Сейчас эти рисунки в #107 и #109. Они одинаковые. Наверное это направление и нужно дальше совершенствовать.
Эту картину нарисовали при помощи компьютера. Ho как?
Последний раз редактировалось Георгий 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Георгий, вы в компьютерные игры вообще не играли? Ha компьютерах и не такое нарисовать возможно.
Последний раз редактировалось }/{yk 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
He флудим. Напишите лучше уравнение какой нибудь поверхность чтобы мне было чем заняться
Последний раз редактировалось Draeden 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Дык, я старался набивал уравнение, проверял, понимаешь, a ты положил его под сукно и напеваешь опять арию: "A дайте, дайте мне поверхность!"
Последний раз редактировалось Георгий 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Георгий писал(а):Source of the post Можно и "Девятый вал" маслом написать! Ho KAK?
Вы думаете, это в двух словах в данной ветке можно объяснить?
Последний раз редактировалось }/{yk 29 ноя 2019, 12:38, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
M | He уходим от темы! |
A | He уходим от темы! |
Последний раз редактировалось AV_77 29 ноя 2019, 12:39, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Овалы Кассини:
xmax = 500
ymax = 500
scal = 3
For x = ss To xmax Step ss
For y = ss To ymax Step ss
xx = (x - 250) / scal
yy = -(y - 250) / scal
' chervyak
' k = ((xx ^ 2 + yy ^ 2) ^ 2 - 554 * (xx ^ 2 - yy ^ 2) - 14) / (xx - yy - 0.1)
'zmeya
'k = ((xx ^ 2 + yy ^ 2) ^ 2 - 1550 * (xx ^ 2 - yy ^ 2) - 14) / (xx + yy - 0.1)
'glaza k = ((xx ^ 2 + yy ^ 2) ^ 2 - 4000 * (xx ^ 2 - yy ^ 2) - 0) / y
k = ((xx ^ 2 + yy ^ 2) ^ 2 - 4000 * (xx ^ 2 - yy ^ 2) - 0) / y
k = Abs(k)
red = Abs(255 - 0.06 * k) Mod 255
green = Abs(255 - 0.07 * k) Mod 255
blue = Abs(255 - 0.04 * k) Mod 255
Col = RGB(red, green, blue)
If ss > 1 Then Line (x + 120, y)-Step(ss, ss), Col, BF
If ss = 1 Then PSet (x + 120, y), Col
Next y
Next x
Глаз - тоже овал. Ho какую же надо прогу составить, что так вот классно изобразить? Вооот как буржуи научились делать!
Треугольник - тоже достойная математическая поверхность:
Фотографии кругов, приведенные в журнале «Курьер» 21.10.2002, Бруклин, Нью-Йорк, N44 .
(эти круги сделаны кем-то на полях)
xmax = 500
ymax = 500
scal = 3
For x = ss To xmax Step ss
For y = ss To ymax Step ss
xx = (x - 250) / scal
yy = -(y - 250) / scal
' chervyak
' k = ((xx ^ 2 + yy ^ 2) ^ 2 - 554 * (xx ^ 2 - yy ^ 2) - 14) / (xx - yy - 0.1)
'zmeya
'k = ((xx ^ 2 + yy ^ 2) ^ 2 - 1550 * (xx ^ 2 - yy ^ 2) - 14) / (xx + yy - 0.1)
'glaza k = ((xx ^ 2 + yy ^ 2) ^ 2 - 4000 * (xx ^ 2 - yy ^ 2) - 0) / y
k = ((xx ^ 2 + yy ^ 2) ^ 2 - 4000 * (xx ^ 2 - yy ^ 2) - 0) / y
k = Abs(k)
red = Abs(255 - 0.06 * k) Mod 255
green = Abs(255 - 0.07 * k) Mod 255
blue = Abs(255 - 0.04 * k) Mod 255
Col = RGB(red, green, blue)
If ss > 1 Then Line (x + 120, y)-Step(ss, ss), Col, BF
If ss = 1 Then PSet (x + 120, y), Col
Next y
Next x
Глаз - тоже овал. Ho какую же надо прогу составить, что так вот классно изобразить? Вооот как буржуи научились делать!
Треугольник - тоже достойная математическая поверхность:
Фотографии кругов, приведенные в журнале «Курьер» 21.10.2002, Бруклин, Нью-Йорк, N44 .
(эти круги сделаны кем-то на полях)
Последний раз редактировалось Георгий 29 ноя 2019, 12:39, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Последний раз редактировалось vvvv 29 ноя 2019, 12:39, всего редактировалось 1 раз.
Причина: test
Причина: test
Поверхности.
Георгий, уравнение поверхности которое вы написали выглядит у меня совсем не так. Лучше напишите в математических терминах, без участия мэпла.
Насчёт овалов Кассини: это просто гибрид двух окружностей. Поверхности Бретзеля, Пилза из той же области.
Насчёт овалов Кассини: это просто гибрид двух окружностей. Поверхности Бретзеля, Пилза из той же области.
Последний раз редактировалось Draeden 29 ноя 2019, 12:39, всего редактировалось 1 раз.
Причина: test
Причина: test
Вернуться в «Computer Science»
Кто сейчас на форуме
Количество пользователей, которые сейчас просматривают этот форум: нет зарегистрированных пользователей и 16 гостей