Информатика, опубликовано 2018-08-22 20:22:57 by Гость

Помогите нарисовать в паскале улыбающийся смайлик.

Ответ оставил Гость

X:=50;y:=150;
TextOut(x-30,y-50,смеётся);
Circle(x,y,30);
FloodFill(x,y,clYellow);
Circle(x+10,y-10,7);
Circle(x-10,y-10,7);
Arc(x,y,20,180,360);
Line(x-20,y,x+20,y);
FloodFill(x+1,y+1,clWhite);
Line(x-10,y,x-10,y+17);
Line(x,y,x,y+20);
Line(x+10,y,x+10,y+17);

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.