|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
23.03.2009, 19:29
|
#1 |
|
Регистрация: 23.03.2009
Сообщений: 3
|
Помогите написать текст программы
Написать программу, которая выводит круговую диаграмму, отражающую товарооборот (в процентах) книжного магазина. Исходные данные (объем продаж в рублях по категориям: книги, журналы, открытки и канцтовары) вводятся во время работы программы.
Просто совсем не работала с графикой в паскале... Натолкните хотя бы на мысль  Заранее спасибо |
|
|
|
23.03.2009, 19:30
|
#2 |
|
Регистрация: 23.03.2009
Сообщений: 3
|
Я понимаю,что всё сведется к шаблону:
Program имя; Uses Graph; var grDriver, grMode, errCode: integer; begin grDriver:= Detect; {определение номера, установленного в системе драйвера} initGraph (grDriver, grMode,''); {инициализация графического режима} if errCode= grOK then begin { режим открыт и можно работать} end else begin {графический режим не удалось открыть, проанализируйте содержание переменной errCode} end Но что то совсем ничего не получается((( |
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Помогите написать программы | Dima H2 | Фриланс | 8 | 22.11.2008 00:53 |
| Помогите написать программы на Delphi | Markovnik | Помощь студентам | 1 | 06.04.2008 11:29 |
| Помогите написать программы на с++ | =42na= | Помощь студентам | 4 | 27.11.2007 13:59 |
| Помогите написать 3 программы на Delphi | burunduk | Помощь студентам | 9 | 21.01.2007 14:02 |
