5212 кбайтов пепевести в гбайтов

Данная программа выполнена для PascalABC.net, немного кривая, но полностью рабочая. 


uses GraphABC;
var i:integer;

Procedure Boy(z,w:integer);
begin
rectangle(z-20,w-30,z+20,w+40);
MoveTo(z-20,w-20);
LineTo(z-35,w+15);
LineTo(z-20,w);
LineTo(z-20,w-20);
Floodfill(z-25,w,clBrown);
MoveTo(z+20,w-20);
LineTo(z+35,w+15);
LineTo(z+20,w);
LineTo(z+20,w-20);
Floodfill(z+25,w,clBrown);
Floodfill(z,w,clBlue);
MoveTo(z-10,w+40);
LineTo(z-10,w+70);
LineTo(z-3,w+70);
LineTo(z-3,w+40);
LineTo(z+3,w+40);
LineTo(z+3,w+70);
LineTo(z+10,w+70);
LineTo(z+10,w+40);
LineTo(z-10,w+40);
Floodfill(z-5,w+65,clBrown);
Floodfill(z+5,w+65,clBrown);
Circle(z,w-40,20);
Floodfill(z,w-40,clBrown);
end;

Procedure Ball(x,y:integer);
begin
circle(x,y,15);
floodfill(x,y,clRed);
end;

begin
lockdrawing;
for i:=1 to 20 do begin
boy(100,200);
Ball(100+i*5,200-i*5);
ellipse(200,115,250,140);
RedRaw;
ClearWindow(clWhite);
end;
for i:=1 to 5 do begin
boy(100,200);
Ball(200+i*5,100+i*5);
ellipse(200,115,250,140);
RedRaw;
ClearWindow(clWhite);
end;
for i:=1 to 25 do begin
boy(100,200);
Ball(225,125+i*5);
ellipse(200,115,250,140);
RedRaw;
ClearWindow(clWhite);
end;
end.

-------------------------

Ниже прикреплена картинка(взята на просторах интернета). По ней очень легко выполнять перевод.

Что бы перевести байт в Кбайт, нужно количество байт поделить на 2014, или по другому - .
При деления показатели степени вычитаются:



Это и есть ответ: байт

Ну смотри... Допустим мы берем Артёма. Мы знаем, что каждый из свидетелей дал только 1 правильное указание. Допустим Артем сказал, что машина не черная, и допустим это правильно. Выходит, раз это правильно (то, что машина не черная), то Глеб ошибся с первым показателем (цветом), но был прав со вторым (марка Рино). Следовательно, мы уже точно установили марку машины, разбираемся с цветом. Поскольку Владимир говорит, что машина Тойота, но мы то уже установили, что марка Рино, следовательно он правильно указал цвет. 
Из всего этого следует, что ответ: машина "Renault", серого цвета.