0,25 Кбайта = 256 байт
300 байт > 0,25 Кбайта
1,5 Кбайта = 1536 байт
<span>1536 байт = 1.5 Кбайта
1 Кбайт = 1024 байта
8192 байта > 1 Кбайт
5 байт = 40 бит
5байт > 36 бит
130 байт = 1040 бит
1000 бит < 130 байт
1 Гбайт = 1024 Мбайта
1 Гбайт > 1Мбайт
</span>
<span><span>1 Гбайт = 1024 Мбайта
1 Мбайт = 1024 Кбайта
1 Кбайт = 1024 байта</span>
</span>1 байт = 8 бит
var a:integer;
begin
readln (a);
if (a div 10 + a mod 10) mod 6 = 0 then writeln('Сумма цифр числа кратна 6')
else writeln ('Сумма цифр числа не кратна 6');
if a div 10 > a mod 10 then writeln('Цифра десятков числа больше цифры единиц числа')
else writeln ('Цифра десятков числа меньше цифры единиц числа');
if a mod 10 = 6 then writeln('Число оканчивается цифрой 6')
else writeln ('Число не оканчивается цифрой 6')
end.