Begin s := 'La cadena ' + NombreCadena + ' sera la misma, pero al Sr. ' + NombreProgramador + ' le costara mucho menos entender este ' + NombrePrograma;