Подробнее о заявке
Предмет Pascal
Заявка номер Private
Стоимость 382 руб.
Уникальность 70%
Объем 30 стр.
Дата заявки: 17.06.2017
Выполнено: 20.06.2017
Решение задач по Pascal:

«Сделать чтобы облака плыли сначало и след не оставался»

Задание

program graphic; uses graphABC; { подключаем модуль GraphABC для работы } var

j,i:integer; begin {начало основного блока операторов программы}

//дом rectangle(150,150,350,350); floodfill(151,250,clbrown); rectangle(210,210,290,290); rectangle(210,210,250,290); floodfill(215,230,clYellow); floodfill(251,251,clblue); Rectangle(250,210,290,290); floodfill(251,215,clYellow); line(250,210,250,290); line(210,250,290,250); line(150,150,250,50); line(250,50,350,150); floodfill(250,60,clblack); //облака

//фон,солнце floodfill(0,0,cllightgreen); circle(640,0,100); floodfill(630,1,clyellow); //заборчик rectangle(0,270,150,280); floodfill(1,271,clblack); rectangle(350,270,640,280); floodfill(351,271,clblack); rectangle(0,320,150,330); floodfill(1,321,clblack); rectangle(350,320,640,330); floodfill(351,321,clblack); rectangle(1,250,11,350); floodfill(2,301,clblack); rectangle(16,250,26,350); floodfill(17,301,clblack); rectangle(31,250,41,350); floodfill(32,301,clblack); rectangle(46,250,56,350); floodfill(47,301,clblack); rectangle(61,250,71,350); floodfill(62,301,clblack); rectangle(76,250,86,350); floodfill(81,301,clblack); rectangle(91,250,101,350); floodfill(92,301,clblack); rectangle(106,250,116,350); floodfill(111,301,clblack); rectangle(121,250,131,350); floodfill(126,301,clblack); rectangle(136,250,146,350); floodfill(141,301,clblack); rectangle(351,250,361,350); floodfill(352,301,clblack); rectangle(366,250,376,350); floodfill(367,301,clblack); rectangle(381,250,391,350); floodfill(382,301,clblack); rectangle(396,250,406,350); floodfill(397,301,clblack); rectangle(411,250,421,350); floodfill(412,301,clblack); rectangle(426,250,436,350); floodfill(431,301,clblack); rectangle(441,250,451,350); floodfill(442,301,clblack); rectangle(456,250,466,350); floodfill(461,301,clblack); rectangle(471,250,481,350); floodfill(476,301,clblack); rectangle(486,250,496,350); floodfill(491,301,clblack); rectangle(501,250,511,350); floodfill(502,301,clblack); rectangle(516,250,526,350); floodfill(517,301,clblack); rectangle(531,250,541,350); floodfill(532,301,clblack); rectangle(546,250,556,350); floodfill(547,301,clblack); rectangle(561,250,571,350); floodfill(562,301,clblack); rectangle(576,250,586,350); floodfill(581,301,clblack); rectangle(591,250,601,350); floodfill(592,301,clblack); rectangle(606,250,616,350); floodfill(611,301,clblack); rectangle(621,250,631,350); floodfill(626,301,clblack); rectangle(636,250,640,350); floodfill(637,301,clblack); //ступеньки rectangle(350,300,380,350); floodfill(351,301,clbrown); rectangle(380,315,410,350); floodfill(381,321,clbrown); rectangle(410,330,440,350); floodfill(411,341,clbrown); //дорога rectangle(0,350,640,480); floodfill(1,351,clgray); rectangle(3,400,50,430); floodfill(10,401,clwhite); rectangle(60,400,110,430); floodfill(61,401,clwhite); rectangle(120,400,170,430); floodfill(121,401,clwhite); rectangle(180,400,230,430); floodfill(182,401,clwhite); rectangle(240,400,290,430); floodfill(241,401,clwhite); rectangle(300,400,350,430); floodfill(301,401,clwhite); rectangle(360,400,410,430); floodfill(362,401,clwhite); rectangle(420,400,470,430); floodfill(421,401,clwhite); rectangle(480,400,530,430); floodfill(481,401,clwhite); rectangle(540,400,590,430); floodfill(541,401,clwhite); rectangle(600,400,640,430); floodfill(601,401,clwhite);

for i:=10 to 300 do begin

//LockDrawing; circle(320+i,70,30); circle(370+i,70,45); circle(420+i,70,30); circle(520+i,90,30); circle(570+i,90,45); circle(620+i,90,30); end; //дом

for i:=1 to 80 do begin //UnLockDrawing; //SetSmoothingOn; //LockDrawing; // SetPenColor(clblue); rectangle(210,210,250-i,290); if abs(250-i-210)>5 then floodfill(round((210+(250-i))/2),230,cl

Читать больше
Срок выполнения:
  • Бесплатные корректировки
  • Шпаргалки в подарок!
  • Предоплата всего 25%
от 2 дней
Похожие заявки по pascal

Тип: Решение задач

Предмет: Pascal

4 Задачи в PascalABC.NET

Стоимость: 413 руб.

Тип: Решение задач

Предмет: Pascal

Табель расхода материала завода РТИ за « » 2012 год

Стоимость: 406 руб.

Тип: Решение задач

Предмет: Pascal

Составить программу вычисления периметра

Стоимость: 357 руб.

Тип: Решение задач

Предмет: Pascal

Паскаль

Стоимость: 343 руб.

Тип: Решение задач

Предмет: Pascal

Решение задач на языке Pascal + блок-схемы алгоритмов

Стоимость: 378 руб.

Тип: Решение задач

Предмет: Pascal

Решение задач на языке Pascal + блок-схемы алгоритмов

Стоимость: 360,5 руб.

Тип: Решение задач

Предмет: Pascal

Паскаль 9 класс

Стоимость: 385 руб.

Тип: Решение задач

Предмет: Pascal

Решение задач на Паскале

Стоимость: 402,5 руб.

Закажи Решение задач с полным сопровождением до защиты!
Думаете, что скачать готовую работу — это хороший вариант? Лучше закажите уникальную и сдайте её с первого раза!

Отзывы студентов

Елена 28.10.2024
Быстро выполнили заказ. Менеджер ответил на все вопросы.
Глотова Анастасия Викторовна 03.12.2022
Работа принята преподавателем. Спасибо большое за помощь!
Кристина 18.03.2022
спасибо огромное все расписано так что не вызвало вопросов у преподователя
Ксения 14.02.2022
Работу приняли без нареканий, всё супер
Алёна 08.12.2021
Все отлично спасибо. Заказать и Получить свою работу за один день можно только у Вас, Вы ЛУЧШИЕ!!!
Мария 29.12.2020
Оценка отлично, Вы супер!)))
Светлана 27.04.2020
4 комментария нет,спасибо!
Светлана 14.03.2020
Отправила запрос, мне позвонили уточнили все подробности. Молодой человек был вежлив, кратко и четко всё узнал и отправ…
Николай 06.05.2019
Огромное спасибо! Особенно за разъяснения к решению!
Сентебов Виктор 16.06.2018
Сделано все отлично и в срок, рекомендую. отдельное спасибо менеджеру Хроменкова Екатерина
Лайфхаки по написанию самостоятельных работ
Расчетно-графическая работа по фэн-шуй: правильное оформление РГР

  Ох, не о том думал студент, когда выбирал себе вуз. Кто ж хотел для себя такой доли, как написание РГР? А тем временем выполнить работу все же придется, причем по всем правилам. Без паники, дорогие друзья, да прибудем с вами мы! Читаем и впитываем.Итак, вот основные правила оформления расчетно-гр…

Читать дальше
Оформление магистерской диссертации по ГОСТу 2024: требования, пример

Как оформить магистерскую диссертацию в {{year}} году? Так же как и в прошлые годы, потому что никаких принципиально новых отличий от стандартов оформления прошлых лет для оформления магистерской диссертации в {{year}} году не вводится.Однако напомнить основные правила оформления будет не лишним. Н…

Читать дальше