BONJOUR LE MONDE!...

en   FORTRAN (77/90/95)

et autres langages de moindre importance...

F O R T R A N 


    PRINT*,"FORTRAN dit: 'Bonjour!' au Monde..."
END


I$ f90 BONJOUR.F90/standard=f95
I$ link bonjour
I$ run bonjour
FORTRAN dit: 'Bonjour!' au Monde...

C 


#include <stdio.h>      /* importation (USE) */

main()  
{                          
   printf ("C dit: 'Bonjour!...' au Monde\n");
}


I$ cc BONJOUR.C
I$ link bonjour
I$ run bonjour
C dit: 'Bonjour!...' au Monde

C + + 


#include <iostream.h>      /* importation (USE) */

main()            
{                          
   cout << "C++ dit: 'Bonjour!...' au Monde\n";	
}



I$ cxx BONJOUR.Cxx
I$ CXXLINK BONJOUR
I$ run bonjour
C++ dit: 'Bonjour!...' au Monde

J A V A 


class bonjour {
  public static void main (String args[]) {
     System.out.println
        ("JAVA dit: 'Bonjour!...' au Monde.");
  }
}


I$ javac bonjour.java
I$ java bonjour
JAVA dit: 'Bonjour!...' au Monde.

A D A 


with TEXT_IO;           -- paquetage predefini d'E/S.

procedure BONJOUR is
  use TEXT_IO;
BEGIN                   --**  CORPS DU PGM PPAL  **
  put_line ("ADA dit: 'Bonjour!...' au Monde.");
END Bonjour;


I$ acs set library [.A95LIB]
%ACS-I-CL_LIBIS, Current program library is 
USER:[ADA.A95LIB]
I$ adac BONJOUR.ada
Job COMPADA (queue CERES_ADA_BATCH, entry 416) 
started on CERES_ADA_BATCH
I$
Job COMPADA (queue CERES_ADA_BATCH, entry 416) completed
I$ acs link BONJOUR
%ACS-I-CL_LINKING, Invoking the OpenVMS Linker 
for OPENVMS_AXP target
I$ run BONJOUR
ADA dit: 'Bonjour!...' au Monde.

P L / 1 


Bonjour: Proc options (main);

put list ('PL/1 dit: ''Bonjour!...'' au Monde.');

End Bonjour;


I$ plI BONJOUR
I$ link BONJOUR
I$ run BONJOUR
PL/1 dit: 'Bonjour!...' au Monde.