![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
LLIypLLIyH |
![]()
Сообщение
#1
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: ![]() ![]() ![]() |
Пмогите зделать графику в паскале пожалста
y=|x-30|(в кубе)+40 я не могу понять как там |
мисс_граффити |
![]()
Сообщение
#2
|
![]() просто человек ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: ![]() ![]() ![]() |
поищи по форуму - была программка, рисующая график любой функции
-------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
LLIypLLIyH |
![]()
Сообщение
#3
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: ![]() ![]() ![]() |
|
volvo |
![]()
Сообщение
#4
|
Гость ![]() |
Показывай программу, которая
Цитата полосы рисует левые ... Мне просто интересно, как этого можно добиться... |
LLIypLLIyH |
![]()
Сообщение
#5
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: ![]() ![]() ![]() |
Показывай программу, которая ... Мне просто интересно, как этого можно добиться... Код program g; Uses Graph,crt; const { OPTIONS } shag=0.00001; lgr = -50; pgr = 50; zcrtX=320; zcrty=240; mtrX=40; mtrY=40; colorG=15; colorOXY=4; OXYminX=-200; OXYmaxX=200; OXYminY=-200; oxymaxY=200; Var grDriver : Integer; grMode : Integer; x,y:real; i:integer; Begin grDriver:=Detect; InitGraph(grDriver, grMode, 'E:\bp\bgi'); for i:=OXYminX to OXYmaxX do putpixel(zcrtX+i,zcrty,colorOXY); for i:=OXYminY to OXYmaxY do putpixel(zcrtX,zcrty-i,colorOXY); x:=lgr; while x<=pgr do begin if x<>0 then begin y:=abs((x-30)*(x-30)*(x-30))+40; putpixel(zcrtx+trunc(x*mtrX),zcrty-trunc(y*mtrY),colorg) end; x:=x+shag; end; readkey; closegraph; end. Сообщение отредактировано: LLIypLLIyH - 15.06.2008 12:38 |
volvo |
![]()
Сообщение
#6
|
Гость ![]() |
Ну, во-первых, у тебя выше записана функция |(x - 30)3| + 40, а тебе надо |x - 30|3 + 40 (хотя в принципе одно и то же, но чего бы не написать, как следует?)
Во-вторых, что за ограничение на X = 0? Там, где ты взял эту программу это ограничение нужно, здесь - нет... Ну, и наконец, ты смотрел, чему равен Y при X = -50? Константы поправь вот так: { OPTIONS } , может что-нибудь и получится... |
LLIypLLIyH |
![]()
Сообщение
#7
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: ![]() ![]() ![]() |
Ну, во-первых, у тебя выше записана функция |(x - 30)3| + 40, а тебе надо |x - 30|3 + 40 (хотя в принципе одно и то же, но чего бы не написать, как следует?) Во-вторых, что за ограничение на X = 0? Там, где ты взял эту программу это ограничение нужно, здесь - нет... Ну, и наконец, ты смотрел, чему равен Y при X = -50? Константы поправь вот так: { OPTIONS } , может что-нибудь и получится... Ещё нужно на осях написать цифры |
volvo |
![]()
Сообщение
#8
|
Гость ![]() |
Пользуйся поиском, наконец... Я лично выкладывал программу, которая пишет цифры на осях, и рисует стрелочки, так что не надо говорить, что этого нет на форуме... А в первом посте не было про цифры ничего...
Может, тебе еще понадобится, чтоб программа тебе дверь открывала, еду подогревала и тапочки приносила? ("Аппетит приходит во время еды" (С), правда? Тем более, если САМ ничего не делаешь, а только говоришь, что тебе НУЖНО... Нужно - делай.) |
![]() ![]() |
![]() |
Текстовая версия | 21.06.2025 22:35 |