Множество (совокупность) знаков называются цифрами 1,2,3,4,5,6,7,8,9,0
1) N=2^i i-бит/1 символ N - символов в алфавите
N=56 i=6 6*132 бит в сообщении
(6*132)/8=99 байт
Ответ 99 байт
2) i = (24*8)/48=4
N=2^i=2^4=16 символов в алфавите
Ответ 16 символов
3) 2^i=75
i=7
Ответ 7 лампочек
4) N=18-(-14)=32 +1=33 (включая 0)
i=6 бит/1измер
6*144=864 бит или 108 байт
Дано
i - 1 байт / 8 бит
I - 160 бит
_______________
Найти K - ?
Решение
I=k*i => K=I / i ;
K= 160 / 8 = 20 сим
Ответ: В тексте 20 символом
Задача 2
var a,b:real;
begin
writeln('a=');
readln(a);
writeln('b=');
readln(b);
if (a>=0) and (a <=15) or (b>=0) and (b<=15) then
writeln(sqr(a)+sqr(b))
else
writeln ((a+b)/2);
readln;
<span>end.
задача 1
</span>var x:real;
begin
write('x= ');
readLn(x);
if x<6 then WriteLn(sqr(x));
if (x>=-6)and(x<6) then
WriteLn(Abs(x)+4);
if x>=6 then
writeLn(x*(x+1))
end.
задача 3
Var a,b,c,d:real;
x1,x2:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
d:=sqr(b)-4*a*c;
if D>0 then begin
x1:=(-b+sqrt(d))/2*a;
x2:=(-b-sqrt(d))/2*a;
end;
if d=0 then writeln('koren=',-b/2*a);
if d<0 then writeln
('kornei net')
<span>End.</span>