П0 -> П1 ИП0 x^2 пи * 3 / С/П ИП0 x^2 ИП1 x^2 + КвКор ИП0 пи * * ИП0 x^2 пи * + С/П
Ввод: R -> h С/П. Далее на экране объём, после С/П - площадь поверхности.
Const n=6;
var x:array[1..n] of integer=(-1, 1, 2, -2, -3, 3);
y,z:array[1..n] of integer;
i,i1,i2:integer;
begin
for i:=1 to n do write(x[i]:3);
writeln;
i1:=0; i2:=0;
for i:=1 to n do
if x[i]>0 then begin i1:=i1+1; y[i1]:=x[i]; end
else if x[i]<0 then begin i2:=i2+1; z[i2]:=x[i]; end;
writeln(' Y: Z:');
for i:=1 to n do
if (i1>=i)and(i2>=i)
then writeln(y[i]:3,z[i]:4)
else if i1>=i then writeln(y[i]:3)
else if i2>=i then writeln(z[i]:7);
end.
Результат:
-1 1 2 -2 -3 3
Y: Z:
1 -1
2 -2
3 -3
Б1+б2+б3+б4=7
(б1+б2+б3+б4+б5)/5=5
б1+б2+б3+б4+б5=25
б1+б2+б3+б4+б5-б1-б2-б3-б4=б5=25-7=18
Ответ:18
<span>32=2^5 => i=5
</span>Формула количества информации в тексте I=k*i
<span>Значит I=10*5=50бит </span>
1. Определим размер записи.
Трехзначное десятичное число - это число от 100 до 999. Таких чисел может быть 900. Поскольку 2⁹<900<2¹⁰, то для кодирования нам потребуется 10 бит. По условию числа кодируются неким целым число байт. В байте 8 бит, поэтому для представления 10 бит потребуется 2 байта.
Итого, длина записи составит 12+2=14 байт.
2. Определим возможное количество записей.
2 Кбайта = 2×1024 байта = 2048 байт.
Количество записей равно 2048/14 =146.3 записи.
Отбрасывая дробную часть, получим 146 записей.
