Вклассе 1111(2) девочек и 1100 (2) мальчиков. сколько учеников в классе?

1111(2) = 1*2^0+1*2^1+1*2^2+1*2^3= 1+2+4+8=15 мальчиков

1100(2) = 0*2^0+0*2^1+1*2^2+1*2^3= 0+0+4+8=12 девочек15 мальчиков + 12 девочек = 27 учеников в классе. 

Program abc; uses graphabc; const       scale = 20;       step = 0.001; var       x0, y0, x1, y1: integer;       x, y, min, max, a, b, c: real; begin       setwindowsize(1000, 800);       drawinbuffer : = true;       //      write(' введите промежуток для функции(min значение-enter- max значение) ');       //      read(min, max);       writeln('a=');       read(a);       writeln('b=');       read(b);       writeln('c=');       read(c);             x0 : = windowwidth div 2;       y0 : = windowheight div 2;       line(20, y0, windowwidth - 20, y0);       line(x0, 20, x0, windowheight - 20);             min : = trunc((20 - x0) / scale);       max : = trunc((windowwidth - 20 - x0) / scale);             x : = min;       while x < = max do       begin               x1 : = trunc(x0 + x * scale);                             y : = a * x * x * x + b * x * x + c;               y1 : = trunc(y0 - y * scale);               putpixel(x1, y1, clgreen);                             y : = a * x * abs(sin(x));               y1 : = trunc(y0 - y * scale);               putpixel(x1, y1, clblue);                             x : = x + step;       end; end.

Держи. тут конечно нет гаража, но можно скопировать дом и подвинуть, перекрасить, сам подумай. трубы с дымом тоже нет зато есть черепахи и переливающееся солнце. думаю лучше чем ничего // pascalabc.net 3.1, сборка 1218 от 12.04.2016 uses graphabc; procedure sun(x, y: integer); begin   var c : = 8;     for var j : = 1 to 100 do   begin       var r : = 15 * c;       var k : = 0;       if j mod 2 = 0 then k : = 20;             for var i : = 0 to c do       begin           brush.color : = rgb(230 - k, 230 - k, 0);           circle(x, y, r);           k : = k + 15;           r : = r - 15;           sleep(100);       end;   end; end; procedure house(x, y: integer); begin   brush.color : = clbrown;   pen.color : = clburlywood;   var house_width : = 300;   var house_height : = 300;   var count : = 10;   var step : = round(house_width / count);     fillrectangle(x, y, x + house_width, y + house_height);     var xx : = x;   for var i : = 1 to count - 1 do   begin       xx : = xx + step;       line(xx, y, xx, y + house_height);   end;     brush.color : = clgray;   fillrectangle(x + 100, y + 100, x + 200, y + 210);   brush.color : = clyellow;   fillrectangle(x + 105, y + 105, x + 195, y + 150);   brush.color : = clred;   fillrectangle(x + 105, y + 155, x + 150, y + 205);   brush.color : = clblue;   fillrectangle(x + 155, y + 155, x + 195, y + 205);     moveto(x + house_width div 2, y - 80);   lineto(x + house_width, y, pen.color);   lineto(x, y, pen.color);   lineto(x + house_width div 2, y - 80, pen.color);   floodfill(x + house_width div 2, y - 10, clolive);     brush.color : = clred;   circle(x + house_width div 2, y - 35, 30); end; procedure turtoise(x, y: integer); begin   brush.color : = clgreen;   pen.color : = clgreen;   fillrectangle(x + 5, y + 15, x - 20, y + 24);   fillrectangle(x + 50, y, x + 30, y + 70);   fillrectangle(x + 100, y, x + 120, y + 70);   fillcircle(x + 170, y, 30);     brush.color : = clwhite;   fillcircle(x + 180, y - 20, 10);     brush.color : = clblack;   fillcircle(x + 182, y - 18, 2);   brush.color : = clred;   fillrectangle(x + 180, y, x + 200, y + 4);   brush.color : = clbrown;   fillellipse(x, y - 10, x + 150, y + 50); end; begin   window.init(0, 0, 1920, 1000, clblue);   brush.color : = cllimegreen;   rectangle(0, 580, 1920, 1018);     house(700, 380);   turtoise(300, 600);   turtoise(900, 750);   sun(1200, 200); end.