"HELLO WORLD"

SvinkaVJeansah

Предлагаю в этом треде постить коды субжа на всех мыслимых и немыслимых языках.

eee1

%echo Hello World

bastii

мб тогда язык будешь указывать

SvinkaVJeansah

basic



PRINT "Hello World!"

eee1

в перле тоже самое

dgaf



msg db 'Hello world$'

lea dx, msg

mov ah, 09h

int 21h

типа того

SvinkaVJeansah

Любитель asm-а

SvinkaVJeansah

#include <stdio>



void main(void)

{

printf("Hello World!");

}

eee1

этот код не соответствует стандарту C99

Dasar

sql: select 'Hello world'
bat: @echo Hello world

dgaf

http://www.roesler-ac.de/wolfram/hello.htm

SvinkaVJeansah

Извини, не читал стандарт.
Можно так:



#include <stdio>



int main(void)

{

   printf("Hello World!\n");

   return 0;

}

eee1

надо вот так: #include <stdio.h>

dgaf

гы



Hello World in Spiral. No comment character exists.



e0v ***   *eXlv**   *lX      *2X       **oXi

v * * *   *     *   * 2      * o      **   v*

* * * *   * *****   * v      * v      * *iX *

* * * *   * *       * ^      v *      * * w *

* *** *   * *****   * v      * *      * * v *

*     *   *     ^   * ^      * *      * * * *

* *** *   * ****v   * v      * *      v * * *

* * * *   * *       * *      * *      ^ * * *

* * * *   * *****   * *****  * *****  * *** *

* * * *   *     *   *     *  *     *  **   **

*** ***   *******   *****v^  *******   *****



*wX ***    **3Xp    *rX4..   d5*      qd**  

* 3 * *   **   v^   *    ..  * *      *  ***

* v * ^   * #pX v   * ..  .  * *      *    **

* *** v   * # r #   * ..  .  * *      * !q* *

* * * *   * # v #   * 54 ..  * *      * * * *

* * * *   * # * #   *   @X   * *      * * * *

* * * *   * # * #   *   v    * *      * * * *

* * * *   * # * #   * * **   * *      * * * *

*  *  *   * # * #   * ** **  * *      * *** *

*  *  *   * #v* ^   * *** *  * *****  *    **

** * **   **   *v   * * * *  *     *  *  ***

 *****     *v^**    *** ***  *******  ****

в нормальном виде: http://www.roesler-ac.de/wolfram/hello.htm#Spiral

SvinkaVJeansah

Неее, так много не интересно

eee1

самый короткий вариант:

QScheme> "Hello World!"
"Hello World!"
QScheme>

Julie16



class ostream

{

        public:

                ostream

                {



                }



                ~ostream

                {

                }



                ostream& operator<< ( const char* st )

                {

                        while( *st )

                        {

                                *this << *st;

                                st++;

                        }

                }



                ostream& operator<< ( char ch )

                {

                        int result;



                        asm volatile (

                                "movl $4, %%eax\n\t"

                                "movl $1, %%ebx\n\t"

                                "movl %1, %%ecx\n\t"

                                "movl %2, %%edx\n\t"

                                "int $0x80\n\t"

                                : "=m" (result)

                                : "m" (&ch "m" (1)

                        );

                }

};



int main

{

        ostream << "Hello World\n";

}

deestr

Не Тарас это не то, вот:

#include <linux/init.h>
#include <linux/module.h>
MODULE_LICENSE("Dual BSD/GPL");
static int hello_init(void)
{
printk(KERN_ALERT "Hello, world\n");
return 0;
}
static void hello_exit(void)
{
printk(KERN_ALERT "Goodbye, cruel world\n");
}
module_init(hello_init);
module_exit(hello_exit);

SvinkaVJeansah

garikus

src/hello.c:



/* hello.c -- print a greeting message and exit.

   Copyright (C) 1992, 1995, 1996, 1997-1999, 2000-2002

                 Free Software Foundation, Inc.



   This program is free software; you can redistribute it and/or modify

   it under the terms of the GNU General Public License as published by

   the Free Software Foundation; either version 2, or (at your option)

   any later version.



   This program is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.



   You should have received a copy of the GNU General Public License

   along with this program; if not, write to the Free Software

   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307,

   USA.  */



/* AIX requires this to be the first thing in the file.  */

#if defined (_AIX) && !defined (__GNUC__)

 #pragma alloca

#endif



#ifdef HAVE_CONFIG_H

#include <config.h>

#endif



#include <getopt.h>

#include <stdio.h>



#include <sys/types.h>

#include <sys/stat.h>

#include <pwd.h>

#include <errno.h>



#ifdef HAVE_UNISTD_H

#include <unistd.h>

#endif



#ifdef HAVE_LOCALE_H

#include <locale.h>

#endif



#if ENABLE_NLS

#include <libintl.h>

#define _(String) gettext (String)

#else

#define _(String) (String)

#endif



#ifndef errno

extern int errno;

#endif



#ifdef	STDC_HEADERS

#include <stdlib.h>

#else	/* Not STDC_HEADERS */

extern void exit ;

extern char *malloc ;

#endif	/* STDC_HEADERS */



#ifdef	HAVE_STRING_H

#include <string.h>

#else

#include <strings.h>

#endif



#ifdef HAVE_FCNTL_H

#include <fcntl.h>

#endif

#ifdef HAVE_SYS_FILE_H

#include <sys/file.h>

#endif



#ifdef	__GNUC__

#undef	alloca

#define	alloca(n)	__builtin_alloca (n)

#else	/* Not GCC.  */

#ifdef	HAVE_ALLOCA_H

#include <alloca.h>

#else	/* Not HAVE_ALLOCA_H.  */

#ifndef	_AIX

extern char *alloca ;

#endif	/* Not _AIX.  */

#endif	/* HAVE_ALLOCA_H.  */

#endif	/* GCC.  */



#ifdef HAVE_SYS_PARAM_H

/* To possibly get the definition of DEV_BSIZE. */

#include <sys/param.h>

#endif

#include "system.h"



#define the (1)



struct option longopts[] =

{

  { "version", no_argument, NULL, 'v' },

  { "help", no_argument, NULL, 'h' },

#define lives

  { "traditional", no_argument, NULL, 't' },

  { "next-generation", no_argument, NULL, 'n' },

  { "mail", no_argument, NULL, 'm' },

  { NULL, 0, NULL, 0 }

};



extern char version[];



static char *progname;



int

main (argc, argv)

     int argc;

     char *argv[];

{

  int optc;

  int h = 0, v = 0, t = 0, m = 0, n = 0, lose = 0, z = 0;



  progname = argv[0];



#ifdef HAVE_SETLOCALE

  /* Set locale via LC_ALL.  */

  setlocale (LC_ALL, "");

#endif



#if ENABLE_NLS

  /* Set the text message domain.  */

  bindtextdomain (PACKAGE, LOCALEDIR);

  textdomain (PACKAGE);

#endif



#define king

  while optc = getopt_long (argc, argv, "hmntv", longopts, (int *) 0

         != EOF)

    switch (optc)

      {

      case 'v':

        v = 1;

        break;

      case 'h':

        h = 1;

        break;

      case 'm':

        m = 1;

        break;

      case 'n':

        n = 1;

        break;

      case 't':

        t = 1;

        break;

      default:

        lose = 1;

        break;

      }

  

  if (optind == argc - 1 && strcmp (argv[optind], "sailor") == 0)

    z = 1;

  else if (lose || optind < argc)

    {

      /* Print error message and exit.  */

      if (optind < argc)

        fputs (_("Too many arguments\n" stderr);

      fprintf (stderr, _("Try `%s --help' for more information.\n" 

               progname);

      exit (1);

    }



  /* `help' should come first.  If `help' is requested, ignore the other

     options. */

  if (h)

    {

      /* Print help info and exit.  */

      /* TRANSLATORS: --help output 1

         no-wrap */

      fputs (_("\

GNU hello, THE greeting printing program.\n" stdout);

      printf ("\n");

      /* TRANSLATORS: --help output 2

         no-wrap */

      printf (_("\

Usage: %s [OPTION]\n" progname);



      printf ("\n");

      /* TRANSLATORS: --help output 3 : options 1/2

         no-wrap */

      fputs (_("\

  -h, --help          display this help and exit\n\

  -v, --version       display version information and exit\n" stdout);



      printf ("\n");

      /* TRANSLATORS: --help output 4 : options 2/2

         no-wrap */

      fputs (_("\

  -t, --traditional       use traditional greeting format\n\

  -n, --next-generation   use next-generation greeting format\n\

  -m, --mail              print your mail\n" stdout);



      printf ("\n");

      /* TRANSLATORS: --help output 5 (end)

         TRANSLATORS, please don't forget to add the contact address for

         your translation!

         no-wrap */

      printf (_("\

Report bugs to <%s>.\n" PACKAGE_BUGREPORT);



      exit (0);

    }



  if (v)

    {

      /* Print version number.  */

      printf ("hello - GNU %s %s\n", PACKAGE, version);

      /* xgettext: no-wrap */

      printf ("\n");

      printf (_("\

Copyright (C) %s Free Software Foundation, Inc.\n\

There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A\n\

PARTICULAR PURPOSE.  You may redistribute copies of GNU %s under the terms\n\

of the GNU General Public License.\n\

For more information about these matters, see the file named COPYING.\n"

              "1992, 1993, 1997-2001", PACKAGE);

      exit (0);

    }

  if (m && t)

    {

      fprintf (stderr, _("%s: Incompatible flags: -m and -t\n" progname);

      exit (1);

    }

  

  if (m)

    {

      /* Try to read mail. */

      char *mailname, *buf, *getenv ;

      int mailfd, cc;

      struct stat st;

      

      mailname = getenv ("MAIL");

      if (!mailname)

        {

          static char *dirs[] =

          {

            "/var/spool/mail",

            "/usr/spool/mail",

            "/var/mail",

            "/usr/mail",

            0

          };

          char **d;

          unsigned int dirlen, userlen;

          

          char *user = getenv ("USER");

          

          if (! user)

            {

              struct passwd *pwd = getpwuid (getuid ;

              if (! pwd)

                {

                  fprintf (stderr, _("%s: Who are you?\n" progname);

                  exit (1);

                }

              user = pwd->pw_name;

            }

	  

	  dirlen = 0;

	  for (d = dirs; *d != 0; ++d)

	    {

	      unsigned int len = strlen (*d);

	      if (len > dirlen)

		dirlen = len;

	    }



	  userlen = strlen (user);



	  mailname = (char *) alloca (dirlen + 1 + userlen + 1);



	  d = dirs;

	  do

	    {

 	      if (*d == 0) {

            fprintf (stderr, _("%s: Cannot find your mail spool file.\n"

                     progname);

            exit(1);

 	      }

 	      sprintf (mailname, "%s/%s", *d, user);

	      mailfd = open (mailname, O_RDONLY);

	    ++d;

        } while (mailfd == -1 && (errno == ENOENT || e

SvinkaVJeansah

концептуальное решение

vall

а где-же automake/autoconf оформленный по всем стандартам

глять на пакет hello
локализация ченьджлоги дебианизация тесты ман чё там только нет

rosali

[:|/\/\/\|:]

Julie16

Аццтой. У них С++ намного слабее чем у меня

Dasar

> самый короткий вариант:
Самые короткие будут web-овские языки:
html: Hello world
aspx: Hello world

korol41

PHP

<?php

   echo "Hello, world!\n";

?>

LaTeX2e

\documentclass{article}



\begin{document}

Hello, world!

\end{document}

Java

class HelloWorld {

    public static void main(String[] args) {

        System.out.println("Hello, world!");

}

dgaf

<?php
echo "Hello, world!\n";
?>

может echo "Hello, world!<br>"; ?

korol41

Да можно и без \n, и без <br> вообще-то

feliks28

Вот еще для PHP вариант

<?="Hello, World!"?>

Узнал .

Elina74

I'm real programmer. Fortran:



PROGRAM HELLOWORLD

    PRINT *, "HELLO, WORLD"

END PROGRAM

Vladu

 

C  Fortran 77

C  lines must be 6 characters indented

      PROGRAM HELLOW

      WRITE(UNIT=*, FMT=*) 'Hello World'

      END

Flack_bfsp

REFAL 2:
start
entry go
extrn PROUT
go = <prout 'Hello, world!'>
end

janlynn

begin
writeln('Hello, World !');
end.

Flack_bfsp

Что за язык? явно не стандарт Паскаля

janlynn

проверил - работает

sergey_m

module_init(hello_init);

Модуль очень актуальный для раздела Programming:
http://www.freebsd.org/cgi/query-pr.cgi?pr=79421
P.S. от первого апреля

sidsid

echo "hello world" | perl -e '$?s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

deestr

"Should I use C# or Java?"

Что то я туго сображаю сегодня.
Как можно связать С#, Java, С, freebsd, linux.
Этот код для модуля ядря linux 2.6.x на С.

sergey_m

А это модуль для FreeBSD, который даёт ответы на сложные вопросы. Например про Java и C#.

Vlad77

Старший менеджер
% zmail Петя
Мне нужна программа "Hello, world." после обеда.
Директор
% letter
letter: Command not found.
% mail
To: ^X ^F ^C
% help mail
help: Command not found.
% damn!
!: Event unrecognized
% logout

janlynn

http://people.sci.pfu.edu.ru/saluena/humour/evolution.html

yolki

Это случайно не тот, скрипт на перле, который делает "rm -rf /" ?

evgen5555

Гавно нах.

Vlad77

он

akkylla

http://people.sci.pfu.edu.ru/saluena/humour/evolution.html

Последний вариант для master pogrammer я не понял

А вообще респектно

zya369

sql: select 'Hello world'

маза, в DB2 так не прокатит

mr82

 

about:Hello%20World!

evgen5555

H3110 w0|2|_D

bleyman

k3wl! U p0wnd!

stm5643616

PL/SQL:



begin

  dbms_output.put_line('Hello, world!');

end;

/

Oracle SQL:



select 'Hello, world!' from dual;

Paradox

auto
10 rem Proga
20 print "Hallo world!"
30 end
старый добрый ностальгический gwbasic

SvinkaVJeansah

Хм... закину сюда свою самую первую прогу в жизни (тот самый gwbasic):
10 PRINT "пiвень"

Chupa



.globl _start

_start:

        br $27,_start1

_start1:

        lda $0,4($31)

        lda $16,1($31)

        lda $17data-_start1$27)

        lda $18,13($31)

        callsys

        lda $0,1($31)

        mov $31,$16

        callsys

data:

.string "Hello World!\n"

Flack_bfsp

Вы хоть указывайте, что за языки.

sergey_m

Почему именно "пiвень"?

SvinkaVJeansah

Хз, так получилось - батя мне показал, что такое gwbasic и объяснил, как написать "прогу", которая будет печатать "пiвень". Это было позно вечером и я, довольный результатом и гордый собой, лег спать.

myrka68

со слов одного рюха



A 100 INC AX

E 101 65 63 68 6F

A 105 AND[BX+SI+65],CL

E 108 6C 6C 6F

A 10B SUB AL,20

A 10D PUSH DI

E 10E 6F

A 10F JB 017D

E 111 64

A 112 AND[DI],CX

E 114 0A

n hello.out

rcx

14

w

q

q

q

говорят, что если это положить в файл hello.in, а потом сделать debug < hello.in, то всё будет работать

поскольку винды нет, то проверить не смог

Chupa

лол

Flack_bfsp

Короче, гон.

Buyandin

Ни фига не гон

тот вариант отлично компилится под win2k, но щас проверил под ХР почему-то нет
вот вариант под ХР
code:
A 100
INC AX
E 101 65 63 68 6F
A 105
AND[BX+SI+65],CL
E 108 6C 6C 6F
A 10B
SUB AL,20
A 10D
PUSH DI
E 10E 6F
A 10F
JB 017D
E 111 64
A 112
AND[DI],CX
E 114 0A
n hello.out
rcx
14
w
q
q
q
все работает!

Chupa

теперь посмотри каким-нибудь текстовым редактором hello.out

Flack_bfsp

Фигня!
Какой же это хеллоуфорлд!

Buyandin

ладно, уломал..
Вот вариант, который поймет любой ребенок, даже идиот!

кладем это в файл с именем hello.bat и наблюдаем результат
code:
@echo off
echo A 100 > a
echo INC AX >> a
echo. >> a
echo E 101 65 63 68 6F >> a
echo A 105 >> a
echo AND[BX+SI+65],CL >> a
echo. >> a
echo E 108 6C 6C 6F >> a
echo. >> a
echo A 10B >> a
echo SUB AL,20 >> a
echo. >> a
echo A 10D >> a
echo PUSH DI >> a
echo. >> a
echo E 10E 6F >> a
echo. >> a
echo A 10F >> a
echo JB 017D >> a
echo. >> a
echo E 111 64 >> a
echo A 112 >> a
echo AND[DI],CX >> a
echo. >> a
echo E 114 0A >> a
echo n z.bat >> a
echo rcx >> a
echo 14 >> a
echo w >> a
echo q >> a
echo. >> a
debug < a > b
call z.bat
del a b z.bat
PS: ничего личного

Flack_bfsp

Мой си-подобный интерпретатор (прак второго курса)

program
{
write("Hello, World!", endl);
}

enochka1145

(Взято с http://en.wikipedia.org/wiki/Common_Intermediate_Language)
This is a Hello world program in CIL.

.assembly HelloWorld

.class auto ansi HelloWorldApp

{

     .method public hidebysig static void Main cil managed

     {

          .entrypoint

          .maxstack 1

          ldstr "Hello world."

          call void [mscorlib]System.Console::WriteLine(string)

          ret

     }

}

vl2009

// Compile:
// as -o hellolinux.o hellolinux.s
// ld -s -o hellolinux hellolinux.o
//
.text
.globl _start
_start:
movl $4,%eax
xorl %ebx,%ebx
incl %ebx
movl $message,%ecx
movl $message_l,%edx
int $0x80
xorl %eax,%eax
incl %eax
xorl %ebx,%ebx
int $0x80
hlt
.data
message:
.string "Hello world\012"
message_l=.-message

simonov

а можно еще вот так.
кладем вот это в файл с именем hello.dmp
A 100
inc ax
jb 168
E 103 6d
A 104
and [bx+si],ah
nop
mov ah,09
mov dx,110
int 21
int 20
dec ax
E 111 65 6c 6c 6f
A 115
sub al,20
push di
E 118 6f
A 119
jb 187
E 11b 64
A 11c
and [si],sp
or ax,400a
E 121 65 63 68 6f
A 125
and [bx+si+65],cl
E 128 6c 6c 6f
A 12b
sub al,20
push di
E 12e 6f
A 12f
jb 19d
E 131 64 21
n hello.com
rcx
33
w
n hello.bat
rcx
33
w
q
q
q
потом делаем debug < hello.dmp
в результате получатся 2 файла с одинаковым (!) содержимым hello.bat и hello.com, каждый из которых выводит на экран любимую фразу.
Таким образом получаем пример программы, которая одновременно является и batch-скриптом и исполняемым com-файлом!

Flack_bfsp

Гениально!

evgen5555

Тебя кто-то просит комментировать происходящее здесь?

Chupa

Гуманитарии они такие, да.

Зашел случайно

Победителем на самый короткий код будет РНР.
Создаем файл hello.php
Пишем в нём строку
Hello Word!
Даже переноса строки не нужно - и того всего 12 байт. Открываем в браузере или в консоли - задача выполнена.

Оставить комментарий