Hello world!

Автор:

DrRoot

26 мая 2016 11:37

Метки: hellworld языки программирования истории

3393

«Hello, world!» — программа, результатом работы которой является вывод на экран или иное устройство фразы «Hello, world!». Обычно это первый пример программы в учебниках по программированию, и для многих студентов такая программа является первым опытом при изучении нового языка. А как выглядит «Hello, world!» на разных языках программирования? Картинок больше не будет :)

BASIC

10 PRINT "Hello, World!"

Quick/Turbo BASIC:

? "Hello, World!"

Fortran 77

PROGRAM HELLOW
WRITE(UNIT=*, FMT=*) 'Hello World'
END

Ruby

puts 'Hello, World!'

Pawn

print "Hello, World!"

Python 3.0

print("Hello, World!")

MS-DOS shell

echo Hello, world!

Rexx

Say 'Hello, world!'

Pascal

begin
write('Hello, World!')
end.

Delphi

Консоль:
begin
Writeln('Hello, World!');
end.

WinAPI:
uses windows;
begin
MessageBox(0,'Hello, World!','Заголовок',0);
end.

Ада

with Ada.Text_IO;
procedure Hello_World is
begin
Ada.Text_IO.Put_Line ("Hello World");
end Hello_World;

Модула-3

MODULE Main;
IMPORT IO;
BEGIN
IO.Put ("Hello World\n")
END Main.

Visual Basic

Sub Main()
print "Hello, World!"
End Sub

Lotus Script

Messagebox "Hello, World!", MB_OK

Или так (не самый заметный вариант):

Print "Hello, World!"

Или рядом с LS:

@Prompt([OK];"";"Hello, World!");

Ещё на "собаках" (аналог print'а):

@StatusBar("Hello, World!")

InstallScript

Messagebox("Hello, World!", MB_OK);

AutoIT

MsgBox(0, "AutoIT Window", "Hello, world!", 0.75)

C/C++

#include <stdio.h>

int main(void)
{
printf("Hello, World!\n");
return 0;
}

C++

#include <iostream>
int main()
{
std::cout << "Hello, World!" << std::endl;
return 0;
}

Win32 API:

#include <windows.h>
int WINAPI WinMain (HINSTANCE,HINSTANCE,PSTR,int){
MessageBox(0,"Hello, World","F*ck",0);
return 0;
}

Objective-C

#import <Foundation/Foundation.h>
@interface HelloWorld : NSObject
@end
@imlementation HelloWorld
+load{
NSLog(@"Hello, World!");
return;
}
@end

C#

В консоль:

using System;

class Program
{
static void Main()
{
Console.Write("Hello, World!");
}
}

В окошко:

class Program
{
static void Main()
{
System.Windows.Forms.MessageBox.Show("Hello, World!");
}
}

F#

printfn "Hello, World!"

Boo

print("Hello, World!")

Perl

#!/usr/bin/perl
print "Hello, World!\n";

или

perl -le 'print "Hello, World!"'

Haskell

import qualified Data.ByteString as BS
import System.IO
message :: [[Char]]
message = [ 'H':'e':'l':'l':'o':',':[]
, 'w':'o':'r':'l':'d':'!':[] ]
putHelloWorld :: [Char] -> IO()
putHelloWorld (x:xs) =
Prelude.putChar(x) >> putHelloWorld xs
putHelloWorld [] = Prelude.putChar('\n')
main :: IO ()
main =
hSetBuffering stdout NoBuffering >> hSetBuffering stdin LineBuffering >> putHelloWorld(message')
where
message' = let f = (++) . (++ " ")
f' = foldl1 f
in f' message

Чуть менее полный матана вариант кода на Haskell:

main = putStrLn "Hello, world!"

LISP

(princ "Hello, world!")

Clojure

(println "Hello world")

Forth

: HelloWorld ." Hello, world!" ;

BrainFuck

++++++++++[>+++++++>++++++++++>+++>+<<<<-]>++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>.

Factor

USE: io
IN: hello-world

: hello ( -- ) "Hello, world!" print ;
MAIN: hello

1С:Предприятие 7.7/8/8.1/8.2

Предупреждение("Hello, world");

DoMessageBox("Hello, world",,"Attention");

Сообщить("Привет, Мир!");

Message("Привет, Мир!", MessageStatus.Attention);

Java

Консоль:

public class HelloWorld {
public static void main(String[] args) {
System.out.println("Hello, world!");
}
}

В окошко:

import java.awt.*;
import javax.swing.*;
public class HelloWorld extends JFrame{
HelloWorld(){
setVisible (true);
setDefaultCloseOperation(EXIT_ON_CLOSE);
setSize(300,300);
Dimension dim = Toolkit.getDefaultToolkit().getScreenSize();
setLocation(dim.width/2-getSize().width/2,dim.height/2-getSize().width/2);
JLabel l = new JLabel("Хэловорлд");
setLayout(null);
l.setBounds(110, 110, 70, 20);
add(l);
}
public static void main(String[] args) {
new HelloWorld();
}
}

Scala

object HelloWorld extends App {
println("Hello, world!")
}

ActionScript 2.0

traсe ("hello world!");

ActionScript 3.0

traсe ("hello world!");

или

var field:TextField=new TextField();
field.text="hello world!";
addChild(field);

Eiffel

class HELLO_WORLD
feature
print_hello is
-- Print "Hello, World!"
do
print ("Hello, World!")
end
end

MIDlet Pascal

Program Hello;
Begin
DrawText('Hello, world!', 5, 5);
Repaint; Delay(5000);
End.

PHP

echo "Hello, world!";

Vbscript

Msgbox "Hello world!"

Javascript

document.write("Hello, world!");

sh

echo Hello, world!

Пролог

goal :-
write ("Hello, World!").

SQL

SQL-92

select 'Hello, World!'

Oracle SQL

select 'Hello, World!' from dual;

Oracle PL/SQL

SET serveroutput ON

BEGIN
dbms_output.put_line('Hello world!');
END;
/

T-SQL (Microsoft SQL Server)

PRINT 'Hello, world';

MySQL

select 'Hello, World!';

FireBird SQL / InterBase

select 'Hello, World!' FROM RDB$DATABASE;

Informix

SELECT FIRST 1 'Hello, World!' FROM systables;

Assembler (i8086, MS-DOS, tasm)

mov ax, 0b800h
mov ds, ax
mov [02h], 'H'
mov [04h], 'e'
mov [06h], 'l'
mov [08h], 'l'
mov [0ah], 'o'
mov [0ch], ','
mov [0eh], 'W'
mov [10h], 'o'
mov [12h], 'r'
mov [14h], 'l'
mov [16h], 'd'
mov [18h], '!'
ret

GML

show_message("Hello, World!");

Blitz3D

Text 0,0,"Hello, world!"

или

Print "Hello, world!"
WaitKey ;

NATURAL

define data local
1 #BUTTON(A1)
end-define
Write notitle 'Hello, world!'
display notitle 'Hello, world!'
print 'Hello, world!'
PROCESS GUI ACTION MESSAGE-BOX WITH NULL-HANDLE
'Hello, world!' ' ' 'IO1'
#BUTTON
GIVING *ERROR-nr
Input (ad=od) 'Hello, world!'
end

LSL

default
{
state_entry()
{
llSay(0,"Hello, world!");
}
}

Erlang

#!/usr/bin/env escript

main(_Args) ->
io:format("Hello, World!~n").

Malbolge

(=<`:9876Z4321UT.-Q+*)M'&%$H"!~}|Bzy?=|{z]KwZY44Eq0/{mlk**hKs_dG5[m_BA{?-Y;;Vb'rR5431M}/.zHGwEDCBA@98\6543W10/.R,+O<

LOLCODE

HAI
CAN HAS STDIO?
VISIBLE "HAI WORLD!"
KTHXBYE

Go

package main

func main() {
println("Hello, world!")
}

ProceRaptor

application ($console,$void);
var ("st",$string);
"Hello World!">>st;
write (st,$line);
read ($void,$line);
exit();

Icon

procedure main()
write("Hello, world!")
end

ABAP

REPORT zhello.
WRITE / 'Hello, World!'.

Befunge

0"!dlroW ,olleH">:#,_@

TeX

Hello, World!

Vimscript

:echo 'Hello World!'

Small Basic

TextWindow.WriteLine("Hello, World!")

Rust

fn main() {

println!("Hello World!");
}

Swift 2.1

print("Hello, world!")

MATLAB

disp('Hello, world!');

V

Счетчик Отобразить(_Текст) импорт _ОтобразитьТекст;
->ПриветМир():
Отобразить "Hello, world!";
<-0;
.

ЯСОП52

/*@@ПриветЧел-КП211.101
/* запрет вывода на чек долбанных номеров операций
ВИД_ПЕЧАТИ(Пнс=1);
/* привлечение внимания к оборудованию
ВЫЗОВ(ПП=МерзкаяПищалка,прм1=3);
/* запрос фамилии страдальца
ВВОД_КЛ(ТИПП=С,ТЕКСТ="РУЧНАЯ ОПЕРАЦИЯ 666:ВВЕДИТЕ ФАМИЛИЮ ОПЕРАТОРА",ИМЯ=фамОпер);
/* вывод на чек и на экран
ВЫВОД(ВД="ПРИВЕТ,",ПОЗ=1,ПЕЧАТЬ=ДА);
ВЫВОД(ВД=фамОпер,ПОЗ=21,ПЕЧАТЬ=ДА);
/* задержка времени 3.6 сек, чтобы оператор успел прочитать на экране сообщение и уронить слезу
ЗАДЕР_В_МС(Т=3600);
ФИНИШ;
/*
/*==========
/* <hate> мерзко пищит,
/* использовать против людей
/*==========
МерзкаяПищалка: НАЧАЛО(прм1=ЦБ2);
/* прм1 - количество повторов звукового сигнала
ПРИСВОИТЬ(ТИПП=ЦБ2,ЗНАЧ=прм1,ИМЯ=ошПерТумбл4);
НЦ(НАЧ=1,КОН=ошПерТумбл4,ШАГ=1,ИНД=И);
ЗВУК(Пс=ВКЛ);
ЗАДЕР_В_МС(Т=800);
ЗВУК(Пс=ОТКЛ);
ЗАДЕР_В_МС(Т=1200);
КЦ;
КОНЕЦ;
/*==========
/*

Заключение

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

Спасибо.

Источник:

Еще крутые истории!

Метки: hellworld языки программирования истории

А что вы думаете об этом?

Фото Видео Демотиватор Мем ЛОЛ Twitter Instagram Аудио

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

Правила

!!! Оскорбления в комментариях автора поста или собеседника. Комментарий скрывается из ленты, автору выписывается бан на неделю. Допускаются более свободные споры в ленте с политикой, но в доступных, не нарушающих УК РФ, пределах.

! Мат на картинке/в комментарии. Ваш комментарий будет скрыт. При злоупотреблении возможен бан.

! Флуд - дублирующиеся комментарии от одного и того же пользователя в разных постах, систематические ложные вызовы модераторов с помощью функции @moderator, необоснованные обращения в техническую поддержку сайта, комментарии не несущие смысловой нагрузки и состоящие из хаотичного набора букв. Санкции - предупреждение с дальнейшим баном при рецидиве.

! Публикация рекламных постов. Несогласованное размещение рекламного материала, влечет незамедлительную приостановку действий учетной записи пользователя.

! Публикация материала, запрещенного на территории РФ и преследуемого УК РФ. Незамедлительная приостановка действия учетной записи пользователя.

! Мультиаккаунты. Использование нескольких активных аккаунтов, принадлежащих одному пользователю (исключение - дополнительный аккаунт для обращения в тех. поддержку при блокировке основного аккаунта) запрещено. За нарушение предусмотрено отключение основного аккаунта с возможной дальнейшей блокировкой любого аккаунта от данного пользователя.

This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Фото Видео Демотиватор Мем ЛОЛ Twitter Instagram Audio

Отправить комментарий в: Вконтакте Отправить комментарий в Вконтакте

Правила

! Мат на картинке/в комментарии. Ваш комментарий будет скрыт. При злоупотреблении возможен бан.

This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

35 комментариев

Сначала новые

Сначала лучшие Сначала старые

Лучший комментарий