150 рднрд╛рд╖рд╛рдУрдВ рдореЗрдВ рдирдпрд╛ рд╕рд╛рд▓ рдореБрдмрд╛рд░рдХ

рдкреНрд░рд┐рдп рдЦрд╛рдмрд░рд╡рдЪрд┐рдпрди!
рдирдпрд╛ рд╕рд╛рд▓ рдореБрдмрд╛рд░рдХ рд╣реЛ! рдореИрдВ рдЖрдкрдХреЛ рд░рдЪрдирд╛рддреНрдордХ рд╕рдлрд▓рддрд╛, рдХреИрд░рд┐рдпрд░, рдмреМрджреНрдзрд┐рдХ рдФрд░ рдЖрдзреНрдпрд╛рддреНрдорд┐рдХ рд╡рд┐рдХрд╛рд╕ рдХреА рдХрд╛рдордирд╛ рдХрд░рддрд╛ рд╣реВрдВ!

рдореИрдВ рдЖрдкрдХреЛ рдПрдХ рдЫреЛрдЯрд╛ рд╕рд╛ рдЙрдкрд╣рд╛рд░ рджреЗрдирд╛ рдЪрд╛рд╣рддрд╛ рд╣реВрдВ: 150 рд╕реЗ рдЕрдзрд┐рдХ рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдВрдЧ рднрд╛рд╖рд╛рдУрдВ рдореЗрдВ рдирдпрд╛ рд╕рд╛рд▓ рдореБрдмрд╛рд░рдХ рд╣реЛ!

рдЫрд╡рд┐

рдП +



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


ABAP


 Report Happy_New_Year. Write: "Happy New Year". 


рдПрдмреАрд╕реА


 WRITE тАЬHappy New YearтАЭ 


рдПрдбреАрдП


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


рд╢реИрд╡рд╛рд▓


 printf("Happy New Year\n"); 


ALGOL


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


рдЕрдореЛрд╕


 PRINT "Happy New Year" 


рдПрдкреАрдПрд▓


 'Happy New Year' 


рдПрдПрд╕рдкреА (рд╕рдХреНрд░рд┐рдп рд╕рд░реНрд╡рд░ рдкреЗрдЬ)


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


ASSEMBLER (рдЗрдВрдЯреЗрд▓ 80x86; рдбреЙрд╕, рдПрдордПрдПрд╕рдПрдо)


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


рдмреЗрд╕рд┐рдХ


 PRINT "Happy New Year" 


BCPL


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


рдмреАрдЯрд╛


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


рдиреАрд▓рд╛


 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 


рдорд╕реНрддрд┐рд╖реНрдХ


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


рд╕реА


# рдЕрд▓рдЧ рдХрд░реЗрдВ <stdio.h>
 main() { printf("Happy New Year\n"); } 


C #


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


рд╕реА ++


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


рдХреНрд▓рд┐рдХ рдХрд░реЗрдВ


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


CLAIRE


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


рдХрд╛рдЯрдиреЗрд╡рд╛рд▓рд╛


 ? "Happy New Year" quit 


рдХреЛрдмреЛрд▓


 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. 


рд╕рд╛рдл рд╕реБрдерд░рд╛


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


рдкрдХрд╛рдирд╛


 [print "Happy New Year"]; 


COZY рдХреА рдЬрд╛рдирдХрд╛рд░реА


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


рд╕реА-рдЯреЙрдХ


 cout << "Happy New Year\n"; 


рдХрд░реНрд▓


 {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 


рдбреЙрд╕ рдмреИрдЪ


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


рдП


 println( "Happy New Year" ) 


рдПрдлрд┐рд▓


 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 


рдкрдиреНрдирд╛



 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 


рдЙрддреНрд╕рд╛рд╣


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


рдордЫрд▓реА


 output "Happy New Year" ;; 


рдПрдлрдУрдкреА


 .box Happy New Year !!! .ende 


рдЖрдЧреЗ


 ." Happy New Year" 


Fortran

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


рдлреЙрдХреНрд╕


 ? "Happy New Year" return 


gofer


 show "Happy New Year" 


рд╣рд╛рд╕реНрдХреЗрд▓


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


HB (рд╣рд╛рдЗрдкрд░ рдмрд┐рд▓реНрдбрд░)


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


рдЖрд╢рд╛


 "Happy New Year\n"; 


рдПрдЪрдЯреАрдПрдордПрд▓


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


рдЗрдм рдЕрдорд▓


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

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


рдЬрдореНрдореВ


 'Happy New Year' 


рдЬрд╛рд╡рд╛ (рдПрдкреНрд▓реЗрдЯ)


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


рдЬрд╛рд╡рд╛рд╕реНрдХреНрд░рд┐рдкреНрдЯ


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


рдХрд╢реНрдореАрд░


 ` 0:"Happy New Year\n" 


LaTeX


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


рд▓реЗрдбрд╛


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


LIRL


 print "Happy New Year" 


рддреБрддрд▓рд╛рдирд╛


 (print "Happy New Year") 


рд▓реЛрдЧреЛ


 print [Happy New Year] 


рдЧрдВрд╡рд╛рд░


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


рд▓реБрдЖ


 print("Happy New Year\n") 


рдореЗрдХ


 main-target: @echo "Happy New Year" 


рдкрд╛рд░рд╛


 % 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 


рдорд┐рд░рд╛рдВрдбрд╛


 "Happy New Year!" 


рдореЛрдмреА


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


рдУрдмреЗрд░реЛрди


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


рдСрдмреНрдЬреЗрдХреНрдЯрд┐рд╡-рд╕реА


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


рдЙрджреНрджреЗрд╢реНрдп рд╢рд╛рдВрдд


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


Obliq


 sys_printText("Happy New Year\n"); 


рд╕рдкреНрдЯрдХ


 printf("Happy New Year\n") 


рдУрдЬ / рдореЛрдЬрд╛рд░реНрдЯ


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


рддреЛрддрд╛


 print "Happy New Year\n" 


рдкрд╛рд╕реНрдХрд▓


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


рдкрд░реНрд▓


 print "Happy New Year\n"; 


рдкреНрд░реЗрдд


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


рдкреАрдПрдЪрдкреА



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


рдкрд┐рдХреЛ


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


рдкрд╛рдЗрдХ


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


рдкреАрдПрд▓ / 0 рдИ


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


PL / 1


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


рдкреАрдПрд▓ / рдПрд╕рдХреНрдпреВрдПрд▓


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


рдХреЛрдорд▓


 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. 


рдЕрдЬрдЧрд░


 print "Happy New Year" 


рдЖрд░


 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" 


рдЧрд╣рд░реЗ рд▓рд╛рд▓ рд░рдВрдЧ рдХрд╛


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


рд╢реЗрд▓ рд╕реНрдкреНрд░реЗрдЪреЗрди


 echo Happy New Year 


рд╕рд┐рдореБрд▓рд╛


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


рд╕рд┐рдирд╛


 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 


рд╕реАрд░рд┐рдпрд╕


 PROGRAM Happy_New_Year OUTPUT ('Happy New Year') END 


рдПрдХ рдкреНрд░рдХрд╛рд░ рдХрд╛ рдкреМрдзрд╛


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


рд╕реНрдорд╛рд▓рдЯрд╛рдХ


 'Happy New Year' out. 


рдПрд╕рдПрдордПрд▓


 print "Happy New Year\n"; 


SNOBOL


 OUTPUT = 'Happy New Year' END 


рдПрд╕рдХреНрдпреВрдПрд▓


 SELECT 'Happy New Year' 


Superbase


 ? "Happy New Year!" 


Tcl


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


рдЯреЙрдо


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


рдЯреНрдпреВрд░рд┐рдВрдЧ


 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 


рдЙрдлреМ


 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; 


рд╢рдХреНрддрд┐



 :echo "Happy New Year" 


WebL



 PrintLn("Happy New Year"); 


WML (рд╡рд╛рдпрд░рд▓реЗрд╕ рдорд╛рд░реНрдХрдЕрдк рднрд╛рд╖рд╛)


 <?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/In135212/


All Articles