Сдав доклад по биологии на «отлично», ученик перенёс папку, полный путь до которой был d: \учёба\биология\млекопитающие, в папку сданные, расположенную в корне диска c. укажите полный путь к файлу виды слонов. txt, расположенному в папке млекопитающие. 1) сданные\млекопитающие\виды_слонов. txt 2) с: \сданные\ виды_слонов. txt 3) с: \ учёба\биология\млекопитающие\виды_с лонов. txt 4) с: \сданные\млекопитающие\виды_слонов. txt

ответ: вариант 4. другие варианты   не правильно оформлены. можно было проверить самому, создать эти папки и переместить как там написано =) 

если бы в третьем была папка "сданные", то этот вариант подошел бы идеально.

с "сданные" подходит только 2 и 4. скорее всего, это 4, хотя на 100% не уверен

разделим монеты на кучки 1002 1002 и одна монета

1-е взвешивание сравниваем 1002 и 1002

если они одинаковые то они настоящие и значит осталось сравнить одну монету с какой-нибудь из этих кучек и выяснить тяжелее она или легче

если одна из куч тяжелее то ее делим пополам и снова взвешиваем

если половинки оказались одинаковые, значит они настоящие и фальшивая монета легче настоящей, а если разные то фальшивая монета тяжелее настоящей

program yravnenie;

var  a,b,c,d,x1,x2,p,q: real; begin  repeat  write('a= ');   readln(a);   if a=0 then writeln('error: a=0. enter another value');   until a< > 0;   write('b= ');   readln(b);   write('c= ');   readln(c);   p: =b/a;   q: =c/a;   d: =sqr(p/2)-q;   if d> 0 then  begin    writeln('x1 = ',-p/2-sqrt(d): 0: 5);     writeln('x2 = ',-p/2+sqrt(d): 0: 5);   end  else  if d=0 then  writeln('x1 = x2 = ',-p/2: 0: 5)  else  begin    writeln('x1 = ',-p/2: 0: 5,'-i*',sqrt(-d): 0: 5);     writeln('x2 = ',-p/2: 0: 5,'+i*',sqrt(-d): 0: 5);   end;   readln; end.