Если правильно понял задание то как то так:
S=125
******************************************************************
Var T:string;
k:integer;
s,c:char;
begin
Writeln('Введите строку');
Readln(T);
Writeln('Введите буквы s и c');
Readln(c);
While not(Pos(s,T)=0) do
begin
k:=Pos(s,T);
T[k]:=c;
end;
Writeln('Изменённая строка - ',T);
end.
Ответ:
1. Основателем кибернетики является Норберт Винер. Первая книга по кибернетике вышла в 1948 году.
2. Управление- это целенаправленное воздействие управляющего объекта на объект управления.
3. С точки зрения кибернетики управление происходит путём информационного взаимодействия между объектом управления и управляющим объектом.
4. Алгоритм управления- это последовательность команд по управлению объектом, выполнение которой приводит к достижению заранее поставленной цели.
5. Управляющий- директор, объекты управления- учителя
Управляющий- учитель, объекты управления- ученики
Управляющий- пилот, объект управления- самолёт
Управляющий- вожак, объект управления- стая
Управляющий- пастух, объект управления- коровы
6. Обратная связь- это процесс передачи информации о состоянии объекта управления управляющему объекту.
Объяснение: