Ответы и объяснения

2013-05-14T21:20:57+04:00

В ПаскальABC:

рисунок улицы в цвете.. если не нужно делать в цвете, то просто убери соответствующие команды))
program domiki;
uses graphabc, crt;
var x:integer;
begin 
clearwindow (clskyblue);
for x:=30 to 450 do begin
x:=x+90;
line (x,70,x+30,40);
line (x+30,40,x+60,70);
line (x+60,70,x,70);
floodfill (x+30,60, clred);
setbrushcolor (clblue);
rectangle (x,70,x+60,120);
setbrushcolor (clyellow);
rectangle (x+20,90,x+40,100);
end;
line (0,120,640,120);
floodfill (10,130, clgreen);
end.