Geekly Articles each Day
📜 ⬆️ ⬇️

Happy New Year 2012 in 150 languages

Dear Habravchane!
I congratulate you on the coming new year! I wish you creative success, career, intellectual and spiritual growth!

I want to give you a small gift: happy new year greetings in more than 150 programming languages!

image

A +


') 
 a Happy New Year in A+ 'Happy New Year'


ABAP


 Report Happy_New_Year. Write: "Happy New Year".


ABC


 WRITE “Happy New Year”


ADA


 -- Happy New Year with Text_IO; use Text_IO; procedure HappyNewYear is begin Put_Line("Happy New Year"); end HappyNewYear;


Alep


 # Happy New Year in Aleph println "Happy New Year"


Algae


 printf("Happy New Year\n");


Algol


 'begin' outstring(2, 'Happy New Year'); 'end'


Amos


 PRINT "Happy New Year"


APL


 'Happy New Year'


ASP (Active Server Page)


 <%@ language="javascript" %> <html><body> <% Response.Write('Happy New Year!'); %> </body></html>


ASSEMBLER (Intel 80x86; DOS, MASM)


 .MODEL tiny .CODE ORG 100h HAPPY PROC MOV AH,09h LEA DX,msg INT 21h ;Display Happy New Year MOV AX,4C00h ;Exit to DOS INT 21h HAPPY ENDP msg DB 'Happy New Year$' END HAPPY


awk


 BEGIN { print "Happy New Year" }


BASIC


 PRINT "Happy New Year"


Bcpl


 GET "LIBHDR" LET START () BE $( WRITES ("Happy New Year!*N") $)


BETA


 (# do 'Happy New Year' -> putline #)


Blue


 class HappyNewYear is == == HappyNewYear-Klasse == interface creation is == Erzeugt das HappyNewYear-Objekt do printIt end creation routines printIt is == prints Happy New Year do print("Happy New Year\n") end printIt end class


Brain


 #! this is also a single line comment {- and a multi-liine comment. -} "Happy New Year" println.


C


#include <stdio.h>
 main() { printf("Happy New Year\n"); }


C #


 using System; class HappyNewYear { static void Main() { Console.WriteLine("Happy New Year"); } }


C ++


 #include<iostream> int main(){ std::cout<<"Happy new year!"<<std::endl; return 0; }


Click


 #include <stdio.h> cilk void main() { printf("Happy New Year\n"); }


CLAIRE


 [ main() -> printf("Happy New Year\n") ]


Clipper


 ? "Happy New Year" quit


COBOL


 IDENTIFICATION DIVISION. PROGRAM-ID. HappyNewYear. AUTHOR. Fabritius. ENVIRONMENT DIVISION. CONFIGURATION SECTION. INPUT-OUTPUT SECTION. DATA DIVISION. FILE SECTION. WORKING-STORAGE SECTION. LINKAGE SECTION. PROCEDURE DIVISION. DISPLAY "Happy New Year". STOP RUN.


Concirrent clean


 module HappyNewYear import StdEnv Start :: String Start = "Happy New Year"


Cook


 [print "Happy New Year"];


COZY INFINITY


 BEGIN ; WRITE 6 'Happy New Year' ; { 6 ist Stdout } END ;


C-talk


 cout << "Happy New Year\n";


Curl


 {curl 1.7 applet} {applet license = "personal"} Happy New Year


Cyclon


 #include <stdio.h> int main() { printf("Happy New Year\n"); return 0; }


Dbase


 ? "Happy New Year" return


Dos batch


 @ECHO OFF ECHO Happy New Year Dylan define method Happy-New-Year() format-out("Happy New Year\n"); end method Happy-New-Year; Happy-New-Year();


E


 println( "Happy New Year" )


Eiffel


 indexing title: "Happy New Year"; author: "rgen3"; class MAIN creation make feature make is do io.put_string("Happy New Year"); io.new_line end -- make end -- class MAIN


Emerald



 const HappyNewYear == object HappyNewYear process stdout.putstring["Happy New Year\n"] stdin.close stdout.close end process end HappyNewYear


Erlang


 io:fwrite("Happy New Year~n"). %% im Eingabemodus


Euphoria


 puts (1, "Happy New Year\n")


Fish


 output "Happy New Year" ;;


Fop


 .box Happy New Year !!! .ende


Fororth


 ." Happy New Year"


Fortran

 PROGRAM HappyNewYear PRINT *, "Happy New Year" END PROGRAM HappyNewYear


Fox


 ? "Happy New Year" return


Gofer


 show "Happy New Year"


Haskell


 -- file: Main.hs -- compile: ghc --make Main -o main module Main (main) where main = putStr "Happy New Year\n"


HB (Hyper Builder)


 # definiere ein Objekt HappyNewYear :set HappyNewYear <b>HappyNewYear</b> : # definiert das Startobjekt, welches man mittels URL aufrufen kann :out main <html><head></head><body> <HappyNewYear> <!-- ruft das Objekt HappyNewYear auf --> </body></html>


Hope


 "Happy New Year\n";


HTML


 <html> <head> <title>Happy New Year</title> </head> <body> Happy New Year </body> </html>


IBM EXEC


 &CONTROL * &TYPE Happy New Year! * &EXIT 0 <h4>Icon</h4> 

 procedure main(args) write("Happy New Year\n") end


J


 'Happy New Year'


Java (Applet)


 import java.applet.*; import java.awt.*; public class HappyNewYear extends Applet { public void paint(Graphics g) { g.drawString("Happy New Year",10,10); }


Javascript


 <html> <head> <title>Javascript Happy New Year</title> </head> <body> <script> document.write("Happy New Year!"); </script> </body> </html>


K


 ` 0:"Happy New Year\n"


LaTeX


 \documentclass[a4paper]{report} \title{Happy New Year in LaTeX} \begin{document} Happy New Year \end{document}


Leda


 include "std.led"; begin print("Happy New Year"); end;


LIRL


 print "Happy New Year"


Lisp


 (print "Happy New Year")


Logo


 print [Happy New Year]


Lout


 @SysInclude {doc} @Doc @Text @Begin Happy New Year @End @Text


Lua


 print("Happy New Year\n")


Make


 main-target: @echo "Happy New Year"


Mercury


 % compile with: % mmake Happy.depend % mmake Happy :- module Happy. :- interface. :- import_module io. % di=desctructive input, uo=unique output :- pred main(io__state::di, io__state::uo) is det. :- implementation. % "-->" tells that we are using DCG (definite clause grammar), which frees us % from threading some extra arguments through the code. main --> io__write_string("Happy New Year\n").


merd


 "Happy New Year!".println


Miranda


 "Happy New Year!"


Moby


 module Main { val () = ConsoleIO.print "Happy New Year\n" }


Modula


 MODULE HappyNewYear; FROM InOut IMPORT WriteString, WriteLn; BEGIN WriteString('Happy New Year'); WriteLn; END HappyNewYear.


MUMPS


 HAPPY W "Happy New Year",! Q


NESL


 print_string("Happy New Year\n");


Oberon


 MODULE HappyNewYear; IMPORT Out; BEGIN Out.Open; Out.String('Happy New Year'); END HappyNewYear.


Objective-c


 void main() { printf("Happy New Year\n"); }


Objective calm


 print_string("Happy New Year\n");;


Obliq


 sys_printText("Happy New Year\n");


Octave


 printf("Happy New Year\n")


Oz / Mozart


 % Happy New Year!!! {Show 'Happy New Year'}


Parrot


 print "Happy New Year\n"


Pascal


 PROGRAM HappyNewYear; BEGIN WRITELN('Happy New Year'); END.


Perl


 print "Happy New Year\n";


Phantom


 (* Happy New Year! *) module HappyNewYear; import stdio; begin stdio.puts("Happy New Year\n"); end HappyNewYear.


Php



 <?php echo "Happy New Year\n"; ?>


Pico


 { "da es in Pico keine Kommentare gibt,"; "verwende ich einfach Strings."; display('Happy New Year', eoln) }


Pike


 void main() { write("Happy New Year\n"); }


PL / 0E


 PROGRAM HappyNewYear; BEGIN WRITELN('Happy New Year'); END.


PL / 1


 HAPPY: PROCEDURE OPTIONS (MAIN); PUT SKIP LIST('HAPPY NEW YEAR!'); END HAPPY;


PL / SQL


 BEGIN DBMS_OUTPUT.put_line('Happy New Year'); END;


Pleant


 console "Happy New Year" eol


Posrscript


 % Happy New Year /Courier findfont 28 scalefont setfont 0 0 moveto (Happy New Year) show % Text links unten ausgeben showpage


Profan


 PRINT "Happy New Year"


Prolog


 ?- write('Happy New Year'), nl.


Python


 print "Happy New Year"


R


 print("Happy New Year")


Rebol


 [Title: "Happy New Year" Date: 1-Jan-2012 File: %webscan.r Author: "Rgen3" Version: 1.2.3 print "Happy New Year"]


Rexx


 SAY "Happy New Year"


Ruby


 "Happy New Year\n".display


Sather


 class MAIN is main is #OUT + "Happy New Year\n"; end; -- main end; -- class MAIN


Sceme


 (display "Happy New Year")


Shell-sprachen


 echo Happy New Year


Simula


 begin OutText("Happy New Year"); OutImage end


Sina


 class HappyNewYear interface methods show returns nil; inputfilters disp: Dispatch = {inner.*}; end; class HappyNewYear implementation methods show begin self.printLine('Happy New Year'); end; end; main temps Happy: HappyNewYear; begin Happy.show end


Sirius


 PROGRAM Happy_New_Year OUTPUT ('Happy New Year') END


Sisal


 define main function main(returns array [Character]) "Happy New Year" end function


Smalltalk


 'Happy New Year' out.


SML


 print "Happy New Year\n";


Snobol


 OUTPUT = 'Happy New Year' END


SQL


 SELECT 'Happy New Year'


Superbase


 ? "Happy New Year!"


Tcl


 puts "Happy New Year" TI-83 Graphing Calculator :Disp "Happy New Year"


TOM


 implementation class HappyNewYear int main Array argv { [[[stdio out] print "Happy New Year"] nl]; return 0; } end; implementation instance HappyNewYear end;


Turing


 put "Happy New Year"


Txl


 define program [repeat token] end define % Main transformation rule - whatever the input, % transform it into Happy New Year function main replace [program] _ [program] by "Happy New Year" end function


Ufo


 main : String is "Happy New Year\n"


Vhdl


 ENTITY HappyNewYear IS END HappyNewYear; ARCHITECTURE bhv OF HappyNewYear IS BEGIN ASSERT FALSE REPORT "HAPPY NEW YEAR" SEVERITY NOTE; END bhv;


Vim



 :echo "Happy New Year"


Webl



 PrintLn("Happy New Year");


WML (Wireless Markup Language)


 <?xml version="1.0"?> <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"> <!-- Happy New Year in WML --> <wml> <card id="Happy_New_Year" title="Happy New Year"> <p>Happy New Year</p> </card> </wml>


XPL0


 code Text=12; Text(0, "Happy New Year");


Yacas


 WriteString("Happy New Year");


Yafl


 DEFINITION MODULE HappyNewYear; CLASS HappyClass; METHOD CREATE; METHOD Main; END HappyClass; END HappyNewYear; IMPLEMENTATION MODULE HappyNewYear; FROM Streams IMPORT StdOut; CLASS HappyClass; METHOD CREATE; BEGIN -- wird aufgerufen um das Objekt zu initialisieren Main; END; METHOD Main; BEGIN StdOut.WriteLine ("Happy New Year"); END Main; END HappyClass; END HappyNewYear;


Yoix


 import yoix.stdio.*; printf("Happy New Year\n");


Yorick


 write, "Happy New Year\n"

Source: https://habr.com/ru/post/135212/

More articles:


All Articles