1. Ищем количество всех пикселей: 1152*864=995328, каждый пиксель содержит 8 бит информации. Все пиксели содержат 995328*8=7962624 бит информации, или 995328 байт, или 7776 килобайт.
над вторым подумаю и отпишу
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var s:=ReadlnString('>');
Writeln(RegEx.Replace(s,'0{2,}','0'))
end.
<u><em>Тестовое решение</em></u>
> 100x100=10000; 10км=10х1000=10000(м)
10x10=10; 10км=10х10=10(м)
Должно быть, на задний план, я думаю.
2, можно взвесить по 2 монеты и выбрать из них там где есть и фальшивая, а потом взвесить их 2 отдельно