|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.05.2009, 15:09 | #1 |
Новичок
Джуниор
Регистрация: 11.05.2009
Сообщений: 2
|
Ваше мнение
Курсач... типа собак гонится за зайцем. Vc=10mps, Vz=5mps. Собак меняет направление каждую секунду. Надо вывести примерную траекторию и таблицу координат.
uses Graph ; var j,y,xz2,xz1,xv1,yv1,xv2,yv2,i,gd,gm :integer; q,a,b,c:real; begin gd:=vga; gm:=vgahi; initgraph(gd,gm,''); if graphresult=grOk then begin q:=sqrt(2); y:=round(100/q); i:=0; xz1:=round(100/q); xv1:=0; yv1:=0; for j:=1 to 10 do writeln; writeln('xv yv xz yz'); repeat c:=sqrt(sqr(xz1-xv1)+sqr(yv1-y)); a:=xz1-xv1; b:=sqrt(sqr(c)-sqr(a)); yv2:=round(yv1+10*b/c); xv2:=round(xv1+10*a/c); xz2:=round(xz1+5); line(xz1,y,xz2,y); line(xv1,yv1,xv2,yv2); writeln(xv2,' ',yv2,' ',xz2,' ',y); xv1:=xv2; yv1:=yv2; xz1:=xz2; i:=i+1; until i>10; end; readln end. смотрите и издевайтесь |
11.05.2009, 15:59 | #2 |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Как я понимаю, прямая - это заяц, а кривая - собака?
Вот, чуть подправил, чтобы путь до конца выводился. Код:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
11.05.2009, 16:10 | #3 |
Новичок
Джуниор
Регистрация: 11.05.2009
Сообщений: 2
|
Спасибо большое, но там по заданию ток за первые 10 секунд. Сорри, что не до конца условие написал
|
11.05.2009, 16:24 | #4 | |
В тени
Старожил
Регистрация: 19.12.2008
Сообщений: 5,788
|
Цитата:
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль] |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нужно ваше мнение! | Sandra-z | Софт | 6 | 27.03.2009 23:45 |
ваше мнение | Мамочка | Свободное общение | 0 | 08.05.2008 13:46 |
Необходимо Ваше мнение!!! | DIMONHR | Софт | 0 | 20.02.2008 23:15 |