Программа «Привет, мир!» на 200 языках программирования

По .fr

Полный сборник примеров наименьшей возможной программы на каждом существующем языке.
В список также включены форматы документов.

---

В

B

C

D

Е

F

Грамм

Ч

I

J

К

L

М

N

O

P

Q

Р

S

Т

U

V

W

X

Там

Z

---

В

4GL

message "Salut le Monde!" with style = popup;

Абап

WRITE 'Salut le Monde!'.

Азбука

WRITE "Salut le Monde!"

ActionScript

trace("Salut le Monde!");

Ада

with TEXT_IO;

procedure Salut is
begin
 TEXT_IO.PUT_LINE ("Salut le Monde!");
end Salut;

АЛГОЛ 60

'BEGIN'
 'COMMENT' In Algol 60;
 OUTPUT(4,'(''('Salut le Monde!')',/')')
'END

АЛГОЛ 68

BEGIN
  print(("Salut le Monde!", newline))
END

С укороченной формой бегин и конец:

( print("Salut le Monde!") )

Alma-0

Salut le Monde!

AmigaE

PROC main()
 WriteF('Salut le Monde!');
ENDPROC

Апл

'Salut le Monde!'

AppleScript

return "Salut le Monde!"

или :

-- "Salut le Monde!"

Графика :

display dialog "Salut le Monde!" buttons {"OK"} default button 1

Асчий

В шестнадцатеричной нотации (0D = возврат, 0A = новая строка):

48 65 6C 6C 6F 2C 20 77 6F 72 6C 64 21 0D 0A

Асп

<%
Response.Write("Salut le Monde!")
%>

или:

<%="Salut le Monde!" %>

Asp.Net

Response.Write("Salut le Monde!")

Внешний видJ

public aspect Salut le Monde 
{
 pointcut mainCall() : call(public static void *.main(String[] args));
 before() : mainCall() 
 {
 System.out.println( "Salut le Monde!" );
 }
}

Ассемблер (язык сборки)

6502 собрать

MSG: .ASCIIZ "Salut le Monde!"
START: LDX #0
LOOP: LDA MSG,X ; load character
 JSR $FFD2 ; output to current output device
 INX
 BNE @LOOP 
 RTS

Intel x86, Dos, Tasm

MODEL SMALL
IDEAL
STACK 100H

DATASEG
 MSG DB 'Salut le Monde!', 13, '$'

CODESEG
Start:
 MOV AX, @data
 MOV DS, AX
 MOV DX, OFFSET MSG
 MOV AH, 09H ; output ascii string
 INT 21H
 MOV AX, 4C00H
 INT 21H
 END Start

Intel x86, Linux

SECTION .data
msg:
 db "Salut le Monde!\n"
 len equ $ - msg
SECTION .text
 global start
start:
 mov edx,len
 mov ecx,msg
 mov ebx,1
 mov eax,4
 int 0x80
 mov ebx,0
 mov eax,1
 int 0x80

Собрать 68000

:

move.l #Salut le Monde,-(A7)
 move #9,-(A7)
 trap #1
 addq.l #6,A7
 move #0,-(A7)
 trap #1
Salut le Monde:
 dc.b "Salut le Monde!",$0d,$0a,0

Arm, Risc OS

:

.program 
 ADR R0,message
 SWI "OS_Write0"
 SWI "OS_Exit"
.message 
 DCS "Salut le Monde!"
 DCB 0
 ALIGN

или в еще более коротких версиях (от qEU):

 SWI"OS_WriteS":EQUS"Salut le Monde!":EQUB0:ALIGN:MOVPC,R14

Риск. Архитектура RISC и MIPS

 .data
msg: .asciiz "Salut le Monde!"
 .align 2
 .text
 .globl main 
main:
 la $a0,msg
 li $v0,4
 syscall
 jr $ra

Автооткей

MsgBox, "Salut le Monde!"

Автопробег

MsgBox(1,'','Salut le Monde!')

Avenue - Язык скриптинга для ArcView GIS

MsgBox("Salut le Monde!","aTitle")

Awk

# Salut
BEGIN { print "Salut le Monde!" }

B

B

/* Salut */

main() 
{
 extern a, b, c;
 putchar (a); putchar (b); putchar (c); putchar ('!*n');
}

a 'hell' ;
b 'o, w' ;
c 'orld' ;

Баш

#!/bin/sh
echo "Salut le Monde!"

Бейсик

Общее

Реализация, совместимая с ANSI/ISO. Инструкция «END» необязательна во многих реализациях BASIC.

10 PRINT "Salut le Monde!"
20 END

Немедленный режим.

PRINT "Salut le Monde!"
? "Salut le Monde!"

Последующие реализации BASIC. Опять же, инструкция «END» необязательна во многих BASIC.

PRINT "Salut le Monde!"
END

DarkBasic

PRINT "Salut le Monde"
TEXT 0,0,"Salut le Monde!"
WAIT KEY

PBasic

DEBUG "Salut le Monde!", CR

или, эквивалент для обычного микро-контроллера с только диодом (СИД) на выходе, подключенным к 7 лапам:

DO
 HIGH 7 'Make the 7th pin go high (turn the LED on)
 PAUSE 500 'Sleep for half a second
 LOW 7 ' Make the 7th pin go low (turn the LED off)
 PAUSE 500 'Sleep for half a second
LOOP
END

StarOffice/OpenOffice Basic

sub main
 print "Salut le Monde!"
end sub

Visual Basic

Sub Main()
 Print "Salut le Monde!"
End Sub

Visual Basic .Net

Module Salut le MondeApp
 Sub Main()
 System.Console.WriteLine("Salut le Monde!")
 End Sub
End Module

или:

Class Salut le MondeApp
 Shared Sub Main()
 System.Console.WriteLine("Salut le Monde!")
 End Sub
End Class

Bcpl

// Salut

GET "LIBHDR"

LET START () BE
$(
 WRITES ("Salut le Monde!*N")
$)

Бета

{ *** Salut ***}
(#
 do
 'Salut le Monde!'->putLine
#)

Блисс

%TITLE 'Salut_le Monde'
MODULE Salut_le Monde (IDENT='V1.0', MAIN=Salut_le Monde,
 ADDRESSING_MODE (EXTERNAL=GENERAL)) =
BEGIN

 LIBRARY 'SYS$LIBRARY:STARLET';

 EXTERNAL ROUTINE
 LIB$PUT_OUTPUT;

GLOBAL ROUTINE Salut_le Monde =
BEGIN
 LIB$PUT_OUTPUT(%ASCID %STRING('Salut le Monde!'))
END;

END
ELUDOM

Бу

print "Salut le Monde!"

C

C (ANSI)

#include <stdio.h>

/* Salut */
int main(void)
{
 printf("Salut le Monde!");
 return 0;
}

C Windows

#include <windows.h>
int WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance, LPWSTR lpCmdLine, int nCmdShow )
{
  MessageBox( NULL, "Salut le Monde!\n", "", MB_OK );
  return 0;
}
</windows.h>

C

#

using System;
class Salut
{
  public static void Main()
  {
    System.Console.WriteLine("Salut le Monde!");
  }
}

C++ (ISO)

#include <iostream>

int main()
{
 std::cout << "Salut le Monde!\n";
}

C + +/Cli

int main()
{
 System::Console::WriteLine("Salut le Monde!");
}

Управляемый C (.Net)

#using <mscorlib.dll>

using namespace System;

int wmain()
{
 Console::WriteLine("Salut le Monde!");
}

Камл света

(* Salut le Monde *)

let Salut =
 print_string "Salut le Monde!";
;;

Ресница

.method public static void Main() cil managed
{
 .entrypoint
 .maxstack 8
 ldstr "Salut le Monde!"
 call void [mscorlib]System.Console::WriteLine(string)
 ret
}

Без излишеств

module Salut

Start = "Salut le Monde!"

Клист

PROC 0
WRITE Salut le Monde!

Клиппер

? "Salut le Monde!"

Клу

start_up = proc ()
 po: stream := stream$primary_output ()
 stream$putl (po, "Salut le Monde!")
 end start_up

Кобол

IDENTIFICATION DIVISION.
PROGRAM-ID. Salut-le Monde.

ENVIRONMENT DIVISION.

DATA DIVISION.

PROCEDURE DIVISION.
DISPLAY "Salut le Monde!".
STOP RUN.

Cocoa or GnuStep (Objective C)

#import <Cocoa/Cocoa.h>
@interface Salut : NSObject {
}
@end

@implementation Salut

-(void)awakeFromNib
{ 
 NSRunAlertPanel(@"Message from your Computer", @"Salut le Monde!", @"Hi!",
 nil, nil);
}

@end

CoffeeScript

alert "Salut le Monde!"

ColdFusion

<cfoutput>Salut le Monde!</cfoutput>

Созло

PRINT "Salut le Monde!"

Курль

{curl 3.0, 4.0 applet}
{curl-file-attributes character-encoding = "utf-8"}

Salut le Monde!

D

D

import std.stdio ; 
void main () 
{
 writef("Salut le Monde!");
}

Дарт

main() 
{
  print('Salut le Monde!');
}

Dataflex

/tela
Salut le Monde
/*
clearscreen
page tela

dBase

* Salut le Monde in dBase IV
? "Salut le Monde!"

Dcl batch

$ write sys$output "Salut le Monde!"

Дельфи, Кайкс

program Salut_le Monde;
uses 
 Windows;

begin
 ShowMessage("Salut le Monde!");
end.

Кукла

this::operator()
{
 import system.cstdio;
 puts("Salut le Monde!");
}

Дилан

module: Salut

format-out("Salut le Monde!\n");

Е

Ed и Ex (расширенный Ed)

a
Salut le Monde!
.
p

EGL

Program Hello
   const MYVAR string = "Salut le Monde!";
   function main()
      SysLib.writeStdOut(MYVAR);
   end     
 end

Эйфель

class Salut_le Monde

creation
 make
feature
 make is
 local
 io:BASIC_IO
 do
 !!io
 io.put_string("%N Salut le Monde!")
 end -- make
end -- class Salut_le Monde

Порыв

(* Elan *)
putline ("Salut le Monde!");

Эрланг

-module(Salut).
-export([Salut_le Monde/0]).

Salut_le Monde() -> io:fwrite("Salut le Monde!\n").

Эйфория

puts(1, "Salut le Monde!")

F

F

#

print_endline "Salut le Monde!"

Агент

"Salut le Monde!" print

filePro

 @once:
 mesgbox "Salut le Monde!" ; exit

Фокусный

type "Salut le Monde!",!

Фокус

-TYPE Salut le Monde

Форт

: Salut ( -- ) ." Salut le Monde!" CR ;
Salut

Фортран

PROGRAM Salut
  PRINT *, 'Salut le Monde!'
END

Фрил

 ?((pp "Salut le Monde!"))

Фринк

println["Salut le Monde!"]

Грамм

Гамбас

PUBLIC SUB Main()
 Print "Salut le Monde!"
END

Графика :

PUBLIC SUB Main()
 Message.Info("Salut le Monde!")
END

Го

package main
import fmt "fmt"

func main() {
   fmt.Printf("Salut le Monde\n");
}

Гроовы

println "Salut le Monde"

Gtk + в C++

#include <iostream>
#include <gtkmm/main.h>
#include <gtkmm/button.h>
#include <gtkmm/window.h>
using namespace std;

class Salut le Monde : public Gtk::Window {
public:
 Salut le Monde();
 virtual ~Salut le Monde();
protected:
 Gtk::Button m_button;
 virtual void on_button_clicked();
};

Salut le Monde::Salut le Monde()
: m_button("Salut le Monde!") {
 set_border_width(10);
 m_button.signal_clicked().connect(SigC::slot(*this,
 &Salut le Monde::on_button_clicked));
 add(m_button);
 m_button.show();
}

Salut le Monde::~Salut le Monde() {}

void Salut le Monde::on_button_clicked() {
 cout << "Salut le Monde!" << endl;
}

int main (int argc, char *argv[]) {
 Gtk::Main kit(argc, argv);
 Salut le Monde Salut le Monde;
 Gtk::Main::run(Salut le Monde);
 return 0;
}

Gtk # в C #

using Gtk;
using GtkSharp;
using System;

class Salut {

 static void Main()  {
  Application.Init ();

  Window window = new Window("");
  window.DeleteEvent += cls_evn;
  Button close = new Button ("Salut le Monde");
  close.Clicked += new EventHandler(cls_evn);

  window.Add(close);
  window.ShowAll();

  Application.Run ();
 }

 static void cls_evn(object obj, EventArgs args)
 {
   Application.Quit();
 }

}

Ч

Хаскелл

module Main (main) where

main = putStrLn "Salut le Monde!"

Цапля

program Salut le Monde;
functions {
 _main() {
 print_string("Salut le Monde!");
 }
}
end

HLA (High Level Assembly)

program Salut le Monde;
#include("stdlib.hhf")
begin Salut le Monde;

 stdout.put( "Salut le Monde" nl );

end Salut le Monde;

HP-41, HP-42S

Hewlett-Packard RPN-на основе буквенно-цифровых вычислителей.

01 LBLTSalut
02 TSalut le Monde
03 PROMPT

HTML

<html>
<body>
 Salut le Monde!
</body>
</html>

HTML 4.01 Строгий

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Strict//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
 <title>Salut le Monde!</title>
 </head>
 <body>
 <p>Salut le Monde!</p>
 </body>
</html>

HyperTalk

Скриптовый язык от Apple HyperCard.

put "Salut le Monde!"

или

Answer "Salut le Monde!"

I

Иконка

# In Icon
procedure main()
 write("Salut le Monde")
end

IDL

print,"Salut le Monde!"

Информированный

[ Main;
 "Salut le Monde!";
];

Межмозоль

 IN INTERCAL 
 Salut le Monde

Ио

"Salut le Monde!" print

итак,

write("Salut le Monde!\n")

Ипцкрай

ON ENTER {
 "Salut, " "le Monde!" & SAY
}

J

J

'Salut le Monde'

Ява

public class Salut le Monde {
   public static void main(String[] args) {
   System.out.println("Salut le Monde!");
 }
}

Java byte-код

Выход деассамблера отбеливателя -c Привет миру.

public class Salut le Monde extends java.lang.Object{
public Salut le Monde();
 Code:
 0: aload_0
 1: invokespecial #1; //Method java/lang/Object."<init>":()V
 4: return
public static void main(java.lang.String[]);
 Code:
 0: getstatic #2; //Field java/lang/System.out:Ljava/io/PrintStream;
 3: ldc #3; //String Salut le Monde!
 5: invokevirtual #4; //Method java/io/PrintStream.println:(Ljava/lang/String;)V
 8: return
}

Java Swing

import javax.swing.JOptionPane;

public class Salut 
{
 public static void main(String[] args) 
 {
 JOptionPane.showMessageDialog(null, "Salut le Monde!");
 }
}

Java SWT

import org.eclipse.swt.SWT;
import org.eclipse.swt.layout.RowLayout;
import org.eclipse.swt.widgets.Display;
import org.eclipse.swt.widgets.Shell;
import org.eclipse.swt.widgets.Label;

public class SWTSalut {
 public static void main (String [] args) {
 Display display = new Display ();
 final Shell shell = new Shell(display);
 RowLayout layout = new RowLayout();
 layout.justify = true;
 layout.pack = true;
 shell.setLayout(layout);
 shell.setText("Salut le Monde!");
 Label label = new Label(shell, SWT.CENTER);
 label.setText("Salut le Monde!");
 shell.pack();
 shell.open ();
 while (!shell.isDisposed ()) {
 if (!display.readAndDispatch ()) display.sleep ();
 }
 display.dispose ();
 }
}

Java-приложение

Java-апплеты работают в HTML-файлах.

<HTML>
<HEAD>
<TITLE>Salut le Monde</TITLE>
</HEAD>
<BODY>

Salut le Monde Program says:

<APPLET CODE="Salut le Monde.class" WIDTH=600 HEIGHT=100>
</APPLET>

</BODY>
</HTML>

import java.applet.*;
import java.awt.*;

public class Salut le Monde extends Applet {
 public void paint(Graphics g) {
 g.drawString("Salut le Monde!", 100, 50);
 }
}

JavaFX Script (F3)

var win = new Frame();
win.title = "Hello World";
win.width = 400;
var label = new Label();
label.text = "Salut le Monde!";
win.content = label;
win.visible = true;

Визуальная версия:

Stage {   
    title: "Salut le Monde!"    
    width: 320    
    height: 240    
    visible: true  
}   

JavaScript

<script language="JavaScript">
    document.write('Salut le Monde!');
</script>

или с предупреждением:

alert('Salut le Monde!');

или :

<script type="text/javascript"><!--
function Salut le Monde()
{
 alert("Salut le Monde!");
}
//--></script>

<a href="#" onclick="Salut le Monde(); return false;">Salut le Monde Example</a>

или :

<a href="#" onclick="alert('Salut le Monde!'); return false;">Salut le Monde Example
</a>

Джулия

println("Salut le Monde!")

К

К

`0:"Salut le Monde\n"

Когут

WriteLine "Salut le Monde!"

L

ЛАТЕКС

\documentclass{article}
\begin{document}
 Salut le Monde!
\end{document}

Лисаак

section HEADER
 + name := Salut_le Monde;
 - category := MACRO;
section INHERIT
 - parent_object:OBJECT := OBJECT;
section PUBLIC
 - make <-
 ( 
   "Salut le Monde !\n".print;
 );

Лисп

У Лиспа много диалектов, которые появились в пятидесятые годы.

Общий Лисп

(format t "Salut le Monde!~%")

или:

(write-line "Salut le Monde!")

или:

 "Salut le Monde!"

Структура

(display "Salut le Monde!")

Emacs Lisp

 (print "Salut le Monde!")

Автолисп

 (print "Salut le Monde!")

XLisp

 (print "Salut le Monde!")

Логотип

print [Salut le Monde!]

или:

pr [Salut le Monde!]

Луа

print "Salut le Monde!"

М

М4

Salut le Monde!

Максыма, Максима

print("Salut le Monde!")$

Кепл

>> print("Salut le Monde!");

Математика

(* Salut le Monde in Mathematica *)
Print["Salut le Monde"]

Матлаб

disp('Salut le Monde')

Мод

fmod Salut le Monde is
protecting STRING .
 op Salut le Monde : -> String .
 eq Salut le Monde = "Salut le Monde." .
endfm
red Salut le Monde .

Макс

max v2;
#N vpatcher 10 59 610 459;
#P message 33 93 63 196617 Salut le Monde!;
#P newex 33 73 45 196617 loadbang;
#P newex 33 111 31 196617 print;
#P connect 1 0 2 0;
#P connect 2 0 0 0;
#P pop;

mIrc Script

echo Salut le Monde

Модель 204

BEGIN
PRINT 'Salut le Monde!'
END

Modula-2

MODULE Salut;

FROM InOut IMPORT WriteLn, WriteString;

BEGIN
 WriteString ("Salut le Monde!");
 WriteLn
END Salut.

(* Modula-2 R10 *)  

MODULE Salut;

IMPORT PervasiveIO;
BEGIN
 WRITE("Salut le Monde!\n");
END Salut.  

Му

notify(player, "Salut le Monde!");

Ms-Dos batch

@ symbol является опциональным и предвидит систему из отображения команды перед выполнением.

@echo Salut le Monde!

Муф

: main
 me @ "Salut le Monde!" notify
;

Мумпс

W "Salut le Monde!" 

N

Естественный

WRITE "Salut le Monde!"
END

Немерле

System.Console.WriteLine("Salut le Monde!");

NewtonScript

baseview :=
 {viewBounds: {left: -3, top: 71, right: 138, bottom: 137},
 viewFlags: 581,
 declareSelf: 'base,
 _proto: protoFloatNGo,
 debug: "baseview"
 };

textview := * child of baseview *
 {text: "Salut le Monde!",
 viewBounds: {left: 33, top: 24, right: 113, bottom: 46},
 viewFlags: 579,
 _proto: protoStaticText,
 debug: "textview"
 };

Ницца

void main(String[] args)
{ 
 println("Salut le Monde"); 
}

Ним

echo "Salut le Monde!"

O

Оберон

MODULE Salut;
 IMPORT Out;
BEGIN
 Out.String("Salut le Monde!");
 Out.Ln
END Salut.

Объективная C

Functional C Версия

#import <stdio.h>

int main() {
 printf( "Salut le Monde!\n" );
 return 0;
}

Версия объекта С

#import <stdio.h>

//An object-oriented version.
@interface Salut : Object
{
 const char str[] = "Salut le Monde";
}
- (id) Salut (void);
@end

@implementation Salut
- (id) Salut (void)
{
 printf("%s\n", str);
}
@end

int main(void)
{
 Salut *h = [Salut new];
 [h Salut];
 
 [h free];
 return 0;
}

OpenStep/Cocoa Version

#import <Foundation/Foundation.h>

int main (int argc, const char * argv[])
{
 NSLog(@"Salut le Monde!");
 return 0;
}

OCaml

print_endline "Salut le Monde!"

Оккам

#USE "course.lib"

PROC Salut.le Monde(CHAN OF BYTE screen!)
 out.string("Salut le Monde!*n", 0, screen!)
:

Октав

printf("Salut le Monde\n");

Опл

PROC Salut:
 PRINT "Salut le Monde"
ENDP

Ops5

(object-class request
 ^action)

(startup
 (strategy MEA)
 (make request ^action Salut)
)

(rule Salut
 (request ^action Salut)
 (write |Salut le Monde!| (crlf))
)

Ops83

module Salut (main)
{ procedure main( )
 {
 write() |Salut le Monde!|, '\n';
 };
};

Оз

{Browse 'Salut le Monde!'} 

P

Parrot assembly language

print "Salut le Monde!\n"
end

Паскаль

program Salut;

begin
writeln('Salut le Monde!');
end.

PDF

%PDF-1.0
1 0 obj
<<
/Type /Catalog
/Pages 3 0 R
/Outlines 2 0 R
>>
endobj
2 0 obj
<<
/Type /Outlines
/Count 0
>>
endobj
3 0 obj
<<
/Type /Pages
/Count 1
/Kids [4 0 R]
>>
endobj
4 0 obj
<<
/Type /Page
/Parent 3 0 R
/Resources << /Font << /F1 7 0 R >>/ProcSet 6 0 R
>>
/MediaBox [0 0 612 792]
/Contents 5 0 R
>>
endobj
5 0 obj
<< /Length 44 >>
stream
BT
/F1 24 Tf
100 100 Td (Salut le Monde) Tj
ET
endstream
endobj
6 0 obj
[/PDF /Text]
endobj
7 0 obj
<<
/Type /Font
/Subtype /Type1
/Name /F1
/BaseFont /Helvetica
/Encoding /MacRomanEncoding
>>
endobj
xref
0 8
0000000000 65535 f
0000000009 00000 n
0000000074 00000 n
0000000120 00000 n
0000000179 00000 n
0000000322 00000 n
0000000415 00000 n
0000000445 00000 n
trailer
<<
/Size 8
/Root 1 0 R
>>
startxref
553
%%EOF

Перл

# Salut
print "Salut le Monde!\n";

Перл 6

say "Salut le Monde";

PHP

<?php
 echo 'Salut le Monde!';
?>

итак,

<?php
 print 'Salut le Monde!' . PHP_EOL;
?>

итак,

<?='Salut le Monde!'?>

PHP-ГТК

<?php
$wnd = new GtkWindow();
$wnd->set_title('Hello');
$wnd->connect_simple('destroy', array('gtk', 'main_quit')); 
$lblHello = new GtkLabel("Salut le Monde!'");
$wnd->add($lblHello);
$wnd->show_all();
Gtk::main();
?>

Пайк

int main() {
 write("Salut le Monde!\n");
 return 0;
}

Пилот

T:Salut le Monde!

Pl/Sql

-- start anonymous block
set serveroutput on size 10000000;
begin
 dbms_output.enable(1000000);
 dbms_output.put_line('Salut le Monde!'); 
end;
-- end anonymous block

Pl/I

Test: proc options(main) reorder;
 put skip edit('Salut le Monde!') (a);
end Test;

Поп-музыка 11

'Salut le Monde' =>

PostScript

% Displays on console.
(Salut le Monde!) =

%!
% Displays as page output.
/Courier findfont
24 scalefont
setfont
100 100 moveto
(Salut le Monde!) show
showpage

Pov-Ray

#include "colors.inc"
camera {
 location <3, 1, -10>
 look_at <3,0,0>
}
light_source { <500,500,-1000> White }
text {
 ttf "timrom.ttf" "Salut le Monde!" 1, 0
 pigment { White }
}

Обработка

println("Salut le Monde!");

Профан

' Salut in Profan 
cls
print "Salut le Monde!"
waitkey

Прогресс

message "Salut le Monde" view-as alert-box.

Пролог

:- write('Salut le Monde'),nl.

Буферы протоколов

message hello
{
  required string data = 1 [default="Salut le Monde!"];
} 

PureBasic

; In PureBasic console
OpenConsole()
 ConsoleTitle ("Salut le Monde!")
 PrintN ("Salut le Monde!")
CloseConsole()

Python 2

print "Salut le Monde!"

Python 3

print("Salut le Monde!")

Q

QML

Text {   
     text: "Salut le Monde!"   
} 

Qt toolkit (C++)

#include <QApplication>
#include <QLabel>

int main(int argc, char *argv[])
{
  QApplication app(argc, argv);
  QLabel salut("Salut le Monde!");
  salut.show();
  return app.exec();
}

QuakeC

bprint("Salut le Monde\n");

QuickBasic

REM Salut le Monde in QuickBASIC
PRINT "Salut le Monde!"
END

Р

Р

cat("Salut le Monde\n")

Ратфор

print *, 'Salut le Monde'
end

RealBasic

' Salut
msgBox "Salut le Monde!"

Ребол

print "Salut le Monde!"

Рефаль

$ENTRY GO{=<Prout 'Salut le Monde!'>;}

Rexx, ARexx, NetRexx и Object REXX

say "Salut le Monde!"

или в Windows :

call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
call SysLoadFuncs
call RxMessageBox 'Salut le Monde!', 'Salut le Monde Window', 'OK', 'EXCLAMATION'
exit

Rpg

Свободный

синтаксис:

 /FREE
 DSPLY 'Salut le Monde!';
 *InLR = *On;
 /END-FREE 

Традиционный

синтаксис:

 d TestMessage 
 c Const( 'Salut le Monde!' )
 c TestMessage DSPLY
 c EVAL *InLR = *On

Код Rpg

Окно сообщений

:

mwin("Salut le Monde!")
wait()

Текст на экране

:

text(1,1"Salut le Monde!")
wait()

РПЛ (калькуляторы л.с.)

<<
     CLLCD
     "Salut le Monde!" 1 DISP
     0 WAIT
     DROP
   >>

RSL

[Salut le Monde!];

Ртф

{\rtf1\ansi\deff0
{\fonttbl {\f0 Courier New;}}
\f0\fs20 Salut le Monde!
}

Руби

puts "Salut le Monde!"

Руст

io::println("Salut le Monde!");

S

S

cat("Salut le Monde\n")

Шлюз

data _null_;
put 'Salut le Monde!';
run;

Сатер

class Salut_le Monde is
 main is 
 #OUT+"Salut le Monde\n"; 
 end; 
end;

Ла Скала

object Salut le Monde with Application {
 Console.println("Salut le Monde!");
}

Скриптол

 print "Salut le Monde!"

sed

sed -ne '1s/.*/Salut le Monde!/p'

Seed7

$ include "seed7_05.s7i";

const proc: main is func
 begin
   writeln("Salut le Monde!");
 end func;

Селф

'Salut le Monde!' print.

Сетл

-- Salut in Setl2

procedure Salut();
 print "Salut le Monde!";
end Salut;

Структура

 (display "Salut le Monde!")
 (newline)

Имитировал

Begin
 OutText("Salut le Monde!");
 OutImage;
End

Смолталк

Transcript show: 'Salut le Monde!'; cr

Графика :

('Salut le Monde!' asMorph openInWindow) submorphs second color: Color black

Смил

<!-- Salut le Monde in SMIL -->
<smil>
 <head>
 <layout>
 <root-layout width="300" height="160" background-color="white"/>
 <region id="text_region" left="115" top="60"/>
 </layout>
 </head>
 <body>
 <text src="data:,Salut%20le Monde!" region="text_region">
 <param name="fontFace" value="Arial"/>
 </text>
 </body>
</smil>

Смл

print "Salut le Monde!\n";

Сноболь

OUTPUT = "Salut le Monde!"
END

Шпан

class Salut {
 static public main: args {
 Console << "Salut le Monde!\n";
 }
}

Искра

with Spark_IO;
--# inherit Spark_IO;
--# main_program;

procedure Salut_le Monde
--# global in out Spark_IO.Outputs;
--# derives Spark_IO.Outputs from Spark_IO.Outputs;
is
begin
 Spark_IO.Put_Line (Spark_IO.Standard_Output, "Salut le Monde!", 0);
end Salut_le Monde;

Шпитбол

OUTPUT = "Salut le Monde!"
END

Spss Syntax

ECHO "Salut le Monde!".

SQL

CREATE TABLE message (text char(15));
INSERT INTO message (text) VALUES ('Salut le Monde!');
SELECT text FROM message;
DROP TABLE message;

MySQL или PostgreSQL:

SELECT 'Salut le Monde!';

Старлет

RACINE: Salut_le Monde.

NOTIONS:
Salut_le Monde : ecrire("Salut le Monde!").

СуперКоллайдер

"Salut le Monde".postln;

SVG

<?xml version="1.0" encoding="utf-8" standseule="no"?>
<svg width="240px" height="100px" viewBox="0 0 240 100" xmlns="">
 <title>Hello World</title>
 <g>
 <text x="20" y="50">Salut le Monde!</text>
 </g>
</svg>

Свифт

println("Salut le Monde!")

Т

Такл

?TACL Salut
#OUTPUT Salut le Monde!

Tcl

puts "Salut le Monde!"

Теко

!Salut in TECO
FTSalut le Monde$

TeX

Salut le Monde
\bye

-

бейсик

10 REM Salut le Monde in TI BASIC
20 REM for the TI99 series computer
100 CALL CLEAR
110 PRINT "Salut le Monde"
120 GOTO 120

Тк

label .l -text "Salut le Monde!"
pack .l

Тьюринг

put "Salut le Monde!"

U

Unix shell

echo 'Salut le Monde!'

или inline:

cat <<'DELIM'
Salut le Monde!
DELIM

или:

printf '%s' $'Salut le Monde!\n'

или для криволинейного интерфейса:

dialog --msgbox 'Salut le Monde!' 0 0

UnrealScript

class SalutHUD extends HudBase;

simulated function DrawHudPassC (Canvas C)
{
 C.SetPos( 0.50*C.ClipX , 0.50*C.ClipY);
 C.DrawText("Salut le Monde!");
}

defaultproperties
{
}

V

Верилог

module main;

 initial
 begin
 $display("Salut le Monde");
 $finish ;
 end

 endmodule

VHDL

use std.textio.all;
 
ENTITY Salut IS
END ENTITY Salut;
 
ARCHITECTURE  OF Salut IS
 CONSTANT message : string := "Salut le Monde";
BEGIN
 PROCESS
 variable L: line; 
 BEGIN
 write(L, message);
 writeline(output, L);
 wait;
 END PROCESS;
END ARCHITECTURE ;

Visual Basic .Net 2003

Если код введен как часть подкласса Form :

Private Sub frmForm_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
 MessageBox.Show("Salut le Monde!", "Salut le Monde") 
 Me.Close() 
End Sub

Традиционный код Visual Basic :

Public Class MyApplication
 Shared Sub Main()
 MessageBox.Show("Salut le Monde!", "Salut le Monde")
 End Sub
End Class

Visual DialogScript

info Salut le Monde!

Консольная программа Visual Prolog

#include @"pfc\console\console.ph"

goal
 console::init(),
 stdio::write("Salut le Monde!").

Vms

$ WRITE SYS$OUTPUT "Salut le Monde!"

Вмрл

Shape
{
 geometry Text
 {string "Salut le Monde!"}
}

W

API Windows (в C)

#include <windows.h>
int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInstance, LPSTR lpCmdLine,
int nCmdShow)
{
 MessageBox(NULL, "Salut le Monde!", "", MB_OK);
 return 0;
}

Веб-сборка

Следующая программа C преобразуется в S-Expression из WebAssemby:

#include <stdio.h>
    
int main() {
  puts("Hello...");
}

hello.wat:

(module
 (type $FUNCSIG$ii (func (param i32) (result i32)))
 (import "env" "puts" (func $puts (param i32) (result i32)))
 (table 0 anyfunc)
 (memory $0 1)
 (data (i32.const 16) "Hello...\00")
 (export "memory" (memory $0))
 (export "main" (func $main))
 (func $main (; 1 ;) (result i32)
  (drop
   (call $puts
    (i32.const 16)
   )
  )
  (i32.const 0)
 )
) 

Wscript

WScript.Echo("Salut le Monde!"); 

X

X++

class classSalut
{
}

static void main(args Args)
{
 dialog dialog;
 dialog = new dialog();
 dialog.addText("Salut le Monde!");
 dialog.run();
}

XAML/WPF

<Page xmlns="">
 <TextBlock>Salut le Monde!</TextBlock>
</Page>

XHTML 1.1

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN">
<html xmlns="" xml:lang="en">
<head>
 <title>Salut</title>
</head>
<body>
     <p>Salut le Monde!</p>
</body>
</html>

XML

<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl" href="Salut le Monde.xsl" ?>
<!-- Salut en XML -->
<text>
   <string>Salut le Monde!</string>
</text>

XQuery

(: Salut with XQuery :)
let $i := "Salut le Monde!"
return $i

XSLT

Самый простой код:

<xsl:template match="/">
 <xsl:text>Salut le Monde!</xsl:text>
</xsl:template>

Созданный HTML:

 <xsl:template match="/">
 <html>
 <body>
 <h1>Salut le Monde!</h1>
 </body>
 </html>
 </xsl:template>

XUL

<?xml-stylesheet href="chrome://global/skin" type="text/css" ?>
<window xmlns="" align="center" pack="center" flex="1">
 <description>Salut le Monde!</description>
</window>

---

• Еще одна небольшая коллекция программ «Привет миру». Но это фарс в ГНУ.
• Отсчет Эратостена на любом языке программирования.
• Числа Fibonacci на всех языках.
• Список языков программирования.

Создан в 2006 году. Последний раз изменялся 6 сентября 2021 года.
Разрешается печатать страницу и копировать печатную версию для любого использования. Не размещайте ее на другом сайте, размещайте ссылку на этой странице.