10 PRINT "HELLO WORLD" 20 END
program Hello(input, output) begin writeln('Hello World') end.
(defun hello (print(cons 'Hello (list 'World))))
#include <stdio.h> void main(void) { char *message[] = {"Hello ", "World"}; int i; for(i = 0; i < 2; ++i) printf("%s", message[i]);
printf("\n"); }
#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); }
#include <stdio.h> main(){ char *tmp; int i=0; /* on y va bourin */ mp=(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); }
#!/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;
#include <stdio.h> #define S "Hello, World\n" main(){exit(printf(S)!=strlen(S));}
% cc -o a.out ~/src/misc/hw/hw.c % a.out
% cat Hello, world. ^D
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.
% letter letter: Command not found. % mail To: ^X ^F ^C % help mail help: Command not found. % damn! !: Event unrecognized % logout