




Egy amerikai és egy angol versenyez, ki tud nagyobbat hazudni. Kezdi az amerikai:
- Egyszer, egy amerikai úriember...
Közbevág az angol:
- Oké, nyertél!
Az alábbi példákon nyomon követhetjük a programozó szakmai fejlődésének állomásait. Lássuk tehát, hogyan készíti el a klasszikus "Hello World" programot, életének különböző szakaszaiban:
Gimnazista
10 PRINT "HELLO WORLD"
20 END
------------------------------
Elsős egyetemista
program Hello(input, output)
begin
writeln('Hello World')
end.
------------------------------
Utolsó éves egyetemista
(defun hello
(print
(cons 'Hello (list 'World))))
------------------------------
Kezdő profi
#include <stdio.h>
void main(void)
{ char *message[] =3D {"Hello ", "World"};
int i;
for(i =3D 0; i< 2; ++i)
printf("%%s", message[i]);
printf("
");
}
------------------------------
Rafinált profi
#include <iostream.h>
#include <string.h>
class string{
private:
int size;
char *ptr;
public:
string() : size(0), ptr(new char(' ')) {}
string(const string &s) : size(s.size)
ptr =3D new char[size + 1];
strcpy(ptr, s.ptr);
}
string()
delete [] ptr;
}
friend ostream &operator <<(ostream &, const string &);
string &operator=3D(const char *);
};
ostream &operator<<(ostream &stream, const string &s){
return(stream << s.ptr);
}
string &string::operator=3D(const char *chrs){
if (this !=3D &chrs)
delete [] ptr;
size =3D strlen(chrs);
ptr =3D new char[size + 1];
strcpy(ptr, chrs);
return(*this);
}
}
int main(){
string str;
str =3D "Hello World";
cout << str << endl;
return(0);
}
------------------------------
Mesterprogramozó
uuid(2573F8F4-CFEE-101A-9A9F-00AA00342820)
]
library LHello
// bring in the master library
importlib("actimp.tlb");
importlib("actexp.tlb");
// bring in my interfaces
#include "pshlo.idl"
uuid(2573F8F5-CFEE-101A-9A9F-00AA00342820)
]
cotype THello
interface IHello;
interface IPersistFile;
};
};
exe,
uuid(2573F890-CFEE-101A-9A9F-00AA00342820)
]
module CHelloLib
// some code related header files
------------------------------
Kezdő buherátor
#!/usr/local/bin/perl=20
$msg=3D"Hello, world.
";=20
if ($#ARGV =3D 0) {=20
while(defined($arg=3Dshift(@ARGV))) {=20
$outfilename =3D $arg;=20
open(FILE, "" . $outfilename) ll die "Can't write $arg: =
$!
";=20
print (FILE $msg);=20
close(FILE) ll die "Can't close $arg: $!
";=20
}=20
} else {=20
print ($msg);=20
}=20
1;=20
------------------------------
Tapasztalt buherátor
#include=20
------------------------------
Rafinált buherátor
# cc -o a.out ~/src/misc/hw/hw.c=20
# a.out=20
------------------------------
Nagymester buherátor
# cat
Hello, world.
^D
------------------------------
Újdonsült menedzser
10 PRINT "HELLO WORLD"
20 END
------------------------------
Középvezető menedzser
mail -s "Hello, world." bob@b12
Bob, tudnal nekem holnapra irni egy programot,
ami kiirja a kepernyore, hogy "Hello word"?
Koszi!
^D
------------------------------
Vezető menedzser
# zmail jim
Delutanra szuksegem van egy "Hello Word" programra.
------------------------------
Vezérigazgató
# letter
letter: Command not found.
# mail To: ^X
^F ^C
# help mail
help: Command not found.
# faszom!
!: Event unrecognized
# logout
A II. vh. után jóval Józsi bácsi felmegy Pestre egy kicsit körülnézni. Megszólít egy rendőrt:
- Bocsánat biztos úr, meg tudná mondani, hogyan jutok el a Ferenc József hídhoz?
- Mit képzel maga öreg, az a Szabadság híd! Kotródjék innen, vagy beviszem!
Szegény paraszt gyorsan továbbindul, tépelődik magában, majd megszólít egy másik rendőrt:
- Biztos úr, kérem alássan, mondja meg nekem, merre van az Andrássy út?
- Mit gondol öreg, hol van maga, az a Lenin út! Pusztuljon innen, vagy beviszem!
Bácsika elsomfordál, leül a Duna partjára és mélabúsan kémleli a vizet. Egy arra kóricáló rendőr megkérdezi:
- Mit csinál itt maga bácsi?
- Á, hagyd el fiam, csak nézegetem a Volgát...
Egy farmernek annyi gyereke van, hogy kifogy a nevekből, ezért aztán az újszülött gyerekeinek a farmon található tárgyak után ad nevet.
Amikor a fia iskolás lesz, a tanítónő kérdezi tőle:
- Fiam, téged hogy hívnak?
- Traktorkerék, tanító néni!
- Ne szórakozz velem, az igazi nevedet mondd!
- De tanító néni, nekem tényleg ez az igazi nevem!
- Na, ha ilyen makacs vagy, akkor menj le szépen az igazgató úr irodájába! Majd ő beszél a fejeddel!
A kisfiú búsan elindul, és odaszól a szintén iskolás húgának:
- Te is gyere velem, Csirkeszar, szerintem neked se fog hinni!
- Mi az abszolút kényelmetlen?
- ???
- Tömegsírban legalul feküdni.
- Mije nagyobb egy 8 éves kislánynak, mint egy 25 éves nőnek?
- ???
- A két melle közti távolság.
Történt egyszer, hogy az amerikai, a francia és az izraeli hajótörést szendvedtek. Sikerült kiúszniuk egy közeli szigetre, ahol elfogták őket a vérszomjas kannibálok. A kannibálok kijelentették, hogy mindegyiküket megölik és megeszik, de mindenkinek lehet egy utolsó kívánsága. Az amerikai azt mondta:
"Én kérek egy jól átsütött marhasteak-et és egy hordó sört!"
Megkapta, evett-ivott, aztán bedobták a nagy üstbe főni. A francia is elmondta utolsó kívánságát:
"Én kérek egy kis sajtot, és egy üveg nagyon finom bort!"
Ő is megkapta, evett-ivott, majd őt is bedobták az amerikai melllé főni.
A vérszomjas kannibálok most az izraelit kérdezték, mi az utolsó kívánsága?
"Nem kérek mást, csak hogy jó erősen rúgjatok fenéken!"
A kannibálok nem értették, ezért megint megkérdezték, de a válasz ugyanaz volt:
"Nem kérek mást, csak hogy jó erősen rúgjatok fenéken!"
A kannibálok úgy fenéken rúgták az izraelit, hogy néhány méterrel arrébb ért csak földet. Az izraeli felállt, leporolta magát, majd elővett a zsebéből egy UZI-t, és leterítette a kannibálokat, ezután kihúzta a másik két hajótöröttet az üstből. Azok csodálkozva kérdezték:
"Ha volt fegyvered, miért nem szabadítottál ki minket eddig?"
"Na igen," - mondta az izraeli - "és hagytam volna, hogy megvádoltok indokolatlan erőszak használatával!?"
- Mi az? Feldobod semmi, leesik ötezres!
- Nem tudom, de jó lenne vele dobálózni.
- Mi az:Nagy sárga,és úgy néz ki,mint egy villanyoszlop.
- ???
- Villanyoszlop.