Пусть x - количество плацкартных вагонов.
Вероятность того, что выбора плацкартного вагона p = x/28
I = log(2)[1/p]
log(2)[1 / (x/28)] = 2 ⇒ 28/x = 4 ⇒ x = 7
Ответ: в поезде 7 плацкартных вагонов
№6 1)
Расписываем код адреса по байтам (по 8 бит):
1 2 3 4
11001100 10011000 10111110 01000111 в 2с/с каждый байт переводим из 2с/с в 10с/с
1 байт = 2^7 +2^6 +2³+2² =128+64+8+4 =204
2 байт =2^7 +2^4 +2^3 =128+16+8 =152
3 байт =2^7+2^5+2^4+2³+2²+2 =128+32+16+8+4+2=190
4 байт =2^6+2²+2+1=71
IP- адрес 204.152.190.71
№6 2) - аналогично 1)
1 2 3 4
11011110 11000011 1010010 00110010
1 байт = 2^7+2^6 +2^4+2³+2²+2=128+64+16+8+4+2 =222
2 байт = 2^7+2^6 +2 +1=195
3 байт = 2^7 +2^5 +2=162
4 байт= 2^5+2^4+2 =50
IP - адрес: 222.195.162.50
Program Pr1;
uses crt;
var mas:array[byte] of integer;
fl1,fl2:text;
stroka:string;
b,v,c,max,i:integer;
Begin
clrscr;
assign(fl1,'E.in');
assign(fl2,'E.out');
reset(fl1);
readln(fl1,stroka);
close(fl1);
for i:=1 to length(stroka) do val(stroka[i],mas[i],b);
b:=length(stroka);
max:=1;
v:=0;
for i:=1 to b do if mas[i]>v then if mas[i]>max then max:=mas[i]
else v:=mas[i];
c:=max*v;
rewrite(fl2);
writeln(fl2,c);
close(fl2);
end.
№7
172₈=1*8²+7*8¹+2*8⁰=64+56+2=122₁₀
2ЕА₁₆=2*16²+14*16¹+10*16⁰=746₁₀
101010₂=1*2⁵+0*2⁴+1*2³+0*2²+1*2¹+0*2⁰=32+0+8+0+2+0=42₁₀
10,1₂=1*2¹+0*2⁰+1*2⁻¹=2+0+0,5=2,5₁₀
243₆=2*6²+4*6¹+3*6⁰=72+24+3=99₁₀
№6
143,511₁₀=1*10²+4*10¹+3*10⁰+5*10⁻¹+1*10⁻²+1*10⁻³
143511₈=1*8⁵+4*8⁴+3*8³+5*8²+1*8¹+1*8⁰
143511₁₆=1*16⁵+4*16⁴+3*16³+5*16²+1*16¹+1*16⁰
1435,11₈=1*8³+4*8²+3*8¹+5*8⁰+1*8⁻¹+1*8⁻²
<span>Var s:string; i:integer; </span>
<span>Begin </span>
<span>Readln(s); i:=length(s); </span>
<span>while (i>0) and (s [ i]=' ') do i:=i-1; </span>
<span>if i=0 then Writeln('слова в строке не обнаружены') </span>
<span>else repeat Write(s[ i]); i:=i-1 until (i=0) or (s[ i]=' '); </span>
<span>End. </span>