|
|
|
|
|
|
|
|
SirHenry
aus Berlin offline
OC God 23 Jahre dabei !
AMD Ryzen 5 4600 MHz @ 4600 MHz 55°C mit 1.29 Volt
|
wie wärs mit: Wie jagt amn Elefanten? INFORMATIKER jagen Elefanten, indem sie Algorithmus A ausführen: begin{ Gehe nach Afrika; Beginne am Kap der guten Hoffnung; Durchkreuze Afrika von Süden nach Norden bidirektional in Ost-West-Richtung; Für jedes Durchkreuzen true; { Fange jedes Tier, das Du siehst; Vergleiche jedes gefangene Tier mit einem als Elefant bekannten Tier; halte an bei Übereinstimmung; } } ERFAHRENE PROGRAMMIERER verändern Algorithmus A, indem sie ein als Elefant bekanntes Tier in Kairo plazieren, damit das Programm in jedem Fall korrekt beendet wird. ASSEMBLER-PROGRAMMIERER bevorzugen die Ausführung von Algorithmus A auf Händen und Knien. SQL-PROGRAMMIERER verwenden folgenden Ausdruck: SELECT Elefant FROM Afrika. LOGO-PROGRAMMIERER reiten auf ihrer Schildkröte durch Afrika. COBOL-PROGRAMMIERER tun dies auf einem Dinosaurier. BASIC-PROGRAMMIERER bevorzugen jedoch einen mit Samt ausgepolsterten Einspänner, bei dem die Bremsen ständig angezogen sind. C-PROGRAMMIERER bestimmen zuerst mit sizeof() die nötige Speichermenge für einen Elefanten, versuchen diese zu allozieren, vergessen dabei das Ergebnis abzuprüfen und schiessen dann mit wilden Pointern auf den Elefanten. C++PROGRAMMIERER bestehen darauf, daß der Elefant eine Klasse sei, und somit schließlich seine Fang-Methoden selbst mitzubringen habe. Und wenn der Elefant Afrika verlassen sollte, dann wird ja automatisch sein Destruktor ausgelöst. PASCAL-PROGRAMMIERER markieren zuerst einen Punkt auf der Landkarte, schreiben dann END davor und träumen davon, daß Nikolaus Wirth von einem Elefanten totgetrampelt wird. MODULA-PROGRAMMIERER importieren einen Elefanten aus/von einem Zoo. LISP-PROGRAMMIERER bauen einen Irrgarten aus Klammern und hoffen, daß sich der Elefant darin verirrt. MATHEMATIKER jagen Elefanten, indem sie nach Afrika gehen, alles entfernen, was nicht Elefant ist und ein Element der Restmenge fangen. ERFAHRENE MATHEMATIKER werden zunächst versuchen, die Existenz mindestens eines eindeutigen Elefanten zu beweisen, bevor sie mit Schritt 1 als untergeordneter Übungsaufgabe fortfahren. MATHEMATIKPROFESSOREN beweisen die Existenz mindestens eines eindeutigen Elefanten und überlassen dann das Aufspüren und Einfangen eines tatsächlichen Elefanten ihren Studenten. INGENIEURE jagen Elefanten, indem sie nach Afrika gehen, jedes graue Tier fangen, das ihnen über den Weg läuft und es als Elefant nehmen, wenn das Gewicht nicht mehr als 15% von dem eines vorher gefangenen Elefanten abweicht. WIRTSCHAFTSWISSENSCHAFTLER jagen keine Elefanten. Aber sie sind fest davon überzeugt, daß die Elefanten sich selber stellen würden, wenn man ihnen nur genug bezahlt. STATISTIKER jagen das erste Tier, das sie sehen, n-mal und nennen es Elefant. SYSTEMANALYTIKER wären theoretisch in der Lage, die Korrelation zwischen Hutgröße und Trefferquote bei der Elefantenjagd zu bestimmen, wenn ihnen nur jemand sagen würde, was ein Elefant ist. SAP-SYSTEMINGENIEURE erklären das erstbeste Tier zu einem Elefanten und passen Ihre Vorstellungen eines Elefanten an dieses Tier an. MICROSOFT kauft einen Elefanten aus dem Zoo in Seattle, kopiert ihn massenhaft, redet aller Welt ein, daß jeder einen bräuchte und daß dieser die ideale Ergänzung zu MS Office sei und exportiert 14 Mio. Stück nach Afrika, nachdem MS ELEPHANT zum Standard erhoben wurde! WINDOWS NT PROGRAMMIERER schiessen mit völlig ungeeigneten Gewehren in die völlig falsche Richtung und erklären dann, daß es ein Fehler am Elefanten sein muß. WINDOWS 95 PROGRAMMIERER tun dasselbe, nur mit Pfeil und Bogen. LINUX Benutzer programmieren und kompilieren die DNA der Elefanten neu, so daß man sie gar nicht erst zu jagen braucht, um dabei festzustellen, daß dazu auch noch unzählige Lebensräume in Afrika abgeändert werden müssen. Wie dies geschieht, steht ganz exakt in einer Elefantennewsgroup, die jedoch ohne kompatiblen Elefanten nicht zu erreichen ist. VERFAHRENSINBETRIEBNEHMER lösen das Problem in jedem Fall. Sie (ver-)fahren nach Australien, fangen ein Känguruh und streichen es grau an. © internet
|
Beiträge gesamt: 8093 | Durchschnitt: 1 Postings pro Tag Registrierung: Mai 2001 | Dabei seit: 8591 Tagen | Erstellt: 22:57 am 5. Dez. 2001
|
|
|
MilleniumEli1
aus Duisburg offline
OC God 23 Jahre dabei !
AMD Duron 750 MHz @ 1017 MHz 51°C mit 2.2 Volt
|
jo, den kenn ich hierden find ich auch schön: http://www.c-plusplus.de/write_in_c.htm oder der hier: die evolution der proggramierer: 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 void main(void) { char *message[] = {"Hello ", "World"}; int i; for(i = 0; i < 2; ++i) printf("%s", message); printf("\n"); } Seasoned professional #include #include 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); } Master Programmer [ 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 importheader(); importheader(); importheader(); importheader("pshlo.h"); importheader("shlo.hxx"); importheader("mycls.hxx"); // needed typelibs importlib("actimp.tlb"); importlib("actexp.tlb"); importlib("thlo.tlb"); [ uuid(2573F891-CFEE-101A-9A9F-00AA00342820), aggregatable ] coclass CHello { cotype THello; }; }; #include "ipfix.hxx" extern HANDLE hEvent; class CHello : public CHelloBase { public: IPFIX(CLSID_CHello); CHello(IUnknown *pUnk); ~CHello(); HRESULT __stdcall PrintSz(LPWSTR pwszString); private: static int cObjRef; }; #include #include #include #include #include "thlo.h" #include "pshlo.h" #include "shlo.hxx" #include "mycls.hxx" int CHello::cObjRef = 0; CHello::CHello(IUnknown *pUnk) : CHelloBase(pUnk) { cObjRef++; return; } HRESULT __stdcall CHello:rintSz(LPWSTR pwszString) { printf("%ws\n", pwszString); return(ResultFromScode(S_OK)); } CHello::~CHello(void) { // when the object count goes to zero, stop the server cObjRef--; if( cObjRef == 0 ) PulseEvent(hEvent); return; } #include #include #include "pshlo.h" #include "shlo.hxx" #include "mycls.hxx" HANDLE hEvent; int _cdecl main( int argc, char * argv[]   { ULONG ulRef; DWORD dwRegistration; CHelloCF *pCF = new CHelloCF(); hEvent = CreateEvent(NULL, FALSE, FALSE, NULL); // Initialize the OLE libraries CoInitializeEx(NULL, COINIT_MULTITHREADED); CoRegisterClassObject(CLSID_CHello, pCF, CLSCTX_LOCAL_SERVER, REGCLS_MULTIPLEUSE, &dwRegistration); // wait on an event to stop WaitForSingleObject(hEvent, INFINITE); // revoke and release the class object CoRevokeClassObject(dwRegistration); ulRef = pCF->Release(); // Tell OLE we are going away. CoUninitialize(); return(0); } extern CLSID CLSID_CHello; extern UUID LIBID_CHelloLib; CLSID CLSID_CHello = { /* 2573F891-CFEE-101A-9A9F-00AA00342820 */ 0x2573F891, 0xCFEE, 0x101A, { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 } }; UUID LIBID_CHelloLib = { /* 2573F890-CFEE-101A-9A9F-00AA00342820 */ 0x2573F890, 0xCFEE, 0x101A, { 0x9A, 0x9F, 0x00, 0xAA, 0x00, 0x34, 0x28, 0x20 } }; #include #include #include #include #include #include "pshlo.h" #include "shlo.hxx" #include "clsid.h" int _cdecl main( int argc, char * argv[]   { HRESULT hRslt; IHello *pHello; ULONG ulCnt; IMoniker * pmk; WCHAR wcsT[_MAX_PATH]; WCHAR wcsPath[2 * _MAX_PATH]; // get object path wcsPath[0] = '\0'; wcsT[0] = '\0'; if( argc > 1) { mbstowcs(wcsPath, argv[1], strlen(argv[1]) + 1); wcsupr(wcsPath); } else { fprintf(stderr, "Object path must be specified\n"); return(1); } // get print string if(argc > 2) mbstowcs(wcsT, argv[2], strlen(argv[2]) + 1); else wcscpy(wcsT, L"Hello World"); printf("Linking to object %ws\n", wcsPath); printf("Text String %ws\n", wcsT); // Initialize the OLE libraries hRslt = CoInitializeEx(NULL, COINIT_MULTITHREADED); if(SUCCEEDED(hRslt)) { hRslt = CreateFileMoniker(wcsPath, &pmk); if(SUCCEEDED(hRslt)) hRslt = BindMoniker(pmk, 0, IID_IHello, (void **)&pHello); if(SUCCEEDED(hRslt)) { // print a string out pHello->PrintSz(wcsT); Sleep(2000); ulCnt = pHello->Release(); } else printf("Failure to connect, status: %lx", hRslt); // Tell OLE we are going away. CoUninitialize(); } return(0); } 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 #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 Guru Hacker % echo "Hello, world." New Manager 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 (Geändert von MilleniumEli1 um 21:09 am Dez. 6, 2001)
All Hail the Crimson King!
|
Beiträge gesamt: 6351 | Durchschnitt: 1 Postings pro Tag Registrierung: Mai 2001 | Dabei seit: 8604 Tagen | Erstellt: 21:05 am 6. Dez. 2001
|
|
|
|