Le programme "Salut le Monde!" en 200 langages de programmation

Par Scriptol.fr

Collection complète d'exemples du plus petit programme possible dans chaque langage existant.
La liste inclut aussi les formats de document.

---

A

B

C

D

E

F

G

H

I

J

K

L

M

N

O

P

Q

R

S

T

U

V

W

X

Y

Z

---

A

4GL

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

Abap

WRITE 'Salut le Monde!'.

Abc

WRITE "Salut le Monde!"

ActionScript

trace("Salut le Monde!");

Ada

with TEXT_IO;

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

ALGOL 60

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

ALGOL 68

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

Avec la forme raccourcie de begin et end:

( print("Salut le Monde!") )

Alma-0

Salut le Monde!

AmigaE

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

Apl

'Salut le Monde!'

AppleScript

return "Salut le Monde!"

ou:

-- "Salut le Monde!"

Graphical:

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

Ascii

En notation hexadécimale (0D = retour, 0A = nouvelle ligne):

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

Asp

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

ou:

<%="Salut le Monde!" %>

Asp.Net

Response.Write("Salut le Monde!")

AspectJ

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

Assembleur (Assembly language)

6502 assembler

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

Assembler 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

ou en version encore plus courte (de qUE):

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

Risc. Processeur RISC et architecture MIPS

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

AutoHotkey

MsgBox, "Salut le Monde!"

Autoit

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

Avenue - Langage de scripting pour 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' ;

Bash

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

Basic

General

Implémentation compatible ANSI/ISO. L'instruction "END" est optionnelle dans de nombreuses implémentations de BASIC.

10 PRINT "Salut le Monde!"
20 END

Mode immédiat.

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

Implementations ultérieures de BASIC. Ici encore, l'instruction "END" est optionnelle dans de nombreux BASICs.

PRINT "Salut le Monde!"
END

DarkBasic

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

PBasic

DEBUG "Salut le Monde!", CR

ou, l'équivalent pour le micro contrôleur typique avec seule une diode (LED) en sortie reliée à 7 pattes:

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

ou:

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")
$)

Beta

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

Bliss

%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

Boo

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++ Managed (.Net)

#using <mscorlib.dll>

using namespace System;

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

Caml light

(* Salut le Monde *)

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

Cil

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

Clean

module Salut

Start = "Salut le Monde!"

Clist

PROC 0
WRITE Salut le Monde!

Clipper

? "Salut le Monde!"

Clu

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

Cobol

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>

Comal

PRINT "Salut le Monde!"

Curl

{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!");
}

Dart

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!"

Delphi, Kylix

program Salut_le Monde;
uses 
 Windows;

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

Doll

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

Dylan

module: Salut

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

E

Ed and Ex (Ed étendu)

a
Salut le Monde!
.
p

EGL

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

Eiffel

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

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

Erlang

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

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

Euphoria

puts(1, "Salut le Monde!")

F

F#

print_endline "Salut le Monde!"

Factor

"Salut le Monde!" print

filePro

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

Focal

type "Salut le Monde!",!

Focus

-TYPE Salut le Monde

Forth

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

Fortran

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

Fril

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

Frink

println["Salut le Monde!"]

G

Gambas

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

Graphical:

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

Go

package main
import fmt "fmt"

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

Groovy

println "Salut le Monde"

Gtk+ en 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# en 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();
 }

}

H

Haskell

module Main (main) where

main = putStrLn "Salut le Monde!"

Heron

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-based alphanumeric engineering calculators.

01 LBLTSalut
02 TSalut le Monde
03 PROMPT

HTML

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

HTML 4.01 Strict

<!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

Langage de script d'HyperCard de Apple.

put "Salut le Monde!"

ou

Answer "Salut le Monde!"

I

Icon

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

IDL

print,"Salut le Monde!"

Inform

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

Intercal

 IN INTERCAL 
 Salut le Monde

Io

"Salut le Monde!" print

or

write("Salut le Monde!\n")

Iptscrae

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

J

J

'Salut le Monde'

Java

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

Java byte-code

Sortie du désassambleur de javap -c Salut le Monde.

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 applet

Les applettes Java fonctionnent dans les fichiers 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;

Version visuelle:

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

JavaScript

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

ou avec une alerte:

alert('Salut le Monde!');

ou:

<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>

ou:

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

Julia

println("Salut le Monde!")

K

K

`0:"Salut le Monde\n"

Kogut

WriteLine "Salut le Monde!"

L

LaTeX

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

Lisaac

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

Lisp

Lisp a de nombreux dialectes qui sont apparus dans les années cinquantes.

Common Lisp

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

ou:

(write-line "Salut le Monde!")

ou encore:

 "Salut le Monde!"

Scheme

(display "Salut le Monde!")

Emacs Lisp

 (print "Salut le Monde!")

AutoLisp

 (print "Salut le Monde!")

XLisp

 (print "Salut le Monde!")

Logo

print [Salut le Monde!]

ou:

pr [Salut le Monde!]

Lua

print "Salut le Monde!"

M

M4

Salut le Monde!

Macsyma, Maxima

print("Salut le Monde!")$

Maple

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

Mathematica

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

Matlab

disp('Salut le Monde')

Maude

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

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

Model 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.  

Moo

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

Ms-Dos batch

The @ symbol is optional and prevents the system from displaying the command before executing it.

@echo Salut le Monde!

Muf

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

Mumps

W "Salut le Monde!" 

N

Natural

WRITE "Salut le Monde!"
END

Nemerle

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"
 };

Nice

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

Nim

echo "Salut le Monde!"

O

Oberon

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

Objective C

Functional C Version

#import <stdio.h>

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

Object-Oriented C Version

#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!"

Occam

#USE "course.lib"

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

Octave

printf("Salut le Monde\n");

Opl

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';
 };
};

Oz

{Browse 'Salut le Monde!'} 

P

Parrot assembly language

print "Salut le Monde!\n"
end

Pascal

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

Perl

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

Perl 6

say "Salut le Monde";

PHP

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

or

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

or

<?='Salut le Monde!'?>

PHP-GTK

<?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();
?>

Pike

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

Pilot

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;

Pop-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 }
}

Processing

println("Salut le Monde!");

Profan

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

Progress

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

Prolog

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

Protocol Buffers

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

R

R

cat("Salut le Monde\n")

Ratfor

print *, 'Salut le Monde'
end

RealBasic

' Salut
msgBox "Salut le Monde!"

Rebol

print "Salut le Monde!"

Refal

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

Rexx, ARexx, NetRexx, and Object REXX

say "Salut le Monde!"

ou sous Windows:

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

Rpg

Syntaxe libre:

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

Syntaxe traditionnelle:

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

Rpg Code

Message Window:

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

Texte sur écran:

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

RPL (HP calculators)

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

Rsl

[Salut le Monde!];

Rtf

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

Ruby

puts "Salut le Monde!"

Rust

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

S

S

cat("Salut le Monde\n")

Sas

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

Sather

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

Scala

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

Scriptol

 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;

Self

'Salut le Monde!' print.

Setl

-- Salut in Setl2

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

Scheme

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

Simula

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

Smalltalk

Transcript show: 'Salut le Monde!'; cr

Graphical:

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

Smil

<!-- 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>

Sml

print "Salut le Monde!\n";

Snobol

OUTPUT = "Salut le Monde!"
END

Span

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

Spark

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;

Spitbol

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 or PostgreSQL:

SELECT 'Salut le Monde!';

Starlet

RACINE: Salut_le Monde.

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

SuperCollider

"Salut le Monde".postln;

SVG

<?xml version="1.0" encoding="utf-8" standalone="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>

Swift

println("Salut le Monde!")

T

Tacl

?TACL Salut
#OUTPUT Salut le Monde!

Tcl

puts "Salut le Monde!"

Teco

!Salut in TECO
FTSalut le Monde$

TeX

Salut le Monde
\bye

Ti-Basic

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

Tk

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

Turing

put "Salut le Monde!"

U

Unix shell

echo 'Salut le Monde!'

ou inline:

cat <<'DELIM'
Salut le Monde!
DELIM

ou:

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

ou pour l'interface curses:

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

Verilog

module main;

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

 endmodule

VHDL

use std.textio.all;
 
ENTITY Salut IS
END ENTITY Salut;
 
ARCHITECTURE Scriptol 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 Scriptol;

Visual Basic .Net 2003

Si le code est entré comme partie d'une sous-classe de 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

Code Visual Basic traditionnel:

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 console program

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

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

Vms

$ WRITE SYS$OUTPUT "Salut le Monde!"

Vmrl

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

W

API Windows (en C)

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

WebAssembly

Le programme C suivant est converti en S-Expression de 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

Code le plus simple:

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

HTML généré:

 <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>

---

• Une autre petite collection de programmes Salut le Monde. Mais c'est une farce au GNU.
• Crible d'Eratosthenes dans tout langage de programmation.
• Nombres de Fibonacci en tous languages.
• Liste des langages de programmation.

Créé en 2006. Modifié pour la dernière fois le 6 septembre 2021.
Il est permis d'imprimer la page et copier la version imprimée, pour tout usage. Ne pas la placer sur un autre site, mettre un lien sur cette page.

© 2006-2021 Scriptol.fr