восстановить программу. Пользователь вводит два числа. Одно присваивается одной переменной, а второе - другой. Необходимо поменять значения переменных так, чтобы значение первой оказалось во второй, а второй - в первой.

program code_1;

     var  x, y, c: int;

begin

 readln (x);

 readln (y);

 c:=x:

 x:=y;

 y:=c;

end.

varslovo,simval: string; i,k: integer; begink: =0; write('vvedite slovo '); readln(slovo); write('vvedite simval '); readln(simval); for i: =1 to length(slovo) dobeginif slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln(i,' '); end; if k> =1 thenwriteln('yes vstre4aets9 ',k,' raz, na pozicii ',i)else writeln('no'); writeln; end.вот в одном решении

в этом варианте представлен алгоритм без обратной связи, так как алгоритм представляет собой только однозначную последовательность команд. 

такой алгоритм является линейным, или последовательным. то есть в нём отсутствует   процесс передачи информации о состоянии объекта к объекту.