<span> Вроде бы Г. Холлерит в 1800-ых основал фирму по выпуску счетно-перфорационных машин.</span>
Гигабайт??
8 бит = 1 байт
1024 байт = 1 килобайт
1024 килобайт = 1 мегабайт
1024 мегабайт = 1 гигабайт
var
a, b, c: real;
begin
Read(a, b, c);
Write((ord(a > 0) + ord(b > 0) + ord(c > 0)) = 1)
end.
1010,10*1000,01=10,25*8,25=84,56(10)=1010100,10(2)
56,71(10)=111000,10(2)