МАТЕМАТИЧЕСКИЕ ОСНОВЫ ИНФОРМАТИКИ
Среда, 14.04.2021, 16:07
ГлавнаяРегистрацияВход Приветствую Вас Гость | RSS

Меню сайта

Категории раздела
Типы данных [1]
Операторы [1]
Математические функции [1]
Графика [2]
Модули [1]

Наш опрос
Какой язык программирования Вы изучаете
Всего ответов: 991

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа


Главная » Статьи » Знакомство с Паскаль » Графика

Рисование линии, прямоугольника, окружности

Рисование линии, прямоугольника, окружности

Пример 1

Программа, рисующая линию:

Program Line;
Uses GraphABC;

Begin
Line(100,100,350,350);
end.

Пример 2

Программа, рисующая прямоугольник:

Program Risunok;
Uses GraphABC;

Begin
Rectangle(100,100,250,250);
 end.

Пример 3

Программа, рисующая бирюзовый круг:

Program Krug;
Uses GraphABC;

Begin
SetBrushColor(clAqua );
Circle(50,100,30);
End.

Категория: Графика | Добавил: i_elf (19.10.2012)
Просмотров: 4941 | Комментарии: 1 | Рейтинг: 2.0/1
Всего комментариев: 1
0
1 Олька   [Материал]
а в одном это объединить? чтобы все в одной проге и заменяло друг друга нельзя?

Имя *:
Email *:
Код *:
Поиск

Друзья сайта
  • Творческий учитель
  • Сайт ООАКМР
  • Школьный сайт
  • Информатика учебник
  • МОИ

  • Copyright MyCorp © 2021 Сделать бесплатный сайт с uCoz