function F(a: integer): string;
begin
  Result := '';
  if a = 1 then
    Result := 'ТА';
  if a = 2 then
    Result := 'ТРА'
end;

begin
  var s1 := F(2) + '-' + F(1) + '-' + F(1);
  var s2 := 'Мы везем с собой ко';
  var s := s1 + ', ' + s1 + '! ' + s2 + F(1) + '!';
  Print(s)
end.