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

Составить программу инициализации графического режима, предварительно выполнив тестирование графического адаптера

12.01.2014, 20:55. Показов 2289. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте! Вот, попалась не простая(по моему субъективному мнению) задача, которую я совершенно не понимаю как решить.

Звучит она так: Составить программу инициализации графического режима, предварительно выполнив тестирование графического адаптера. Выполнить построение линии, окружности, эллипса, прямоугольника, многоугольника.

Если кто-то может помочь, я вас очень прошу, помогите пожалуйста!
Заранее спасибо!!!
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.01.2014, 20:55
Ответы с готовыми решениями:

Нет инициализации графического режима в BorlandC++ под ДОС
Привет всем,проблема такая после относительно долгих вычислений стараюсь инициализировать графический режим,но он выдает ошибку - Not...

Написать интересную программу с применением функций и процедур графического режима
Надо написать интересную (на ваш взгляд) программу с применением функций и процедур графического режима.

Версия графического адаптера не поддерживается
Samsung R425 JU04 ИД оборудования PCI\VEN_1002&DEV_68E0&SUBSYS_C576144D&REV_00 PCI\VEN_1002&DEV_68E0&SUBSYS_C576144D ...

1
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
13.01.2014, 10:39
Лучший ответ Сообщение было отмечено Не лодырь как решение

Решение

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
uses graph;
var GraphDriver,GraphMode,r,d,x,y,i:integer;
    m:array[1..7] of pointtype;
    u:real;
begin
GraphDriver:=detect;
initgraph(GraphDriver,GraphMode,'D:\tp 7.0.bgi');
if grOk<>0 then
 begin
  writeln('Error!');
  readln;
  exit
 end;
line(100,100,getmaxX-100,100);
r:=50;
d:=getmaxX div 5;
y:=200;
x:=d;
circle(x,y,r);
x:=2*d;
ellipse(x,y,0,360,r+10,r);
x:=3*d;
rectangle(x-r-10,y-r,x+r+10,y+r);
x:=4*d;
u:=pi/2;
for i:=1 to 7 do
 begin
  m[i].x:=x+round(r*cos(u));
  m[i].y:=y-round(r*sin(u));
  u:=u+pi/3
 end;
drawpoly(7,m);
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.01.2014, 10:39
Помогаю со студенческими работами здесь

Обьем памяти графического адаптера
Доброго времени суток..) Почему при установке Xp объем памяти графического адаптера 1024 мб как на скрине... А при установке виндоус 7...

Установка драйвера интегрированого графического адаптера
Здравствуйте подскажите пожалуйста как установить драйверы для intel(r) g33/g31 express chipset family интегрированого видеоадаптера и...

Ошибка графического режима
Помогите плиз! как исправить ошибку? запускаю паскаль в графическом режиме и пишет http://s002.***********/i197/1004/73/caf37084b635.jpg ...

выход из графического режима
a 100 ;инициализация mov ah,00 ;графический режим 640*350 mov al,10 int 10 ...

Запуск графического режима
Поставил обычную декстопную elementary os, раньше ставил в виртуалку все норм было. Запускается почему то только в консольном режиме, не...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! в-строка - входное арифметическое выражение в инфиксной(обычной). . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru