Создать модуль из имеющегося кода - Free Pascal

Формулировка задачи:

Добрый день! Помогите пожалуйста с программой. Написал её, а нужно ещё сделать модуль. Сама программа вот(без модуля, в первоначальном виде)

                    Листинг программы
                
 
                        
                          
                    
Program Lab_7;
 
var  s, s1: string;
     i, j, k:integer;
 
begin
    
write('Введите строку= ');
    readln(s);
    s:=s+' ';
    k:=1;
       for i:=1 to length(s) do
      begin
      if s[i]=' ' then begin
       for j:=i-1 downto k do
         s1:=s1 + s[j];
         s1:=s1 + ' ';
         k:=i;
        end;
end;
    writeln('Результат= ', s1);
 end.

Далее попытался написать модуль, но не совсем получилось. Модуль:

                    Листинг программы
                
 
                        
                          
                    
unit modul;
 
interface
 
Procedure Inver;
 
implementation
 
Procedure Inver;
 
begin
 
Procedure Inver;
var  s, s1: string;
     i, j, z, k:integer;
 
begin
 
write('Введите строку= ');
    readln(s);
    s:=s+' ';
    k:=1;
       for i:=1 to length(s) do
      begin
      if s[i]=' ' then begin
       for j:=i-1 downto k do
         s1:=s1 + s[j];
         s1:=s1 + ' ';
         k:=i;
        end;
end;
end;
end.

Программа в результате:

                    Листинг программы
                
Program Lab_7;
uses modul;
 
begin
    Procedure Inver(s, s1);
    writeln('Результат= ', s1);
end.

Знаю, что тут куча ошибок. Модули никогда не писал. Сейчас делал, используя информацию, которую нашел. Помогите пожалуйста

Решение задачи: «Создать модуль из имеющегося кода»

textual
                            Листинг программы 
                        
s:=s+' ';
k:=1;
s1:='';