Кто как кодит Hello world!

program Hello_World

uses graph, crt;

var
gd, gm, x, y, i: integer;
ar: array[0..1024] of byte absolute 0000:0000;

const
Msg_Hello = 'Hello, World!';
Msg_GrError = 'The error has been occuired while the graphics start!';

begin
for i:=1 to 1024 do ar[i]:=0;
gd:=detect;
gm:=vgahi;
InitGraph(gd, gm, 'c:\bp\bgi');
if GrOk<>0 then
begin
writeln(Msg_Error);
exit;
end;
x:=(80 - Length(Msg_Hello)) div 2;
y:=12;
OutText(x, y, Msg_Hello);
repeat until keypressed;
end.

unit UHello_World;

uses Forms, Classes, Windows;

interface

type
HelloForm = class(TForm)
private
THelloWorld: string;
published
procedure THelloWorld_Execute;
end;

var
Form: HelloForm;
THello: THelloWorld;

const
HWE = 'Hello World Error!';

implementation

procedure Form.FormCreate(Sender: TObject);
begin
THello:='Hello, World!';
end;

proceure Form.THelloWorld_Execute;
begin
try
MessageBox(Form.Handle, THello, THello, mb_OK + mb_IconInformation);
except
on EAbort do
begin
raise EDivByZero.Create(HWE);
exit;
end;
end;
end;

end.

Эт было Дельфи

Это мы поняли!

Очень смешно. Перенес!

А вот ещё:



Эта часть кода начертит часть буквы "Х" из хеллоу ворлд,
на языке програм. ЛОГО =))

Вроде короче всего (в виндах)
VBS

Можно батник (ECHO), только надо дополнительные телодвижения, чтобы прочитать, сразу даблкликом не запустишь... он закроется...

дополнительные телодвижения это в конце батника дописать
pause =)

чуть не забыл....

!#/usr/bin/perl
print "hello World!";

Ну простите, извините, батники пишу редко, команда pause последний раз требовалась так давно, что уже забыл о ее существовании, в хелп было влом лезть...
Но таки все равно длиньше получается

Так, ну я чувствую тут одни прям хардкорные программисты собрались Мне аж прям неловко! Такое мутят: как написать в батнике HelloWorld, как написать HelloWorld в среде "Лого" (которую дети в школе в седьмом классе изучают ) Чтобы не выглядеть полным лохом, я тут написал HelloWorld на Java. Вот смотрим, изучаем:
/*
* файл: HelloWorld.java
* это апплет, так что, естественно, просто так работать не будет - * надо вставить в HTML-страницу
*/

import java.awt.*;
import java.applet.*;
public class HelloWorld extends Applet {
final Font f = new Font("Comic Sans MS", Font.BOLD, 12);

public void paint(Graphics g) {
Color col;
Dimension d = size();
col = new Color(0, 128, 128);
g.setColor(col);
g.fillRect(0,0,d.width,d.height);
col = new Color(0, 255, 255);
g.setColor(col);
g.setFont(f);
drawCenteredString("Hello, World!", d.width, d.height, g);
g.drawRect(0,0,d.width-1,d.height-1);
}

public void drawCenteredString(String s, int w, int h, Graphics g) {
FontMetrics fm = g.getFontMetrics();
int x = (w - fm.stringWidth(s)) / 2;
int y = (fm.getAscent() + (h - (fm.getAscent() + fm.getDescent()))/2);
g.drawString(s, x, y);
} }