Напишите две команды для инициализации регистра ds , полагая, что имя сегмента данных - datsegэто что-то связанное с accembler, dosbox.​

Pascalabc.net 3.3.5, сборка 1660 от 20.04.2018 внимание! если программа не работает, обновите версию! procedure zamena(var stroka: string); begin   var cin: ='abcdefghijklmnopqrstuvwxyz'.tochararray;   var n: =cin.length;   var cout: =cin[1: n]+cin[: 1];   for var i: =1 to stroka.length do begin       var p: =cin.indexof(stroka[i]);       if p> =0 then stroka[i]: =cout[p]       end end; begin   var aa: ='a bc 83xz';   aa.println;   zamena(aa);   aa.println end. пример a bc 83xz b cd 83ya

Ты имеешь 2 переменные в данном цикле: а и в, им присвоили первоначальные значения а: =2, в: =2; это цикл с пост условием, т.е. условие выхода из цикла расположено в конце цикла. теперь просто выполняем цикл: а: =а+3; в: =в+5; 1. а=5, в=7 в> 14? (7> 14? ) нет, значит продолжаем выполнение цикла 2. а=8, в=12 в> 14? нет, продолжаем 3. а=11, в=17 в> 14? да, значит мы можем выйти из цикла и продолжить выполнение алгоритма   последним значением переменной а в данном цикле было 11, т.е. а=11 после выполнения фрагмента алгоритма