Все 5 буквенные слова составленные из букв а к р у записаныв алфавитном порядке.вот начало списка 1. 2. 3. 4. 5. запишите слова которое стоит на 450-м месте от начала списка

Имеем дело с системой счисления по основанию 4: а=0 к=1 р=2 у=3 числа записываются начиная с ноля до 449 -го(449 стоит на 450 месте, т.к. начали записывать не с 1 а с ноля) переводим 449 в систему по оснаванию 4 449=256+3*64+1=1*256+3*64+0*16+0*4+1=13001 расшифруем : куоок ответ куоок

{1 вариант} var otr, vozr: byte; begin   writeln('введите возраст');   readln(vozr);   case vozr do   6,7: otr: =5;   8,9: otr: =4;   10,11: otr: =3;   12,13: otr: =2;     14,15: otr: =1;   end;   writeln('ваш отряд', otr); end. {2 вариант - более простой} var otr, vozr: byte; begin   writeln('введите возраст');   readln(vozr);   otr: =5 - vozr div 2 + 3;   writeln('ваш отряд', otr) end.

  pascalabc.net const      n = 'нет';   var    s : string;     l,i : integer;       begin  readln (s);   l : = length(s);   i : = 1;     while i < =   l-1 do    begin      if s[i] = 'д' then      if s[i+1] = 'а' then        begin        l : = l+1;         delete (s,i,2);         insert (n,s,i);         end;       i : = i +1;     end;   writeln (s);   end.