|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.04.2015, 21:50 | #1 |
Новичок
Джуниор
Регистрация: 09.04.2015
Сообщений: 1
|
как нужно изменить координаты что бы получить такой рисунок
uses
GraphABC; var x0,y0,x,y,r: integer; begin r:=60; y0:=0; y0:=0; x:=230; y:=230; line (x0,y0+500,x0+500,y0+300); line (x0+220,y0,x0+220,y0+700); circle (x,y,r); rectangle (x0+300,y0+300,x0+500,y0+300) end. |
10.04.2015, 12:26 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
у меня нет паскаля под рукой, проверить не могу!
а так не устроит? Код:
Последний раз редактировалось Serge_Bliznykov; 10.04.2015 в 12:28. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Что нужно изменить? | LuZer_86 | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 12.04.2011 21:19 |
как получить координаты курсора | Juffin | Общие вопросы Delphi | 2 | 12.05.2010 20:05 |
как нужно изменить код, что бы отображение картинок было корректным? | Garret13 | Помощь студентам | 0 | 10.05.2010 19:05 |
что тут нужно изменить? | asd48 | Общие вопросы C/C++ | 2 | 08.04.2009 21:47 |
Как мне в ListBox Добавить/Изменить рисунок (иконку)? | Рустам | Компоненты Delphi | 12 | 10.06.2008 18:54 |