1. начальное состояние: исполнитель находится в нижнем правом углу и смотрит вверх. где будет исполнитель после выполнения следующих программ? а) пока впереди не край повторять нц прыжок кц поворот поворот пока впереди не край повторять нц прыжок кц б) пока впереди не край повторять нц прыжок поворот прыжок поворот поворот поворот кц

в первом случае, если я не ошибаюсь, исполнитель вернётся на   изначальное место.

во втором всё зависит от размера поля. если не сложно, напиши в лс. а так должен оказаться в противоположном углу. он пойдёт квадратиками вверх влево.

Var        str: string;         i, count: integer; begin        write('your string: ');         readln(str);         i : = length(str);         if i > 0 then begin                count : = 1;                 while i > 0 do begin                        if str[i] = ' ' then                                count : = count + 1;                         i : = i - 1;                 end;         end        else                count : = 0;                 delete(str,3,1);         writeln('number of words: ', count);           writeln(str); readln; end.

Предполагается, что восьмеричное число записано, как символьная строка, поскольку максимальная разрядность не была оговорена в . const   m: array['0'..'7'] of string=           ('000','001','010','011','100','101','110','111');   m1: array['1'..'7'] of string=           ('1','10','11','100','101','110','111'); var   s8,s2: string;   i: integer; begin   write('введите восьмеричное число: '); readln(s8);   s2: =m1[s8[1]];   for i: =2 to length(s8) do s2: =s2+m[s8[i]];   writeln('в двоичной системе: ',s2) end. тестовое решение: введите восьмеричное число: 360721 в двоичной системе: 11110000111010001