Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 17.01.2013
Сообщений: 3
1

Используя библиотеку графических примитивов построить узор

17.01.2013, 15:12. Просмотров 1093. Ответов 3
Метки нет (Все метки)

Используя библиотеку графических примитивов построить узор. Обязательно предусмотреть возможность изменения параметров рисунка (размеров, числа повторяющихся элементов и т.п.).
0
Миниатюры
Используя библиотеку графических примитивов построить узор  
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.01.2013, 15:12
Ответы с готовыми решениями:

Построить фигуру на основе нескольких вариантов графических примитивов
Подскажите пожалуйста, как парвильно написать эти задания

Построить изображение с использованием 5 различных графических примитивов и 5 различных стилей заполнения
Составить программу для построения изображения с использованием 5 различных графических примитивов...

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

Отображение графических примитивов
не подскажите как нарисовать круг, треугольник и домик. Ищу в интернете не как не могу найти(

3
Модератор
60276 / 45382 / 31317
Регистрация: 18.05.2008
Сообщений: 109,018
17.01.2013, 16:29 2
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
uses graphABC;
type point=record
           x,y:integer;
           end;
var a,y,i:integer;
procedure romb(x:integer);
var p:array[1..5] of point;
begin
p[1].x:=x;p[1].y:=y+a;
p[2].x:=x-a;p[2].y:=y;
p[3].x:=x; p[3].y:=y-a;
p[4].x:=x+a; p[4].y:=y;
p[5]:=p[1];
polygon(p,5);
end;
 
begin
a:=windowwidth div 10;
y:=windowheight div 2;
for i:=1 to 3 do
 begin
  romb(2*a+(i-1)*a);
  romb(windowwidth-2*a-(i-1)*a);
 end;
romb(windowwidth div 2);
end.
0
0 / 0 / 0
Регистрация: 17.01.2013
Сообщений: 3
17.01.2013, 16:36  [ТС] 3
Большое спасибо, можете попробывать еще 1 работу более сложную??!
0
Модератор
60276 / 45382 / 31317
Регистрация: 18.05.2008
Сообщений: 109,018
17.01.2013, 16:48 4
Форум всегда и для всех. Пишите, а уж решат или нет, как повезет. Только создавайте новую тему.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.01.2013, 16:48

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Распознавание графических примитивов
Посоветуйте пожалуйста алгоритмы распознавания геометрических фигур в зашумленном изображении...

Использование графических примитивов
Добрый вечер уважаемые форумчане! Необходима ваша помощь в решении следующей задачи. Требуется...

Рисование графических примитивов
Приложение, которое читает данные из файла о координатах и размерах различных графических...

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


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

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

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