Не­ко­то­рый ал­го­ритм из одной це­поч­ки сим­во­лов по­лу­ча­ет новую це­поч­ку сле­ду­ю­щим об­ра­зом. Сна­ча­ла вы­чис­ля­ет­ся длина ис­ход­ной це­поч­ки сим­во­лов; если она чётна, то в се­ре­ди­ну це­поч­ки сим­во­лов до­бав­ля­ет­ся сим­вол А, а если нечётна, то в на­ча­ло це­поч­ки до­бав­ля­ет­ся сим­вол Б. В по­лу­чен­ной це­поч­ке сим­во­лов каж­дая буква за­ме­ня­ет­ся бук­вой, сле­ду­ю­щей за ней в рус­ском ал­фа­ви­те (А — на Б, Б — на В и т. д., а Я — на А). По­лу­чив­ша­я­ся таким об­ра­зом це­поч­ка яв­ля­ет­ся ре­зуль­та­том ра­бо­ты ал­го­рит­ма. На­при­мер, если ис­ход­ной была це­поч­ка ВРМ, то ре­зуль­та­том ра­бо­ты ал­го­рит­ма будет це­поч­ка ВГСН, а если ис­ход­ной была це­поч­ка ПД, то ре­зуль­та­том ра­бо­ты ал­го­рит­ма будет це­поч­ка РБЕ.

Дана це­поч­ка сим­во­лов ТОР. Какая це­поч­ка сим­во­лов по­лу­чит­ся, если к дан­ной це­поч­ке при­ме­нить опи­сан­ный ал­го­ритм два­жды (т. е. при­ме­нить ал­го­ритм к дан­ной це­поч­ке, а затем к ре­зуль­та­ту вновь при­ме­нить ал­го­ритм)? Рус­ский ал­фа­вит: АБВ­ГДЕЁЖЗИЙ­КЛМ­НОПР­СТУ­ФХ­ЦЧ­Ш­ЩЪ­Ы­Ь­Э­ЮЯ. ​

Много лет назад интеллект человека во многом определялся его возможностью запоминать, но теперь большой объем информации есть в поисковых системах и баз данных. Поэтому очевидно, что технологии меняют интеллектуальные навыки людей. И от человека зависит какой эффект – положительный или отрицательный окажут на человечество грядущие будущие технологии. Технологии будущего в дальнейшем позволят вылечить множество не смертельных, но жестоких заболеваний. Разнообразные смартфоны, ноутбуки, Интернет позволяют человеку работать в любом месте и в любое время. Технологии будущего повысят выживаемость человека как вида. Именно современные технологии сегодня позволяют совершать сложные операции на сердце и головном мозге. Кроме того, в настоящем появились новые возможности восстановить здоровье. А что же нас ждет впереди? Будущее вообще очень сложно прогнозировать. Происходит смена культур, смена типов мышления, типов общественных взаимоотношений. Главное развитие технологий будущего – это совершенно невиданные современных детей, которые реорганизуют наш мир и улучшат условия жизни человека.

Program pr;
uses crt; 
Var a,b,c:integer; 

Begin   
Write('Введите 1-ю сторону: '); Readln(a);   
Write('Введите 2-ю сторону: '); Readln(b);   
Write('Введите 3-ю сторону: '); Readln(c); 
  
{Проверка на существование треугольника} 
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a)   then        
     Begin                     
          if ((a=b)or (b=c) or (a=c)) then               
                Writeln('Треугольник равнобедренный');                       
 
         if ((a=b) and (b=c)) then               
            Writeln('Треугольник равносторонний')                 
         else Writeln('Треугольник разносторонний');           
  
        if ((a*a+b*b = c*c) or (a*a+c*c = b*b) or (b*b+c*c = a*a))    then
             Writeln('Треугольник прямоугольный');                      
    end   
   else       Writeln('Треугольник нельзя построить');    

Readln(); 
END.