Hello world

[tclover]

How the way people code "Hello World" varies depending on their age and job:
High School/Jr.High

10 PRINT "HELLO WORLD"
20 END


First year in College

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


Senior year in College

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


New professional

#include <stdio.h>

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


Seasoned professional

#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);
}


System Administrator

#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);
}

Apprentice Hacker

#!/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;

Experienced Hacker

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


Seasoned Hacker

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


Guru Hacker

% cat
Hello, world.

New Manager (do you remember?)

10 PRINT "HELLO WORLD"
20 END


Middle Manager

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


Senior Manager

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

Chief Executive

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

Research Scientist

PROGRAM HELLO
PRINT *, 'Hello World'
END

Older research Scientist

WRITE (6, 100)
100 FORMAT (1H ,11HHELLO WORLD)
CALL EXIT
END
(c) http://www.gnu.org/fun/jokes/helloworld.html

[blaga]

Я половину языков не знаю. ((

[tclover]

main(){exit(printf(S) == strlen(S) ? 0 : 1);} - эт конечно ппц, и правда труЪ хакерский код, даже красиво блин
PS там правда не хватает хидера одного, так как exit определён в stdlib, но всё равно :)
//прим. tcl - exit передаёт код возврата вызывающему процессу, стало быть в тернарном выражении
printf(S) == strlen(S) ? 0 : 1 будет 0, так как printf вернёт тоже самое что и strlen.
PPS просто код понравился :)

[Petr]

shutdown -r
:rolleyes: А больше и не надо ;)

[A110ut]

хакерске хэловорлды рулят =)

ps: Sandjuro:"shutdown -r - больше и не надо". надо. во-превых компутер иногда надо выключать, а во-вторых надо указывать когда именно. так что не надо нас об манывать

[blaga]

shutdown -s -t 600 - через 10 минут мой комп вырубиться. Это я по рпивычке на ентер нажал. ((

[tclover]

нажми shutdown -a
если успеешь :)

[blaga]

хе. успел. )) а я и не знал что эту фигню можно снять. ))

[Petr]

Помню был вирус какой-то каторый такоеже окно показывал, было дело давно я его подвхавтиол про -a не знал тогда, вот опять задумался сработает ли :\

A110ut, если ты это смог прочесть - то больше и не надо ;)

[tclover]

=\

[Rebz]

Клов, стареешь :)
баян.. видел несколько раз, только на русском =)

[tclover]

я просто искал вчера что-то в википедии, потом нажал по ссылке, потом ещё, потом снова (ну вы же знаете как это бывает - сначала читаешь про сверхновые, а через час уже про ленточных червей (с) ) и напоролся на хелло ворды :)

[Petr]

кикипедии
КИКНЕМ ИХ ВСЕХ!

[Zebra]

не видела, понравилось +))