% function UmfangSprache( sprache ):
%   Sprachabhängige Ausgaben
%   sprache = 'g', 'e', 'f, 's', etc.
function UmfangSprache( sprache )
    switch( sprache )
       case 'g'
          prompt = 'Bitte Radius eingeben: ';
          pText  = 'Der Umfang zum Radius %g ist %g. \n';
       case 'e'
          prompt = 'Please type in radius value: ';
          pText  = 'The circumsphere for radius %g is %g. \n';
       case 'f'
          prompt = 'Le rayon, s.v.p.: ';
          pText  = 'La circonference pour le rayon %g est %g \n';
       case 's'
          prompt = 'Indique el radio, por favor: ';
          pText  = 'La circunferencia del radio %g es %g \n';
       otherwise
          prompt = 'Bitte Radius eingaben: ';
          pText  = 'Der Umfang zum Radius %g ist %g. \n';
    end
    
    r = input( prompt );
    
    u = 2 * pi * r;
    
    fprintf( pText, r, u );
end
