Помогите пожалуйста нарисовать в Паскале.
Решение.. пожалуйста
Предмет:
ИнформатикаАвтор:
kaseyuzr6Сразу предупрездаю - это Чернобыльский Волк и поэтому у него такой хвост ;))
Program ChernobylWolf; {Волк-Чернобылец}Uses Crt,GraphABC;const n=7;type Point=record x,y:integer; end; poly=array[1..n] of Point;var a:poly;begin SetWindowSize(800,600); Rectangle(300,300,400,250); // Пузо Circle(400,200,55); // Голова Line(265,170,355,170); // Морда Line(250,220,355,220); // Морда Line(250,220,250,185); Arc(250, 172,15 ,0 ,270); // Нос Line(345,220,255,240); //Нижний Пасть MoveTo(255,240); // Зубы LineTo(255,230); // Зубы LineTo(270,238); // Зубы LineTo(271,226); // Зубы LineTo(291,231); // Зубы LineTo(292,221); // Зубы LineTo(310,227); // Зубы LineTo(311,220); // Зубы LineTo(320,228); // Зубы Circle(380,175,15); // Глаза Circle(373,175,8); // Глаза FloodFill(373,176,clBlack); // Глаза MoveTo(310,280); // Левая нога LineTo(290,320); // Левая нога LineTo(330,320); // Левая нога LineTo(310,280); // Левая нога MoveTo(390,280); // Правая Нога LineTo(370,320); // Правая Нога LineTo(410,320); // Правая Нога LineTo(390,280); // Правая Нога MoveTo(375,150); // Ухи LineTo(390,120);// Ухи LineTo(409,146);// Ухи LineTo(422,146);// Ухи LineTo(440,120);// Ухи LineTo(440,162);// Ухи // Многострадальный хвост Терпения и времени не хватило уже a[1].x:=300; a[1].y:=250; a[2].x:=290; a[2].y:=275; a[3].x:=270; a[3].y:=290; a[4].x:=250; a[4].y:=310; a[5].x:=250; a[5].y:=275; a[6].x:=270; a[6].y:=250; a[7].x:=300; a[7].y:=250; PolyLine(a,7);end.
Автор:
ayaanigqkДобавить свой ответ
1) В треугольнике ABC проведены биссектрисы AD и BF. Угол <BAD = 20 ; <FBA = 40
Найти < ACB
________________________________________________________________
2) Данo A || B, C n A C n B, <1 - ?
PS: n - какой то знак, точно не помню, забыл, напоминает дугу :(
________________________________________________________________
3) В выпуклом четырёх угольнике ABCD, диагонали AC и BD пересикаются в точке O, причём OA = OC, <OAD = <OCB, BC = 12, Перимитер треугольника COD = 24, a Перимитер треуголька AOD = 28.
[Доказать что ABCD - паралелограмм и Найти перимитер ABCD]
AO = OC
Заранее огромное спасибо Друзья :)
Доклад на тему "Простые механизмы в технике". Физика 7 класс. Заранее спасибо :3
Предмет:
ФизикаАвтор:
mackenziejaumОтветов:
Смотреть
Помогите пож!!!!!Очень нужно!!!!Надо написать сочинение на тему "Я ЕМ,ЧТОБЫ ЖИТЬ,НО НЕ ЖИВУ ЧТОБЫ ЕСТЬ"10 ОЧЕНЬ КОРОТКИХ ПРЕДЛОЖЕНИЙ О ВИТАМИНАХ ....МОЖНО И ПО ПЛАНУ:
1)ЧТО ТАКОЕ ВИТАМИНЫ?
2)ЗАЧЕМ ОНИ НУЖНЫ ЛЮДЯМ?
3)ЧТО НУЖНО ЕСТЬ ЛЮДЯМ ,ЧТОБЫ БЫТЬ ЗДОРОВЫМИ?
нужно ну очень короткие предложения,потому что это на пересказ!!!Помогите,очень нужно!!!!!!!!!!!!на английском языке!
Предмет:
Английский языкАвтор:
nora46Ответов:
Смотреть