Нарисовать статическое изображение графическими средствами языка Pascal

15.01.2014, 22:10. Показов 940. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Здравствуйте форумчане!
Дано задание:
>Создать программу, реализующую графическими средствами языка программирования TurboPascal статическое изображение красное солнце с десятью выходящими лучами.
Шарик нарисовал, но как его разделить на десять частей лучами, не имею представления.
Была идея сделать с помощью процедуры Arc, но ввиду небольшого опыта (или криворукости), не знаю как это осуществить.
Помогите решить проблему?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program sid;
uses
Graph, Crt;
var
Driver, Mode:integer;
begin
Driver:=0;
Mode:=0;
InitGraph(Driver, Mode, '');
SetBkColor(1);
ClearDevice;
setcolor(2);
SetLineStyle(0, 0, 1);
Circle(100, 100, 30);
SetFillStyle(1, 15);
FloodFill(100, 100, 2);
Repeat
until KeyPressed;
Closegraph;
end.

Заранее спасибо!

Добавлено через 2 минуты
З.Ы.: Между лучами получается по 36 градусов.

Добавлено через 1 час 16 минут
Тема закрыта.

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

15.01.2014, 22:10

Ответы с готовыми решениями:

Реализация алгоритмов двоичного кодирования цифр средствами языка программирования Pascal
тема: Реализация алгоритмов двоичного кодирования цифр средствами языка программирования Pascal. 1. Общие требования к программе: - в...

Обработка файлов средствами языка Turbo Pascal
"Разработать две программы, выполняющие заданные последовательности действий над данными определенного типа с использованием файлов в...

Обработка файлов средствами языка Turbo Pascal
помогите написать программу. Плиз. Вариант 7

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

15.01.2014, 22:10

Помогаю со студенческими работами здесь

Лемниската - реализовать графическими средствами Паскаль
Необходимо графическими средствами построить лемнискату по формуле

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

Статическое изображение состоящее минимум из 30 объектов
 Составить программу, отображающую на экране статическое изображение состоящее минимум из 30 объектов, созданных с использованием минимум...

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

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

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

Наверх