ЗАДАЧА №1
var
x, y: Real;
begin
Read (x);
if x > 10 then
y := Pi - 2 * x
else
y := 1 - x;
Write (y)
end.
ЗАДАЧА №2
a, b: Real;
Read (a, b);
Write (sqr (min (a, b)), ' ', max (a, b) * max (a, b) * max (a, b))
ЗАДАЧА №3
a, c: Word;
Read (a);
c := 0;
if a div 100 < 5 then
Inc (c);
if (a div 10) mod 10 < 5 then
if a mod 10 < 5 then
if c > 0 then
Write ('содержит цифры меньше 5')
Write ('не содержит цифры меньше 5')
1) 1. 2 в 13 степени бит=8192 бита. То есть биты выражаем в килобайты. Решение:8192 бита=1 килобайту. ответ:1 килобайт.
2. 0.125*1024*1024=1048576
3. 1/2 кБ=1024/2 байт=8*1024/2 бит=4096 бит.
4. 2 в 23 это 8388608 бит, тк в 1 байте 8 бит, то 8388608 : 8=1048576 байт, следовательно 1мб
5. 15 кбайт= 120000 бит, 120000 бит= 120 кбит
2)Длина данного текста 32 символа
3) 150*16=2400 бит, 2400 бит= 300 байт, ответ 300 байт
4) -
5) количество последовательностей будет равно количеству двоичных чисел, которые можно записать с символов, т.е. 2 ^ 7 = 128
Объяснение:
ЗАДАЧА №1
var
x, y: Real;
begin
Read (x);
if x > 10 then
y := Pi - 2 * x
else
y := 1 - x;
Write (y)
end.
ЗАДАЧА №2
var
a, b: Real;
begin
Read (a, b);
Write (sqr (min (a, b)), ' ', max (a, b) * max (a, b) * max (a, b))
end.
ЗАДАЧА №3
var
a, c: Word;
begin
Read (a);
c := 0;
if a div 100 < 5 then
Inc (c);
if (a div 10) mod 10 < 5 then
Inc (c);
if a mod 10 < 5 then
Inc (c);
if c > 0 then
Write ('содержит цифры меньше 5')
else
Write ('не содержит цифры меньше 5')
end.
1) 1. 2 в 13 степени бит=8192 бита. То есть биты выражаем в килобайты. Решение:8192 бита=1 килобайту. ответ:1 килобайт.
2. 0.125*1024*1024=1048576
3. 1/2 кБ=1024/2 байт=8*1024/2 бит=4096 бит.
4. 2 в 23 это 8388608 бит, тк в 1 байте 8 бит, то 8388608 : 8=1048576 байт, следовательно 1мб
5. 15 кбайт= 120000 бит, 120000 бит= 120 кбит
2)Длина данного текста 32 символа
3) 150*16=2400 бит, 2400 бит= 300 байт, ответ 300 байт
4) -
5) количество последовательностей будет равно количеству двоичных чисел, которые можно записать с символов, т.е. 2 ^ 7 = 128
Объяснение: