1 бит - 0,00012 кб
1 байт - 0,00098 кб
1 мегабайт = 1024 кб
1) 1234 бит = 0,15 кб
2) 580 байт = 0,57 кб
3) 4564 мегабайт = 4673536
Элементарно, умножь Гб на 1024, получится 2560 Мб. А в одном байте 8 бит, значит делим, 63035,875 байт
<em>// PascalABC.NET 3.3, сборка 1540 от 16.09.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('Введите двухзначное натуральное число:');
if (n div 10).IsEven and (n mod 10).IsEven then Writeln('Да')
else Writeln('Нет')
end.
<u>Пример</u>
Введите двухзначное натуральное число: 28
Да
1/16 Мбайт = 2^(-4) Мбайт = 2^(-4)*2^(10) Кбайт = 2^(-4)*2^(10)*2^(10) байт = 2^(-4+10+10) байт = 2^(16) байт = 65536 байт
Var s : real;
Begin
S:= (1*14-1/3)*52;
Write(s :5:6);
end.
Смешно, конечно, но выходит так. Просто выводишь определённую формулу, вот и все.