1 байт =8 бит
1 Кб - 1024 байта = 2^10 байт
1 Мб -1024 Килобайта= 2^10 килобайт
1 Гб <span>- 1024 Мегабайта= 2^10 мегабайт
__________________________
48567 : 8 = </span>6070,875 байт
6070,875 :1024 = 5,9 Кбайт
5,9 : 1024 = 0,006 Мегабайт
По формуле
, где N - кол-во символов в алфавите, i - объём информации в одном символе. Получаем
. Значит i=2, т.е. каждый символ равен 2 битам.
30 строк*70 символов в строке= 2100 символов на странице
2100 символов*5 страниц=10500 всего символов
Далее нужно умножить общее кол-во символов на 2 бита 10500*2=21000
Далее переводим из битов в байты 21000/8=2625 байт
Ответ: 2625 байт
Var
x, cs, tg: real;
begin
Write('Введите число в диапазоне [0..3.14]: ');
Readln(x);
if (x < 0) or (x > 3.14) then Writeln('Число вне диапазона')
else begin
cs := cos(x); tg := tan(x);
if cs > tg then Writeln('cosX > tgX')
else if cs = tg then Writeln('cosX = tgX')
else Writeln('cosX < tgX')
end
end.
Тестовое решение:
Введите число в диапазоне [0..3.14]: 1.58
cosX > tgX
a)
25 div 3 = 24:3=8
73 div 7 = 70:7= 10
31 div 7 = 28:7= 4
25 mod 3= 25-24=1
73 mod 7 = 73-70=3
31 mod 7 = 31-28=3
b)
2 div 3 + 1 = 0+1=1
17 - 23 div 7 = 17 - 3 = 14
31 div (7+5) = 31 div 12 = 2
25 mod 3 + 25 div 3 = 8+1=9
47 div (3 mod 7) = 47 div 3 = 15
31 mod (7 div 2) = 31 mod 3 = 1