不同年龄职业的人所写的Hello World程序 

高中（BASIC） 

10 PRINT "HELLO WORLD" 
20 END 


大一（PASCAL） 

program Hello(input, output) 
begin 
writeln('Hello World') 
end. 


大二以后（LISP） 

(defun hello 
(print 
(cons 'Hello (list 'World)))) 

职场新人（C） 

#include <stdio.h> 

void main(void) 
{ 
char *message[] = {"Hello ", "World"}; 
int i; 
for(i = 0; i < 2; ++i) 
printf("%s", message[i]); 
printf("\n"); 
} 

职场老手（C++） 

#include <iostream.h> 
#include <string.h> 
class string 
{ 
private: 
int size; 
char *ptr; 
public: 
string() : size(0), ptr(new char('\0')) {} 
string(const string &s) : size(s.size) 
{ 
ptr = new char[size + 1]; 
strcpy(ptr, s.ptr); 
} 
~string() 
{ 
delete [] ptr; 
} 
friend ostream &operator <<(ostream &, const string &); 
string &operator=(const char *); 
}; 

ostream &operator<<(ostream &stream, const string &s) 
{ 
return(stream << s.ptr); 
} 
string &string::operator=(const char *chrs) 
{ 
if (this != &chrs) 
{ 
delete [] ptr; 
size = strlen(chrs); 
ptr = new char[size + 1]; 
strcpy(ptr, chrs); 
} 
return(*this); 
} 
int main() 
{ 
string str; 
str = "Hello World"; 
cout << str << endl; 
return(0); 
} 


系统管理员（C） 

#include <stdio.h> 
#include <stdlib.h> 
main() 
{ 
char *tmp; 
int i=0; 
/* on y va bourin */ 
tmp=(char *)malloc(1024*sizeof(char)); 
while (tmp[i]="Hello Wolrd"[i++]); 
/* Ooopps y'a une infusion ! */ 
i=(int)tmp[8]; 
tmp[8]=tmp[9]; 
tmp[9]=(char)i; 
printf("%s\n",tmp); 
} 

学徒黑客（Perl） 

#!/usr/local/bin/perl 
$msg="Hello, world.\n"; 
if ($#ARGV >= 0) { 
while(defined($arg=shift(@ARGV))) { 
$outfilename = $arg; 
open(FILE, ">" . $outfilename) || die "Can't write $arg: $!\n"; 
print (FILE $msg); 
close(FILE) || die "Can't close $arg: $!\n"; 
} 
} else { 
print ($msg); 
} 
1; 

有经验的黑客（C） 

#include <stdio.h> 
#include <string.h> 
#define S "Hello, World\n" 
main(){exit(printf(S) == strlen(S) ? 0 : 1);} 


老练的黑客 

% cc -o a.out ~/src/misc/hw/hw.c 
% a.out 
Hello, world. 


大师级黑客 

% cat 
Hello, world. 

部门经理（BASIC） 

10 PRINT "HELLO WORLD" 
20 END 


项目经理 

mail -s "Hello, world." bob@b12 
Bob, could you please write me a program that prints "Hello, world."? 
I need it by tomorrow. 
^D 


高管 

% zmail jim 
I need a "Hello, world." program by this afternoon. 

CEO 

% letter 
letter: Command not found. 
% mail 
To: ^X ^F ^C 
% help mail 
help: Command not found. 
% damn! 
!: Event unrecognized 
% logout 

科研专家（Fortran 90） 

PROGRAM HELLO 
PRINT *, 'Hello World' 
END 

上岁数的科研专家（Fortran 77） 

WRITE (6, 100) 
100 FORMAT (1H ,11HHELLO WORLD) 
CALL EXIT 
END 

你属于哪一类呢？