(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 31 шт
i = 8 бит
I - ?
Решение:
I = K * i = 31 * 8 бит = 248.0 бит
Ну их очень много,самый крутой сис. блок стоит где-то 200 тыс. руб
Const
C = -5;
M = 10;
Step = 1.5;
Var x : Real;
Begin
x:=C;
Repeat
Write('x = ',x:6:2,' L = ');
If x>5 then Writeln((x+x*x+x*x*x)/10:6:2) else
If x<-1 then Writeln(sqr(sin(x))+abs(x):6:2) else
Writeln(100:6);
x:=x+Step;
Until x>M;
end.