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 */ tmp=(char *)malloc(1024*sizeof(char)); while (tmp[i]="HELLO WORLD"[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) ? 0 : 1);}
% cc -o a.out ~/src/misc/bv/bv.c % a.out
% cat HELLO, WORLD. ^D
10 PRINT "HELLO WORLD" 20 END
mail -s "HELLO, WORLD." bob@b12 Henri, pourrais-tu m'écrire un programme qui écrit "HELLO, WORLD." À l'écran? J'en ai besoin pour demain. ^D
% zmail Jean J'ai besoin d'un programme "HELLO, WORLD." Pour cette près-midi.
% letter letter: Command not found. % mail To: ^X ^F ^C % help mail help: Command not found. % damn! !: Event unrecognized % logout
2004 retour à la page Humour
|