Не будут. Потому что РИСОВАНИЕ в библиотех графики Паскаля.
Ответ:
15 kbite=15*1024 bite=8=15*1024 bit
12 GB=1024*12 MB=1024*1024*12KB=1024*1024*1024*12B
Дальше сам как нибудь.
То есть 1 ГБ=1024 МБ, 1 МБ=1024 КБ
1 КБ=1024 Байт, 1 Байт=8 бит
И наоборот такая же зависимость.
В готовых домашних заданиях есть ответы)
<span>10001 = 10011100010001</span>2
<span>111011 = 11011000110100011</span>2
100011 = 110000110101010112
<em>// PascalABC.NET 3.2, сборка 1379 от 21.01.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=ReadlnString('Введите строку:');
s:=s.Left(Pos('!',s)-1);
Writeln('Пробелов: ',s.Where(c->c=' ').Count);
Writeln('Буква "ю" в последовательность ',Pos('ю',s)=0?'не ':'',
'входит');
if s.Intersect('шина').Count=4 then
Writeln('Среди символов есть все буквы слова "шина"')
else Writeln('Среди символов нет всех букв слова "шина"');
if s.Matches('но|он').Count>0 then
Writeln('Есть соседствующие буквы "он" или "но"')
else Writeln('Нет соседствующих букв "он" или "но"');
if s.ToCharArray.Pairwise((x,y)->x=y).Count>0 then
Writeln('Есть пара соседствующих одинаковых символов')
else Writeln('Нет пары соседствующих одинаковых символов')
end.
<u>Пример:</u>
Введите строку: наша пища хороша, но не так, чтобы очень. соответственно, мы не очень толсты! как-то так.
Пробелов: 12
Буква "ю" в последовательность не входит
Среди символов есть все буквы слова "шина"
Есть соседствующие буквы "он" или "но"
Есть пара соседствующих одинаковых символов