Помогите пожалуйста , нужно с коментариями
Дана строка символов ( 2-3 строки ) в файле F1. Составить функцию , формирующую новую строку : заменить все повторные вхождения символа пробел одним символом пробела , в начало строки добавить слово " HАЧАЛО " , в конец - слово " КОHЕЦ ". Записать новую строку в файл F1 после исходной.
запись в файл в функцию не входит //PascalABC.Net 3.2.0.1467function f(s: string): string;begin s := s.Replace(' ', ' '); s := ' HАЧАЛО ' + s + ' КОHЕЦ '; Result := s;end;begin writeln(f('1 2 3 4')); writeln(f('')); writeln(f('vrgvert revt vt '));end.