Задание 9 Параграф 26 ГДЗ Семакин 8 класс (Информатика)

program task_9;
var
s:string;
k:integer;
begin
s:=’операция’;
k:=length(s);
delete(s,1,1);
insert(‘*’,s,1);
delete(s,k,1);
insert(‘*’,s,k);
writeln(s)
end.

Найдём длину строки и заменим в ней первый и последний символы на символ $$*$$.

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

program task_9;
var
  s:string;
  k:integer;
begin
  s:=’операция’;
  k:=length(s);
  delete(s,1,1);
  insert(‘*’,s,1);
  delete(s,k,1);
  insert(‘*’,s,k);
  writeln(s)
end.

После выполнения программы строка операция преобразуется в *пераци*.

Ответ

*пераци*