Административный процесс - это часть управленческой деятельности органов _ власти исполнительной судебной

Правильные вопросы выделены по тесту
тест уже прошел свою проверку
надеюсь на плюс 1 голос к ответу

лавный герой рассказа В.П.Астафьева «Васюткино озеро» попадает в необычную ситуацию – он заблудился в тайге. Данная ситуация является экстремальной даже для взрослого человека, а здесь перед нами ребёнок, тринадцатилетний мальчик.

Как же он сумел справиться с такими тяжёлыми обстоятельствами? Что ему выжить?

Васютка , потому что знал те законы, которые издавна существовали у людей, живущих в данной местности.

Во-первых, в тот момент, когда мальчик понял, что заблудился, он вспоминает слова, которые не раз слышал от отца и дедушки: «Тайга, наша кормилица, хлипких не любит». Благодаря этому Васютка собрался, поборол собственный страх, решил не сдаваться, а пытаться преодолеть обстоятельства.

Во-вторых, Васютке то, что, отправляясь в тайгу, даже недалеко, он взял с собой хлеб, спички, ружьё. Ведь есть такой «старинный порядок: идёшь в лес – бери еду, бери спички».

Но тех запасов, которые были с собой у мальчика, ему бы не хватило. И тогда третье правило, которое он усвоил с детства - не стрелять ради забавы, а только по необходимости. Не стал Васютка стрелять в кедровку, сберёг патроны, и в результате смог добыть себе пищу, когда заблудился.

В рассказе упоминается ещё один важный «таёжный закон», который забыл Васютка. Ему нельзя было отходить от затесей на деревьях, и тогда не случилось бы трагедии.

program progressbar_Console;

uses crt,sysutils;

 

const lBar=10;

bar100=110;  

var i:integer;

 

procedure pBar(const cp:integer);

var i,n,m:integer;s:string;s1:String;ch:char;

   begin

       m:=round(100/bar100*cp);

       n:=round(lBar/bar100*cp);

       s:='[]';

       s1:=' '+IntToStr(m)+' % ';

       for i:=1 to lBar do

           begin

               if i<n then ch:=#35 else ch:=#45;

               insert(ch,s,pos(']',s));

           end;

       insert(s1,s,pos('[',s)+1+(lBar div 2));

        gotoxy(1,1);writeln(s);

   end;

 

begin

 clrscr;

for i:=1 to  bar100 do

    begin

      pBar(i);

      delay(50);

    end;

end.