Вызов модуля - Pascal ABC

uses battle_in;
 
var
a:integer=1;
b:integer=4;
 
begin
da;
end.

unit battle_in;
interface
procedure da(a,b:integer);
implementation
procedure da(a,b:integer);
begin
write(a,'+',b,'=',a+b);
end;
end.