Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.53/15: Рейтинг темы: голосов - 15, средняя оценка - 4.53
0 / 0 / 0
Регистрация: 08.05.2012
Сообщений: 4

Графика. Нарисовать движущуюся фигуру. Движение осуществляется снизу вверх

08.05.2012, 21:41. Показов 3002. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Напиши плиз задачу буду очень благодарен.

1)Нарисовать движущуюся фигуру. Движение осуществляется снизу вверх.
Название: 1.jpg
Просмотров: 429

Размер: 8.9 Кб
2)Написать программу, которая осуществляет поиск кратчайшего пути в графе.

Прошу очень надо, спасибо!
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.05.2012, 21:41
Ответы с готовыми решениями:

Нарисовать движущуюся фигуру. Движение осуществляется снизу вверх.
6. Нарисовать движущуюся фигуру. Движение осуществляется снизу вверх. Добавлено через 43 минуты Нарисовать движущуюся фигуру....

Нарисовать движущуюся фигуру
Здравствуйте скажите пожалуйста как с помощью цикла нарисовать фигуру и чтобы она двигалась слева на право.. покажите кусок кода пример...

Написать программу, которая вычерчивает на экране ракету, и перемещает фигуру снизу вверх
В общем есть такая задача: Написать программу, которая вычерчивает на экране ракету, и перемещает фигуру снизу вверх. Использовать...

3
0 / 0 / 0
Регистрация: 08.05.2012
Сообщений: 4
10.05.2012, 19:44  [ТС]
1) Уже не надо, спасибо!
0
 Аватар для Мaкc
39 / 39 / 20
Регистрация: 16.03.2012
Сообщений: 86
10.05.2012, 20:02
Кинь исходник первой задачи, глянуть хочу)
0
0 / 0 / 0
Регистрация: 08.05.2012
Сообщений: 4
10.05.2012, 20:08  [ТС]
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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
program z9;
uses crt,graph;
var a,b,i:integer;
begin
initgraph(a,b,'egavga.bgi');
a:=detect;
for i:= 700  downto -500 do
begin
moveto(200,100+i);
lineto(210,130+i);
 
moveto(210,130+i);
lineto(205,135+i);
 
moveto(205,135+i);
lineto(215,165+i);
 
moveto(215,165+i);
lineto(210,170+i);
 
moveto(210,170+i);
lineto(220,200+i);
 
moveto(200,100+i);
lineto(170,120+i);
 
moveto(170,120+i);
lineto(185,140+i);
 
moveto(185,140+i);
lineto(180,145+i);
 
moveto(180,145+i);
lineto(195,170+i);
 
moveto(195,170+i);
lineto(190,175+i);
 
moveto(190,175+i);
lineto(220,200+i);
 
delay (5);
 
clrscr;
end;
closegraph;
end.
Delay под себя ставить!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
10.05.2012, 20:08
Помогаю со студенческими работами здесь

Написать программу, которая вычерчивает на экране ракету, и перемещает фигуру снизу вверх. Использовать заливку цветом
Помогите пожалуйста, срочно нужно)

Как нарисовать фигуру и задать движение
Здраствуйте у меня Вопрос как сделать Начальное положение центр поверхности рисования и чтобы движение квадрата было между границами...

Графика: движение вверх и исчезание прямой около круга
Доброе время суток. Делаю небольшое задание по графике. Покажите, как сделать так, чтобы прямая около круга двигалась вверх и исчезала....

Графика: нарисовать элементарную фигуру с заливкой
Доброго времени суток! помогите нарисовать геометрическую фигуру (любую) з заливкой , например , красного цвета. по поиску прошелся -ничего...

Графика: Нарисовать геометрическую фигуру, которая будет раскрашена цветами спектра...
Здравствуйте, только знакомлюсь с Qt, к сожалению в кратчайшие сроки... Хотя, когда меня спрашивали) В общем поставлена задача в...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru