var  Result :string;
begin
  Result := MainCalculation;
end.