IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> !HELP! 2 графика по данным из файлов !HELP!, мозг кипит...помогите
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 10
Пол: Женский
Реальное имя: Ольга

Репутация: -  0  +



program gjhg;
uses graph;
const n=100;
h=10;
g=9.8;
m=4;
l=15;
v=10;
p=1000;
c=2;
k=3;
var driver,mode,i,,j:integer;
var tm,fi0,fi1,w1,w0,t,dt:real;
f,e:text;
begin
dt:=0.00001;
tm:=20;
fi0:=pi/6;
w0:=0;
assign(f,'dta');
rewrite(f);
assign(e,'atd');
rewrite(e);
while t<tm do
begin
if sin(fi0)<=(h/l) then
begin
w1:=w0+(dt/sqr(l)/m)*(-c*fi0-m*g*sin(fi0)*l);
fi1:=fi0+w0*dt;
fi0:=fi1;
w0:=w1;
t:=t+dt;
end
else begin
w1:=w0+(dt/m/sqr(l))*(-c*fi0-m*g*sin(fi0)*l-k*w0*sqr(l));
fi1:=fi0+w0*dt;
fi0:=fi1;
w0:=w1;
t:=t+dt;
end;
j:=j+1;
if j mod 1000=0 then
begin
writeln(e,t,fi1);
writeln(f,t,w1);
j:=0;
end;
end;
close(f);
close(e);
end.


далее нужно строить график, помогите разобраться...если можно то прям щас smile.gif blush.gif

Сообщение отредактировано: Zopaa -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Я.
****

Группа: Пользователи
Сообщений: 809
Пол: Мужской
Реальное имя: Саша

Репутация: -  11  +


.... , разделяй программу на логические блоки - процедуры и ф-ции, выделяй отступы - ничего не понятно.

volvo, я где-то видел ссылку по которой объяснялось как вмонтировать графические файлы в ехе, не мог бы ее скинуть?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Уникум
*******

Группа: Пользователи
Сообщений: 6 823
Пол: Мужской
Реальное имя: Лопáрь (Андрей)

Репутация: -  159  +


Цитата(sheka @ 31.05.2009 13:00) *
вмонтировать графические файлы в ехе
Что ты имеешь в виду под графическими файлами?.. bgi? И зачем тебе это здесь? Уточни, плз.


--------------------
я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Я.
****

Группа: Пользователи
Сообщений: 809
Пол: Мужской
Реальное имя: Саша

Репутация: -  11  +


Цитата(Lapp @ 31.05.2009 12:09) *

Что ты имеешь в виду под графическими файлами?.. bgi?

да, bgi,tpu итд.

просто если прога готова, то с ней надо в папке носить эти файлы - что очень не удобно и иногда они "куда-то деваются".

volvo, я тебя вообще не понимаю, так как ничего этого не знаю!
в том посте было достаточно подробно описано(хотя и там ничего почти не понял), но хочу разобраться.

и еще маленький вопрос не по теме - почему прога сделаная не делфи на ноутбуках работает, а сделаная на паскале - нет?

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Zopaa   !HELP! 2 графика по данным из файлов !HELP!   29.05.2009 2:25
amega   График с файла   29.05.2009 2:57
Zopaa   я это видела, но что-то у меня не получается...он …   29.05.2009 3:01
Krjuger   А ты выложи весь код уже с графикой,а то каким обр…   29.05.2009 3:15
Zopaa   я творила творила, и закрыла не сохроняя..   29.05.2009 3:18
Zopaa   program gjhg; uses graph; const n=100; xgm…   29.05.2009 19:38
Zopaa   ну кто-нибудь...ну не получается у меня...   30.05.2009 3:26
Krjuger   Ну ты хоть напиши,что имено не работает,не запуска…   30.05.2009 3:34
Zopaa   ну в программе видно, в файл f записывается t и w1…   30.05.2009 3:43
Lapp   Дорогая Zopaa (кхм..), очень тебе не повезло с ник…   30.05.2009 8:47
Lapp   Уважаемая Zopaa, объясни еще раз - чего ты хочешь?…   30.05.2009 10:00
Krjuger   В нем все так,но как я понял ей надо график на гра…   30.05.2009 16:07
Zopaa   во-первых я не могу сооброзить как построить второ…   30.05.2009 16:34
Krjuger   Вообще главная задача программы,чтобы работала,нас…   30.05.2009 20:17
Lapp   насчет красиво,тогда поясни,что в твоем понимании …   31.05.2009 10:40
volvo   Это что за фигня? Нет мерцания в граф. режимах... …   30.05.2009 20:24
Krjuger   Дадада,убрал,просто отаблицу самому было ленно пи…   30.05.2009 20:35
Krjuger   Lapp,ну знаеш ли,мой ник тоже не блещет красотой,а…   31.05.2009 14:56
sheka   привликает к ней внимание. :lol: :blum: смайлы…   31.05.2009 15:35
Krjuger   Ну как я понял она в первом куске вычисляет коорди…   31.05.2009 15:41
sheka   .... , разделяй программу на логические блоки - пр…   31.05.2009 16:00
Lapp   вмонтировать графические файлы в ехеЧто ты имеешь …   31.05.2009 16:09
sheka   Что ты имеешь в виду под графическими файлами?.. …   31.05.2009 16:36
volvo   Очень просто, так же, как и вмонтировать драйверы …   31.05.2009 16:11
volvo   Разбирайся: http://volvo71.narod.ru/faq_folder/bgi…   31.05.2009 16:44
Zopaa   program gjhg; uses graph; const n=30; xgmin…   1.06.2009 4:11
Lapp   почему он не хочет что-либо строить..где ошибка?? …   1.06.2009 9:38


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 5:26
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name