Нарисовать изображение спортивной гантельки - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 5.00/7:

audit578

	Нарисовать изображение спортивной гантельки 28.04.2014, 18:46. Показов 1355. Ответов 1 Метки нет (Все метки) Помогите, пожалуйста, нарисовать изображение спортивной гантельки в Паскале...

Лучшие ответы (1)

Сообщение: #6100535

cpp_developer

Эксперт

20123 / 5690 / 1417

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

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

Блог

28.04.2014, 18:46

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

Нарисовать изображение
Составить программу на Паскале, которая формирует на экране изображение:

Нарисовать изображение по образцу
Помогите изобразить картинку в Паскале. Ссылка на фото:

Нарисовать изображение, состоящее из кругов и прямоугольника
Составить программу, которая выводит на экран изображение, показанное на рисунке

Puporev

Почетный модератор

64315 / 47611 / 32743

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

Сообщений: 115,167

28.04.2014, 18:55

Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
uses graphABC;
var x1,x2,y:integer;
begin
x1:=windowwidth div 3;
x2:=2*x1;
y:=windowheight div 2;
setbrushcolor(clBlack);
rectangle(x1,y-10,x2,y+10);
circle(x1,y,50);
circle(x2,y,50);
end.

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

raxper

Эксперт

30234 / 6612 / 1498

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

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

Блог

28.04.2014, 18:55

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

Нарисовать изображение
Нарисовать изображение, связанное с каким нибудь зданием , вашей группой или вами конкретно. Добавить смысловой текст.

нарисовать изображение
не знаю как сделать

Нарисовать изображение
Нарисуйте

Нарисовать изображение

Нарисовать изображение
Добавлено через 43 секунды помогите пожалуйста

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

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

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

Наверх