Рубрики
ЕГЭ Информатика

Вариант 1 Cl. 1) Х= 1, У= 4. 2) Исправленный текст программы (на Turbo Pascal 7.0). Program grafik; Var x, y: real; Begin…

Вариант 1

Cl. 1) Х= 1, У= 4.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, y);

If (у >= 0) and (x >= 0) and (x <= abs(y - 2)) and (y <= 2) then

Write (‘принадлежит’)

Else

Write (‘не принадлежит’); end.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S :=0;

Kmax:=0;

Reserve :=0;

For i:=1 to N do

If (M[i] mod 2=0) then

Begin

S:=s+M[ i ]; k:=k+l

End

Else

Begin

If k>kmax then

Begin

Kmax:=k;

Reserve:=s

End;

K:=0;

Sum:=0

End;

If k>kmax then

Begin

Kmax:=k;

Reserve:=s

End;

If (kmax>0) then write (reserve) else write (‘нет такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «увеличить координату х на 2, увеличить координату У на 2» либо «увеличить координату х на 5, уменьшить координату У на 1».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program podschet_v_massive;

Var M : array[1..5] of integer;

C : char;

I, k : integer;

Begin

For i:= 1 to 5 do M[i]:= 0;

Read (c);

While c<>,?’ do

Begin

K:= ord(c)-ord (‘0’);

If (k>0) and (k<10) and (k mod 2=1) then

M[(k div 2) + 1]:= M[(k div 2) + 1] + 1 read(c);

End;

K: = 0;

For i:= 1 to 5 do if (M[i]>0) then begin к:= k + 1; write (((2*i — 1) div 2) + 1); end;

If k = 0 then write(0) ;

Writein;

Ehd.

Вариант 2

Cl. 1) X = 2, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, y) ;

If (y >= 0) and (y <= -(x + 2)) and ((x + 2)*(x + 2) + y*y >= 1) then write (,принадлежит,) else write (‘не принадлежит’);

End.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S:=0;

Kmax:=0;

Reserve:=0;

For i:=l to N do

If (M[i] mod 3 = 0) then

Begin

S:=s+M[i];

K:=k+l

End

Else

Begin

If k>kmax then

Begin

Kmax:=k;

Reserve:=s

End;

K:=0;

Sum:=0

End;

I f k>kmax then

Begin

Kmax:=k;

Reserve:=s

End;

If (kmax>0) then write(reserve) else write(‘нет такой последовательное!

СЗ. Выигрывает первый игрок, его первый ход «положить в пакет три яблока и четыре груши».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program podschet_v_massive;

Var M : array[1..5] of integer; c : char;

I, k : integer;

Begin

For i:= 1 to 5 do M[i]:= 0;

Read(c); While c<>‘!’ do Begin k:= ord(c)-ord (‘0’); if (k>0) and (k<10) and (k mod 2=1) then M[(k div 2) + 1]:= M[(k div 2) + 1] + 1; read(c);

End;

K:= 0; for i:= 1 to 5 do if (M[i]>0) then begin k:= k + 1; write (2*i — 1); end;

If k = 0 then write (0);

Writein;

End.

Вариант 3

Cl. 1) X = 2, У= 0.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, y);

If (y <= 2-x∕20) and (y >= abs(x-2)) and (x-2) *(x-2)+y*y >- 1) then write ( ‘принадлежит,)

Else

Write (,не принадлежит’);

End.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S :=0;

Kmax:=0;

Reserve:=0;

For i:=l to N do

If (M[i] mod 2 <> 0) then

Begin

S:=s+M[i]* M[i]* M[i]; k:=k+l

End

Else

Begin

If k>kmax then

Begin

Kmax:=k;

Reserve:=sum

End;

K:=0;

Sum:=O

End;

If k>kmax then

Begin

Kmax:=k;

Reserve:=sum

End;

подпись: сз.If (kmax>0) then write (reserve) else write(‘нет такой последовательности’);

Составим дерево игры. Обозначим (х, У) набор фишек на столе, х — количество жел­тых, У — количество зеленых фишек. Начальное значение пары (х, У) было (2, 4).

подпись: ход 1-го игрока
ход не привел к выигрышу
ход 2-го игрока
ход не привел к выигрышу
варианты хода
1-го игрока

(3,6)

 

(4,8) (4,7) (6,7)

 

(3,5)

 

(5,9) (5,8) (7,8)

(5,8) (5,7) (7,7)

(7,8) (7,7) (9,7)

 

(5,5)

 

(7,9) (7,8) (9,8)

(7,8) (7,7) (9,7)

(9,8) (9,7) (11,7)

 

подпись: (5,10) (5,9) (7,9)
(5,9) (5,8) (7,8)
(7,9) (7,8) (9,8)

Дальше, строить дерево игры нет смысла, так как при безошибочной игре (что известно из условия) игроков при любых ходах второго игрока у первого игрока есть выигрыш­ный ход (при этом его первый ход «к желтым фишкам добавить одну, к зеленым две» или «к желтым фишкам добавить три, к зеленым одну»).

подпись: c4.Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program zadachaC4;

Const hh=14;

Mm=10;

Type train=record

Min, hour, k: integer;

S, minstr, hourstr, kstr: string;

End;

Var m : array[1..100] of train;

N, i,j, jj, jθ, reserve, num: integer;

Str, h, mini, mesta: string;

Begin

Readln(n) ;

For i := 1 to n do

Begin

Readln(str);

J:=0;

While str[j+l]<>‘, do j:=j+l;

M[i] . s.∙=copy (str, 1, j ) ;

J:=j+l;

JO:=j+l;

While str[j + l]<>, :’ do j:=j+l;

H: = copy(str, jθ,j-(jθ-l));

Jz=j+l;

Jθz=j+l;

While str[j+l]<>,’ do j:=j+l;

Mini:= copy(str, jθ,j-(jθ-l));

J==j+i;

JO:=j+l;

While str[j+1]<>,., do j:=j+l;

Mesta:= copy(str, j0,j-(j0-1));

Reserve :=0; for j:=h[0] to 1 do

Begin

Num: = ord(h[j])-ord (‘0’);

For jj:=1 to h[0]-j do nuπκ=num*10; reserve:= reserve + num;

End;

M[i]. hour:=reserve; m[i].hourstr:=h;

Reserve :=0;

For j:=minl[0] to 1 do begin

Num:= ord(mini[j])-ord (‘0,);

For jj:=1 to minl[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].min:=reserve;

M[i].minstr:=minl;

Reserve :=0;

For j:=mesta[0] to 1 do begin

Num:= ord(mesta[j])-ord (‘0’);

For jj:=l to mesta[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].k:= reserve; m[i].kstr:=mesta;

End;

For i := 1 to n do begin

If (m[i].k=0)and ((m[i].hour

Writein(m[i]. s) ;

Write (») ;

Write(m[i].hourstr);

Write (‘:’);

Write(m[i].minstr);

End else writein(,Нет таких поездов’);

End;

If n=0 then writein(,Нет таких поездов’); end.

Вариант 5

Cl. 1) Х= 4, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, у) ;

If (у >= 0) and (у <= 2 - x) and (x >= 0) then write (‘принадлежит’) else

Write (‘не принадлежит’); end.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S :=0;

Kmax:=0;

Reserve:=0;

For i:=l to N do

If (M[i] mod 2 <> 0) then

Begin

S:=s+M[i]; k:=k+l end else begin

If k>kmax then begin

Kmax:=k;

Reserve:=s

End;

K:=0;

Sum:=0

End;

If k>kmax then

Begin ‘

Kmax:=k;

Reserve:=s

End;

If (kmax>0) then

Begin

Av:=reserve/kmax; write(av) end

Else write(‘нет такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «увеличить координату Х на 2, увеличить координату У на 2» либо «увеличить координату Х на 5, уменьшить координату У на 1».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program zadachaC4;

Const hh=17;

Mm=0;

Type train=record

Min, hour, к: integer;

S, minstr, hourstr, kstr: string;

End;

Var m : array[1..100] of train;

N, i,j, jj, jθ,reserve, num: integer;

Str, h, mini, mesta: string;

Begin

Readln(n);

For i := 1 to n do

Begin

Readln(str) ;

J :=0;

While str[j+l]<>‘, do j:=j+l;

M [ i] .s:=copy(str,1,j);

J==j+i;

JO:=j+l;

While str[j+1]<>‘ : , do j:=j+l;

H:= copy(str, jθ,j-(jθ-l));

J:=j+l;

JO:=j+l;

While str[j+l]<>,’ do j:=j+l;

Mini:= copy (str, j0,j-(j0-1));

J:=j+l;

JO:=j+l;

While str[j+1]<>‘.’ do j:=j+l;

Mesta:= copy(str, j0,j-(j0-1));

Reserve :=0;

For j:=h[0] to 1 do

Begin

Num: = ord (h [ j ] ) — ord ( ‘ 0 ,) ;

For jj:=1 to h[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i] . hour:=reserve;

M[i].hourstr:=h;

Reserve:=0;

For j:=minl[0] to 1 do

Begin

Num:= ord(mini[j])-ord (,0′);

For jj:=1 to minl[0]-j do num:=num*l reserve:= reserve + num;

End;

M[i].min:=reserve;

M[i].minstr:=minl;

Reserve :=0;

For j:=mesta[0] to 1 do

Begin

Num:= ord(mesta[j])-ord (‘0’);

For jj:=l to mesta[0]-j do num:=num* reserve:= reserve + num;

End;

M[i].k:= reserve;

M[i].kstr:=mesta;

End;

For i := 1 to n do

Begin

If (m[i] .k>0) and ((m[i] .hour>=hh)or ((m[i] .hour=hh)and(m [ i ] .min>=mm))) then begin

Writein(m[i].sj;

Write (») ;

Write(m[i].hourstr);

Write(‘:’);

Write(m[i].minstr); end else writein(‘Нет таких поездов’);

End;

If n=0 then writein(‘Нет таких поездов’); end.

Вариант 6

Cl. 1) X = 0, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var х, у: real;

Begin

Readln(x, у);

If (у >= 0) and (у <= - 2 - x) and (x <= - 2) then

Write (‘принадлежит’)

Else

Write (‘не принадлежит’);

End.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S : =0;

Kmax:=0;

Reserve :=0;

For i:=1 to N do

If (M[i] mod 2=0) then

Begin

S ^s÷M[i] * M[i] ; k:=k+l end else begin if k>kmax then begin kmax:=k;

Reserve:=s

End;

K:=0;

Sum:=0

End;

If k>kmax then

Begin

Kmax:=k;

Reserve:=s end;

If (kmax>0) then

Begin

Av:=reserve∕kmax;

Write(av)

End

Else write(‘нет такой последовательности’);

СЗ. Составим дерево игры. Обозначим (х, У) набор фишек на столе, х — количество синих, У — количество красных фишек. Начальное значение пары (х, У) было (1,1).

Ход 1-го игрока

Ход не привел к выигрышу

Ход 2-го игрока

 

Ход не привел к выигрышу

Варианты хода

(4,7)

(4,6)

(6,6)

(4,6)

(4,5)

(6,5)

(6,6)

(6,5)

(8,5)

1-го игрока

(4,6)

(4,5)

(6,5)

(4,5)

(4,4)

(6,4)

(6,5)

(6,4)

(8,4)

(6,6)

(6,5)

(8,5)

(6,5)

(6,4)

(8,4)

(8,5)

(8,4)

(10,4)

Дальше строить дерево игры нет смысла, так как при безошибочной игре (что известно из условия) игроков при любых ходах второго игрока у первого игрока есть выигрыш­ный ход (при этом его первый ход «добавить две красные фишки, к синим фишкам до­бавить одну» или «добавить 3 синие фишки, добавить 1 красную фишку»).

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program zadachaC4;

Const hh=13;

Mm=15;

Type train=record

Min, hour, k: integer;

5, minstr, hourstr, kstr: string;

End;

Var m : array[1..100] of train;

∏,i, j,jjzjθzreserve, num: integer;

Str, h, mini, mesta: string;

Begin

Readln(n);

For i := 1 to n do

Begin

Readln(str);

J:=0;

While str[j+l]<>‘, do j:=j+l;

M[i] .s:=copy(str,1,j) ;

J==j+i;

JO:=j+l;

While str[j + 1]<>‘: ‘ do j:=j + l;

H:= copy(str, j0,j-(j0-1)) ;

J:=j+l;

J 0:=j +1;

While str[j+l]<>» do j:=j+l;

Mini:= copy(str, j0,j-(j0-1)) ;

J:=j+l;

Jθz=j+l;

While str[j+1]<>,., do j:=j+l;

Mesta:= copy (str, j0,j-(j0-1)) ;

Reserve:=0;

For j:=h[0] to 1 do

подпись: begin

num: = ord(h[j])-ord(‘0,) ;

For jj:=l to h[O]-j do num:=num*10; reserve:= reserve + num;

End;

M[i] .hourpreserve; m[i].hourstr:=h;

Reserve :=0; for j:=minl[0] to 1 do begin

Num:= ord(mini[j])-ord (,0,) ;

For jj:=l to minl[0]-j do nuπu=num*10; reserve:= reserve + num;

End;

M[i].min:=reserve; m[i].minstr:=minl;

Reserve:=0;

For j:=mesta[0] to 1 do begin

Num:= ord(mesta[j])-ord (‘0’) ;

For jj:=l to mesta[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].k:= reserve;

M[i].kstr:=mesta;

End; for i := 1 to n do begin

If (m[i].k=0)and ((m[i].hour>hh)or ((m[i].hour=hh)and(m[i].min>mm))) then begin

Writein(m[i].s);

Write (, ,);

Write(m[i].hourstr); write

Write(m[i).minstr); end else writein (,Нет таких поездов,); end;

If n=0 then writein(‘Нет таких поездов’); end.

Вариант 7

Cl. 1) X = 0.5, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, у);

If (x >= 0) and (y >= x + 2) then

Write (,принадлежит’) else

Write (‘не принадлежит,);

End.

С2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

К:=0;

S: =0 ;

Kmax:=0;

Reserve :=0;

For i:=l to N do

If (M[i] mod 2 <> 0) then begin

S:=s+M[i]; k:=k+l end else begin

If k>kmax then begin

Krnax:=k; reserve:=s end;

K:=0;

Sum:=0 end;

If k>kmax then

Begin

Kmax:=k; reserve:=s end;

If (kmax>0) then write(reserve) else write(‘нет такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «к красным фишкам добавить три, к синим прибавить четыре штуки».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program podschet_v_massive;

Var M : array[1..9] of integer; c : char;

I, k : integer;

Begin

For i:= 1 to 9 do M[i]:= 0;

Read(c);

While c<>‘.’ do Begin

K:= ord(c)-ord (‘0’);

If (k>0) and (k<10) then M[k]:= M[k] + 1;

Read(c) ;

End;

K:= 0;

For i:= 9 down to 1 do.

If (M[i]<=2) and (M[i]>0) then begin

K:= k + 1;

Write (i);

End;

If k= 0 then write (0);

Writein;

End.

Вариант 8

Cl. 1) Х = 2, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, у);

If (у >= 0) and (у <= - x + 2) and ((x-2)*(x-2) + y*y >= 1) and (x >= 0) then write (‘принадлежит’) else write (‘не принадлежит’);

End.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S :=0;

Kmax:=0;

Reserve :=0;

For i:=1 to N do

If (M[i] mod 3=2) then

Begin

S:=s+M[i];

K:=k+l

End

Else

Begin

If k>kmax then

Begin

Kmax:=k;

Reserve:=s

End;

K:=0;

Sum:=0

End;

If k>kmax then

Begin

Kmax.∙=k;

Reserve:=s

End;

If (kmax>0) then write(reserve) else write(‘нет такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «положить в пакет два яблока и три груши».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program podschet_v_massive;

Var M : array[1..4] of integer;

C : char;

I, k : integer;

Begin

For i:= 1 to 4 do M[i]:= 0;

Read(c) ;

While c<>‘!’ do

Begin

К:= ord(c)-ord (,О’);

If (k>0) and (k<10) and (k mod 2=0) then

M[k div 2]:= M[k div 2] + 1; read(c);

End;

K:= 0;

For i:= 4 downto 1 do if (M[i] > 0) then begin к:= k + 1; write(2*i);

End;

If k=0 then write (0);

Writein;

End.

Вариант 9

Cl. L)x = -2,y = 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik; var x, y: real; begin

Readln(x, y);

If (y >= 2 + x) and (x >= 0) then

Write (‘принадлежит,) else

Write (‘не принадлежит,); end.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

К: =0;

S: =0 ;

Kmax:=0 ;

Reserve:=0;

For i:=l to N do

If (M[i] mod 2 <> 0) then begin

S:=s+M[i]* M[i]; k:=k+l end else begin if k>kmax then begin

Kmax:=k; reserve:=s end;

K:=0;

Sum:=0 end;

If k>kmax then begin

Kmax:=k; reserve:=s end;

If (kmax>O) then i

Begin av:=reserve∕kmax; write(av) end else write(‘нет такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «увеличить координату Х на 2, увеличить координату У на 2» либо «увеличить координату х на 5, уменьшить координату У на 1».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program zadachaC4;

Const hh=20;

Mm=0;

Type ∙ train=record

Min, hour, k: integer;

S, minstr, hourstr, kstr: string;

End;

Var m : array[1..100] of train;

N, i,j, jj, jθ, reserve, num: integer;

Str, h, mini, mesta: string;

Begin

Readln(n);

For i := 1 to n do begin

Readln(str);

J :=0;

While str[j+l]<>» do j:=j+l;

M[i].s:=copy(str,1,j);

J:=j+l;

JO:=j+l;

While str [ j+1 ] <>,.: ‘ do j:=j+l;

H:= copy(str, jθ,j — (j0-1));

J==j+i;

JO:=j+l;

While str[j+l]<>» do j:=j+l;

Mini:= copy(str, jθ,j-(jθ-l));

J:=j+l;

JO:=j+l;

While str[j+1]<>,.’ do j:=j+l; mesta:= copy(str, jθ,j-(jθ-l));

Reserve:=0;

For j:=h[0] to 1 do begin

Num: = ord (h [ j ] ) — ord (‘ 0 ‘) ; for jj:=l to h[O]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].hourι=reserve; m[i].hourstr:=h;

Reserve :=0; for j:=minl[0] to 1 do begin

Num:= ord(mini[j])-ord (‘0’) ; for jj:=1 to minl[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].min:=reserve; m [i] .minstr:=minl ;

Reserve := O;

For j:=mesta[0] to 1 do begin

Num:= ord(mesta[j])-ord (‘ 0 ‘) ;

For jj:=1 to mesta[0]-j do num:=num*10; reserve:= reserve + num;

End;

M[i].k:= reserve; m[i].kstr:=mesta;

End; for i := 1 to n do begin

If (m[i] .k>=2) and ((m[i] .hour>hh)or ((m[i].hour=hh)and(m[i] .min>mm))) then begin

Writein(m[i] .s) ;

Write (,’,) ;

Write (m[i] .hourstr);

Write (‘:’);

Write(m[i].minstr);

Write (») ;

Write(m[i].kstr);

End else writein(,Нет таких поездов1);

End;

If n=0 then writein(,Нет таких поездов’); end.

Вариант 10

Cl. 1) X = 10, У= 1.

2) Исправленный текст программы (на Turbo Pascal 7.0).

Program grafik;

Var x, y: real;

Begin

Readln(x, у);

If (у >= 0) and (у <= - x+2) and ((x-2) *(x-2)+y*y >= 1) then write (‘принадлежит’)

Else

Write (‘не принадлежит’);

End.

C2. Возможен следующий вариант фрагмента программы (на Turbo Pascal 7.0).

K:=0;

S :=0;

Kmax:=0;

Reserve:=0;

For i:=l to N do

If (M[i] mod 2=0) then

Begin

S:=s+M[i]* M[i]* M[i]; k:=k+l end else

Begin if k>kmax then begin

Kmaxι=k; reserve:=sum end;

K:=0;

SUIIU=O

End;

If k>kmax then

Begin

Kmaxι=k; reserve:=sum end;

If (kmax>0) then write (reserve) else write(,Heτ такой последовательности’);

C3. Выигрывает первый игрок, его первый ход «положить в пакет два яблока и три груши».

С4. Приведем пример возможной программы на языке Turbo Pascal 7.0.

Program podschet_v_massive;

Var M : array[1..4] of integer; c : char;

I, k : integer;

Begin

For i:= 1 to 4 do M[i]:= 0;

Read(c); While c<>,?’ do Begin

K:= ord(c)-ord (,0′);

If (k>0) and (k<10) and (k mod 2=0) then

M [ k div 2 ] : = M [ k div 2 ] + 1 ; read(c) ;

End;

K:= 0;

For i:= 4 downto 1 do if (M[i]>0) then begin

K:= k + 1;

Write (i);

End;

If k = 0 then write(0);

Writein;

End.

ОТВЕТЫ

Часть 1

Al

А2

АЗ

А4

А5

А6

А7

А8

А9

Вариант 1

3

1

1

4

1

4

1

1

2

Вариант 2

3

2

2

3

2

4

1

4

1

Вариант 3

3

2

2

2

1

4

2

3

2

Вариант 4

3

2

4

3

2

2

3

2

4

Вариант 5

4

2

2

1

3

2

3

4

1

Вариант 6

4

1

4

2

4

1

4

1

1

Вариант 7

4

1

2

3

1

3

1

1

3

Вариант 8

3

3

1

2

3

1

2

3

2

Вариант 9

4

3

3

2

1

4

4

1

4

Вариант 10

2

2

1

4

4

2

2

3

4

AlO

All

А12

А13

А14

А15

А16

А17

А18

Вариант 1

3

2

1

3

1

3

4

3

2

Вариант 2

3

3

2

3

4

1

3

1

1

Вариант 3

3

4

4

3

3

1

2

3

2

Вариант 4

3

1

3

3

3

1

3

1

2

Вариант 5

3

3

2

3

1

3

4

1

1

Вариант 6

1

3

2

3

2

3

4

2

1

Вариант 7

1

2

3

3

1

1

3

4

4

Вариант 8

3

1

1

4

1

1

2

3

4

Вариант 9

4

3

3

3

2

1

2

4

1

Вариант 10

1

4

2

2

4

3

3

1

2

Часть 2

Bl

В2

ВЗ

В4

В5

В6

В7

В8

В9

BlO

Вариант 1

25

10

11211

HFDB

22

64,25

АВЛ

55

5 500

6

Вариант 2

3

37

11122

ABCD

4

65,125

T7**tTΛ<^T ±Wlv√l

7

6 000

4

Вариант 3

64

-5

4

DCGH

4

129,25

Дпэ

24

17 000

5

Вариант 4

243

1

1

BCDH

2

265,5

Пог

88

5 500

6

Bl

В2

Вз

В4

В5

В6

В7

В8

В9

BlO

Вариант 5

8

-4

2

CGHD

5

423,5

ГПО

10

7 000

2

Вариант 6

27

4

22211

АБГВ

3

736

ВМС

232

15 100

4

Вариант 7

24

4

3

GECA

13

62,125

БГД

20

6 000

6

Вариант 8

5

36

3

EFFG

3

65,375

ЗИМ

17

4 100

2

Вариант 9

64

0

1

ГВБА

4

1025

ВГУ

100

28 000

6

Вариант 10

4

-1

11112

ACBE

5

301,25

Гот

144

4 300

5

[1] А-011, Б-01, В-11, Г-101

[2] А-011, Б-00, В-100, Г-101

Ответ: 2

Решение. Рассмотрим ответ 1. При таком кодировании сообщения АГ и БВБ будут представлены одинаковыми последовательностями из нулей и единиц (011101), из чего можно заключить, что однозначно раскодировать такую двоичную запись невозможно. Для ответа 3 сообщения АГ и БВВ дают 10101. Для ответа 4 сообщения BB и ГАБ дают 100100. Таким образом, ответы 3 и 4 также содержат коды, не позволяющие декодиро­вать некоторые сообщения однозначно. Т. к. задача подразумевает выбор одного верного ответа из представленных четырех, то, определив три ошибочных ответа, приходим к выводу, что верным является ответ 2.

[5] А-01, Б-00, В-100, Г-10

[6] А-10, Б-1, В-01, Г-101

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *