Предмет: Информатика,
автор: nvk31267
Надо сделать в паскальABC.net рисунок , что бы он был примерно как прикрепленный ниже, при этом, всё на рисунке должно стоять на месте, а облака рандомно перемещаться в области неба. Облаков должно быть 13 штук!
размер окна должен быть 800 на 600.
Ниже прикрепляю что у меня получилось на данный момент(1), рисунок из pait как должно быть(2) и чертёж на доске как должно быть
Приложения:
//домик
brush.color:=rgb(127,0,0);
pen.color:=rgb(127,0,0);
rectangle(100,400,300,500);
moveto(100,400);
lineto(200,300);
lineto(300,400);
floodfill(200,350,rgb(66,0,0));
//солнышко
brush.color:=clyellow;
pen.color:=clred;
circle(600,100,50);
//дерево
brush.color:=rgb(105,23,2);
pen.color:=rgb(105,23,2);
rectangle(500,400,530,500);
brush.color:=rgb(0,255,0);
pen.color:=rgb(0,255,0);
circle(515,350,100);
end.
brush.color:=rgb(127,0,0);
pen.color:=rgb(127,0,0);
rectangle(100,400,300,500);
moveto(100,400);
lineto(200,300);
lineto(300,400);
floodfill(200,350,rgb(66,0,0));
//солнышко
brush.color:=clyellow;
pen.color:=clred;
circle(600,100,50);
//дерево
brush.color:=rgb(105,23,2);
pen.color:=rgb(105,23,2);
rectangle(500,400,530,500);
brush.color:=rgb(0,255,0);
pen.color:=rgb(0,255,0);
circle(515,350,100);
end.
13 штук? Где их там разместить?
ну маленькие типо, как я понял
помоги пожалуйста :((((((((
Ответы
Автор ответа:
1
Сделал все кроме анимации, непонятно немного как она должна работать.
Приложения:
спасибо просто огромное !
Похожие вопросы
Предмет: Математика,
автор: anugmetganovna
Предмет: Литература,
автор: kolsundana37
Предмет: География,
автор: novruzovc90
Предмет: Математика,
автор: dedroomle
Предмет: Информатика,
автор: violettapogosova
uses graphABC;
begin
setwindowSize(800,600);
brush.color:=clgreen;
pen.color:=rgb(0,255,0);
rectangle(0,500,800,600);
//небо
brush.color:=rgb(58,192,255);
pen.color:=rgb(58,192,255);
rectangle(0,0,800,500);