Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Аленка-красотка
0 / 0 / 0
Регистрация: 27.05.2014
Сообщений: 4
#1

Изобразить две тележки, движущихся навстречу друг другу - Pascal ABC

31.05.2014, 15:34. Просмотров 403. Ответов 3
Метки нет (Все метки)

Изобразить две тележки, движущихся навстречу друг другу.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.05.2014, 15:34
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Изобразить две тележки, движущихся навстречу друг другу (Pascal ABC):

Вычисление времени встречи автомобилей, движущихся равноускоренно навстречу друг другу - Pascal ABC
: Составьте прорамму для вычисления времени t встречи автомобилей,движущихся равноускоренно навстречу друг другу,если известны их скорости...

Нарисовать перекресток, которым движутся навстречу друг другу две машины - Pascal ABC
Нарисовать перекресток, которым движутся навстречу друг другу две машины, скорость одной в два раза выше, чем другой. Рисунки можно...

Синхронное движение двух шариков навстречу друг другу - Pascal ABC
Суть задания такова, два шарика идут навстречу друг другу, сталкиваются и затем изменяя цвет укатываются обратно Мой набросок, но...

Определить время, через которое встретятся два пешехода, равномерно движущиеся навстречу друг другу - Pascal ABC
определить время, через которое встретятся два пешехода, которые равномерно движутся навстречу друг другу, если известно, что их скорости и...

Составить программу, которая органзовывает движение. Напрмер, две рыбы плывут параллельно друг другу на разной высоте. - Pascal ABC
Составить программу, которая органзовывает движение. Напрмер, одна рыба проглатывает другую (т.е. приближатся к ней) Что-то типо этого. ...

Изобразить два движущихся навстречу друг другу закрашенных шарика - Pascal
Изобразить два движущихся навстречу друг другу закрашенных шарика. Движение прерывается после столкновения или достижения границ экрана....

3
magirus
Почетный модератор
Эксперт по компьютерным сетямЭксперт Windows
27746 / 15653 / 946
Регистрация: 15.09.2009
Сообщений: 67,839
Записей в блоге: 78
31.05.2014, 15:38 #2
ну начинай, красотка...
0
Аленка-красотка
0 / 0 / 0
Регистрация: 27.05.2014
Сообщений: 4
31.05.2014, 15:49  [ТС] #3
Помогите, пожалуйста, написать программу
0
Puporev
Модератор
54037 / 41670 / 14750
Регистрация: 18.05.2008
Сообщений: 97,986
31.05.2014, 16:19 #4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
uses graphABC;
procedure telezka(x,y:integer);
begin
rectangle(x-30,y-15,x+30,y+15);
circle(x-20,y+25,10);
circle(x+20,y+25,10);
end;
var x1,x2,y:integer;
begin
x1:=30;
x2:=windowwidth-30;
y:=windowheight div 2;
telezka(x1,y);
telezka(x2,y);
lockdrawing;
repeat
sleep(100);
clearwindow;
x1:=x1+5;
x2:=x2-5;
telezka(x1,y);
telezka(x2,y);
redraw;
until x2-x1<=60;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.05.2014, 16:19
Привет! Вот еще темы с ответами:

Две рамки перемещаются по диагонале на встречу друг к другу к полному совпадению с интервалом 0.7 сек за шаг - Pascal
Доброго времени суток, помогите решить данную задачу, буду очень благодарен. Ниже расширенное условие задачи. Две рамки, изначально...

Определить, угрожают ли ферзи друг другу - Pascal
На шахматной доске стоят белый и черный ферзи (ферзь бьет по вертикали, горизонтали и диагонали). Их координаты заданы парами чисел (х1,...

Проверить, даны ли два слова обратными друг к другу - Pascal
Проверить, даны ли два слова обратными друг к другу, то есть первое читается слева направо так же, как второе справа налево.

когда часовая и минутная стрелки на циферблате расположатся перпендикулярно друг к другу - Pascal
Даны целые числа m и n (0&lt;m&lt;=12) (0&lt;=n&lt;60) указывающие момент времени:&quot;m часов и n минут&quot;. Определить наименьшее время(число полных...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru