Почему нельзя менять местами шаги линейного алгоритма​

for i : = 1 to length(s) do

begin

      res : = res + s[i];

      if i mod 2 = 0 then

            res : = res + s[i];

end;

writeln(res);

i : = pos(" ",s); {ищем первый пробел}

delete(s; i; 1); {удаляем первый пробел}

i : = pos(" ",s); {ищем второй пробел, котрый теперь первый}

writeln(s[i-1]); {выдаем знак который находится перед пробелом}

program;

var

max,val: integer;

label

start, ends;  

begin 

max: =-50;

val: =50;

start:

if val> max then val: =val-10

if val=max then goto ends;  

goto start;  

ends:

end. 

program _1_2; uses crt; var  dlina, shirina, vysota: real; begin  clrscr;   textcolor(14);   writeln('вычисление объёма параллелепипеда.');   writeln('введите исходные данные: ');   write('длина (см) -> ');   readln(dlina);   write('ширина (см) -> ');   readln(shirina);   write('высота -> ');   readln(vysota);   writeln('объём: ',(dlina*shirina*vysota): 7: 2);   repeat  until keypressed; end.

1)сила всех и глубина вростания репки, так же состояние здоровья каждого и состояние почвы

а так же не завалялась ли где нормальная лопата

2)смотря что такое по братски, но зная карлсона, он возьмет себе большой

3)главное чтоб пончику хватило. а больше он все равно сделать не в состоянии

4) радиус двери, радиус вини, прирост от сгущенки, прирост от меда, кол-во того и другого, скорость похудения и тп