Дизайн и креатив: разработка от профессионалов http://uptimecommerce.com/forum/ |
|
Помогите, пожалуйста, с Паскалем! http://uptimecommerce.com/forum/viewtopic.php?f=22&t=798 |
Страница 4 из 7 |
Автор: | Kirilll [ 12 янв 2010, 22:27 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
тааак.... вот етот кусок кода будет работать.. Const koor=25; Type exact=single; MyMas=longint; MyArray=array[1..koor,1..2] of MyMas; Var g1,g2,p,i,j,i0,j0,c,l,lol:integer; x,y,x1,x2,y1,y2,k,b:exact; stop:boolean; m:MyArray; init,out:text; d:longint; begin j:=2; p:=koor; stop:=false; assign(out,'out.txt'); rewrite(out); assign(init,'init.txt'); reset(init); i:=0; while not(Eoln(init)) do begin i:=i 1; read(init,d); m[i,1]:=d; end; i:=0; while not(Eof(init)) do begin i:=i 1; read(init,d); m[i,2]:=d; end; i:=1; end. а дальше надо разобратся) |
Автор: | YSA [ 12 янв 2010, 22:44 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
Так, окей, жду. Самой ничего в голову не лезет %)) |
Автор: | Kirilll [ 12 янв 2010, 22:46 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
ааа.. давай как нить завтра т.е. уже сегодня)) днем додумаю..) |
Автор: | YSA [ 12 янв 2010, 23:25 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
Хорошо, жду :) спасибо :) |
Автор: | YSA [ 13 янв 2010, 14:40 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
Хе-хей! Ну как там? :)) |
Автор: | Kirilll [ 13 янв 2010, 14:53 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
щяс... уроки сделаю и че нить сделаю...) |
Автор: | booster [ 13 янв 2010, 15:32 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
Доброго времени суток. Нужна срочная помощь в решении задачи в паскале: даны 2 окружности на плоскости.наша задача найти их все общие точки. Первые две строки входного фаила содержат описание окружностей.каждое описание состоит из трех целых чисел-координаты не превосходят 1000 по обсалютной величине. Радиус является положительным числом не превосходящим 1000. |
Автор: | booster [ 13 янв 2010, 15:33 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
если можно в личку.. |
Автор: | YSA [ 13 янв 2010, 20:05 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
Аууууу! |
Автор: | Kirilll [ 13 янв 2010, 20:09 ] |
Заголовок сообщения: | Re: Помогите, пожалуйста, с Паскалем! |
да...) блин напишы задачу поподробней.. то что я написал выше работает...а вторая часть кода нет..немогу разобратся.. мне легче самому написать но мне не очень понятна сама задача) |
Страница 4 из 7 | Часовой пояс: UTC |
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |