Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Нарисовать треугольник в Pascal'е

Khabibulin © (2006-11-06 14:15:00)
как математически нарисовать треугольник в Паскале? Например, есть сторона А=9,5 см., Б=4 см. и Г=4,8 см... Как это сделать? Помогите пожалуйста!!!

Anatoly Podgoretsky (2006-11-06 15:43:00) [1]
> Khabibulin (06.11.2006 15:06:14) [14]
А почему бы не попросить предподователся провести маленький ликбез, купить учебник по геометрии за начальные классы, там уже есть готовые формулы и разъяснения.А на форумах над этим будут только шутить, особенно если ты заявишь про свой знаменитый трехугольник, у которого одна сторона длиннее суммы двух других.-- С уважением,Анатолий Подгорецкий "Khabibulin" <masta.khabibulin@mail.ru> wrote in message news:1162811723.14@delphimaster.ru... Khabibulin (06.11.2006 15:06) [14] да я в курсе... :)))) но геометрия мне не дана.... а ж самому стыдно...------=_NextPart_000_0112_01C701B1.EB7570D0

DiamondShark (2006-11-06 15:29:00) [2]

> но геометрия мне не дана

даже в объёме теоремы Пифагора?!

| x^2 + y^2 = B^2
| (A-x)^2 + y^2 = C^2

подозреваю, что алгебра в объёме систем квадратных уравнений тоже :(

тогда, последняя надежда на системы линейных уравнений.

w=x^2
v=y^2

| w + v = B^2
| u + v = C^2
| u + w = A^2

x интересует только неотрицательный.

KilkennyCat (2006-11-06 15:14:00) [3]
Предлагаю сначала найти площадь треугольника.

Khabibulin (2006-11-06 15:06:00) [4]
да я в курсе... :)))) но геометрия мне не дана.... а ж самому стыдно...

DiamondShark (2006-11-06 14:53:00) [5]
И мы серьёзно.

Введём систему координат, такую, что одна из вершин лежит в начале СК, а одна из сторон лежит на оси Ox:

^
|
|
|
| /*\
| / \
|/ \
*------*---->

тогда координаты вершин будут (0,0), (A,0), (x,y)

Задача: найти x, y.
Чётвёртый класс, если не ошибаюсь.

Anatoly Podgoretsky (2006-11-06 14:46:00) [6]
> Khabibulin (06.11.2006 14:41:10) [10]
> блин, я серьезно, а вы.... :(((((

Вполне серьезно, таких небывает, а не евклидовское пространство видимо рано для тебя.

Anatoly Podgoretsky (2006-11-06 14:42:00) [7]
Вообще то LineTo, а остальное не относится к Дельфи, это в школу, предмет называется геометрия.

Khabibulin (2006-11-06 14:41:00) [8]
блин, я серьезно, а вы.... :(((((

Percent (2006-11-06 14:40:00) [9]
И что, такого нарисовать вообще не реально???

Да ты ж уже нарисовал. Зачем тебе Паскаль?

Percent (2006-11-06 14:39:00) [10]
таких треугольников не бывает.]

Но в военное время, говорят...

:-)

Khabibulin (2006-11-06 14:37:00) [11]
I\
I \
I \
A-> I \
I \ <-B
I \
I \
I_____\
^
|
C

допустим A=9,0см, B=13,5см, C=5см... (все приблизительно!).
И что, такого нарисовать вообще не реально???

DiamondShark (2006-11-06 14:32:00) [12]

> Например, есть сторона А=9,5 см., Б=4 см. и Г=4,8 см...
> Как это сделать?

никак.
таких треугольников не бывает.
по крайней мере, в евклидовом пространстве.

Array (2006-11-06 14:32:00) [13]
сори, не глянул
line(x1, y1, x2, y2 :integer);

Khabibulin (2006-11-06 14:31:00) [14]
с помощью линий то можно, ведь так? самое непонятное как нарисовать их под нужным углом (просщитать это все)... вот что мне надо...

Khabibulin (2006-11-06 14:27:00) [15]
но мне надо нарисовать его там... варианты то должны быть... верно?

Percent (2006-11-06 14:25:00) [16]
Паскаль не предназначен для рисования треугольников.

LineTo

Это Паскаль?

Array (2006-11-06 14:23:00) [17]
LineTo + F1

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »