СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Новогодний код: создаем елочку

Категория: Информатика

Нажмите, чтобы узнать подробности

Программа рисования новогодней елочки на PascalABC.Net  с использованием исполнителя GraphWPF. Шарики случайно меняют свой цвет

 

Просмотр содержимого документа
«Новогодний код: создаем елочку»

uses GraphWPF;

begin

Window.Title:='С Новым годом!';

Brush.Color := Colors.Green;

Pie(400, 300, 250, -45, -135);

Pie(400,200,200,-45,-135);

Pie(400,100,150,-45,-135);

repeat

Circle(430,180,20,RandomColor);

Circle(300,450,25,RandomColor);

Circle(450,350,20,RandomColor);

Circle(360,290,25,RandomColor);

Circle(480,480,25,RandomColor);

Circle(350,200,20,RandomColor); Rectangle(370,550,50,30,Colors.Brown);

Arc(400,240,250,-55,-125,Colors.Yellow);

Sleep(200);

until False;

end.