Есть ответ 👍

Какое количество бит несет в себе сообщение о том, что нужный вам файл находится на одном из 8 дисков?

192
491
Посмотреть ответы 2

Ответы на вопрос:

khavra1991
4,6(30 оценок)

Следовательно   бита надеюсь на "лучший ответ"

var s:='2'+'8'*99+'2';

begin

while (pos('81',s)<>0) or (pos('882',s)<>0) or (pos('8883',s)<>0) do

begin

var i81:=pos('81',s);

var i882:=pos('882',s);

var i8883:=pos('8883',s);

if i81<>0 then

begin

delete(s,i81,2);

insert('2',s,i81)

end

else

if i882<>0 then

 begin

  delete(s,i882,3);

  insert('3',s,i882);

 end

else

delete(s,i8883,4);

insert('1',s,i8883);

end;

end.

Популярно: Информатика