いろんな言語で「Hello World」だ。ゴラァ
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。
NGNG皆も知ってる言語・スクリプトで続けてくれ!
#include <stdio.h>
int main()
{
printf("Hello World\n");
return (0);
}
0048デフォルトの名無しさん
NGNG>>35 に似てるのは気のせいよ。
using System;
class HelloWorld
{
public static void Main(String[] args)
{
Console.WriteLine("Hello World");
}
}
0049hanajan_(元祖なめんなよ)
NGNG似過ぎだって・・・
0050名無しさん@お腹いっぱい。
NGNGDISPLAY HOGE ON CONSOLE. じゃなくて
DISPLAY HOGE UPON CONSOLE. じゃないかな
いくら偽者だといってもちみのソース汚すぎ。
私が清書してあげましょう。
目盛行 ---1----+----2----+----3----+----4----+----5----+----6----+----7----+---
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. HELLO.
000300 *
000400 ENVIRONMENT DIVISION.
000500 CONFIGURATION SECTION.
000600 SOURCE-COMPUTER. MAKER-A.
000700 OBJECT-COMPUTER. MAKER-A.
000800 /
000900 DATA DIVISION.
001000 /
001100 WORKING-STORAGE SECTION.
001200 01 HELLO-WORLD PIC X(11) VALUE 'Hello World'.
001300 /
001400 PROCEDURE DIVISION.
001500 DISPLAY HELLO-WORLD UPON CONSOLE.
001600 STOP RUN.
005150
NGNG結局汚いままか。
005250
NGNGIDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
*
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. MAKER-A.
OBJECT-COMPUTER. MAKER-A.
/
DATA DIVISION.
/
WORKING-STORAGE SECTION.
01 HELLO-WORLD PIC X(11) VALUE 'Hello World'.
/
PROCEDURE DIVISION.
DISPLAY HELLO-WORLD UPON CONSOLE.
STOP RUN.
0053名無しさん@お腹いっぱい。
NGNG0055名無しさん@Emacs
NGNGWRITE(6,610) ' HELLO WORLD '
610 FORMAT(A20)
END
0056名無しさん@お腹いっぱい。
NGNG(print "Hello World")
005756
NGNGで既出だった。しかも message の方が洗練されてる。打つだし脳
0058名無しさん@お腹いっぱい。
NGNG0059名無しさん@お腹いっぱい。
NGNG.
.
0060名無しさん@お腹いっぱい。
NGNGecho "Hello, World.";
?>
0061名無しさん@お腹いっぱい。
NGNGWindows プログラム的には
Private Sub Form_Paint()
Print "Hello World"
End Sub
のほうがよくない? フォームの AutoRedraw プロパティも
デフォルトでは False だし。
0062名無しさん@お腹いっぱい。
NGNG│ .|
│ Hello World! │
│ .|
└―――──――――┘
ヽ(´ー`)ノ
( へ)
く
0063U-名無しさん
NGNGこれからはじまった。
(これがプログラマーに永遠にHello Worldを書かせつづける原点)
0064PDF
NGNG1 0 obj
<< /Type /Catalog /Pages 2 0 R >>
endobj
2 0 obj
<< /Type /Pages /Kids [3 0 R] /Count 1 >>
endobj
3 0 obj
<< /Type /Page /Parent 2 0 R /MediaBox [0 0 200 150]
/Resources << /Font << /F1 4 0 R >> >> /Contents 5 0 R >>
endobj
4 0 obj
<< /Type /Font /Subtype /Type1 /BaseFont /Helvetica >>
endobj
5 0 obj
<< /Length 39 >>
stream
BT /F1 20 Tf 10 100 Td (Hello World) Tj ET
endstream
endobj
xref
0 6
0000000000 65535 f
0000000009 00000 n
0000000058 00000 n
0000000115 00000 n
0000000241 00000 n
0000000311 00000 n
trailer
<<
/Size 6
/Root 1 0 R
>>
startxref
403
%%EOF
0065名無しさん@お腹いっぱい。
NGNG0066Anonymousさん
NGNG20 END
0067Anonymousさん
NGNGbegin
writeln('Hello World')
end.
0068Anonymousさん
NGNG(cons 'Hello (list 'World))))
0069Anonymousさん
NGNGvoid main(void)
{
char *message[] = {"Hello ", "World"};
int i;
for(i = 0; i < 2; ++i)
printf("%s", message[i]);
printf("\n");
}
0070名無しさん@お腹いっぱい。
NGNGHello World
C:\>
逝ってきます。
0071Anonymousさん
NGNG{
private:
int size;
char *ptr;
public:
string() : size(0), ptr(new char('\0')) {}
string(const string &s) : size(s.size)
{
ptr = new char[size + 1];
strcpy(ptr, s.ptr);
}
~string()
{
delete [] ptr;
}
friend ostream &operator <<(ostream &, const string &);
string &operator=(const char *);
};
ostream &operator<<(ostream &stream, const string &s)
{
return(stream << s.ptr);
}
string &string::operator=(const char *chrs)
{
if (this != &chrs)
{
delete [] ptr;
size = strlen(chrs);
ptr = new char[size + 1];
strcpy(ptr, chrs);
}
return(*this);
}
int main()
{
string str;
str = "Hello World";
cout << str << endl;
return(0);
}
0072Anonymousさん
NGNG$msg="Hello, world.\n";
if ($#ARGV >= 0) {
while(defined($arg=shift(@ARGV))) {
$outfilename = $arg;
open(FILE, ">" . $outfilename) || die "Can't write $arg: $!\n";
print (FILE $msg);
close(FILE) || die "Can't close $arg: $!\n";
}
} else {
print ($msg);
}
1;
0073Anonymousさん
NGNGPRINT *, 'Hello World'
END
0074Anonymousさん
NGNGヲレ的には いにしえのRPG言語が良いのじゃ
0075Z80
NGNGCALL PRINTOUT
サブルーチンの中は考えてません(ダメ?)。
0076名無しさん@お腹いっぱい。
NGNGint main()
{
syslog(LOG_INFO|LOG_USER, "ALL YOUR BASE ARE BELONG TO US.");
return 0;
}
0077Anonymousさん
NGNGそれ、「Hello World」なのか?
0078名無しさん@お腹いっぱい。
NGNG最後の CALL は JP にしとこうよ。
OS-9 + MC680x0 きぼん。
0079名無しさん@お腹いっぱい。
NGNGprint [72, 101, 108, 108, 111, 32, 87, 111, 114, 108, 100, 10].pack("C*")
# Just Another Perl Hacker みたいだね
0080x86 ASM
NGNG-a cs:0
24E1:0000 0E PUSH CS
24E1:0001 1F POP DS
24E1:0002 BA0E00 MOV DX,000E
24E1:0005 B409 MOV AH,09
24E1:0007 CD21 INT 21
24E1:0009 B8014C MOV AX,4C01
24E1:000C CD21 INT 21
-e cs:e
24E1:000E 54.48 68.65
24E1:0010 69.6c 73.6c 20.6f 70.2c 72.20 6F.57 67.6f 72.72
24E1:0018 61.6c 6D.64 20.0d 63.0a 61.0a 6E.24 6E.0
-g
Hello, World
プログラムは正常に終了しました.
-
0081名無しさん@お腹いっぱい。
NGNG.text
pushl $0x0c
pushl $msg
pushl $0x1
pushl $0x4
movl $0x4,%eax
int $0x80
subl $-0x10,%esp
xorl %ebx,%ebx
xorl %eax,%eax
incl %eax
pushl %ebx
pushl %eax
int $0x80
msg: .asciz "Hello, World\n"
0082名無しさん@お腹いっぱい。
NGNG0083名無しさん@お腹いっぱい。
NGNG% tar zxfv hello-1.3.tar.gz ; cd hello-1.3
% ./configure ; make ; make install ; rehash
% hello
0084名無しさん@お腹いっぱい。
NGNGむぅ冗談かと思ったら。一体何をするプログラムだ??
0085すとーるまんKo
NGNGHello Worldはプログラムを習い始めてまず作らされます。
毎年、数百万ステップものHello Worldプログラムが作られ
再利用することも無く捨てられていきます。
まったく、資源の無駄としか言いようが無く、GNUの精神にも
真っ向から挑戦しています。
この不毛な人的リソース消費に終止符を打つため、より正しい
Hello Worldプログラムのソースをフリーソフトとして公開します。
0086名無しさん@お腹いっぱい。
NGNGもっと短くなるよ
コンパイラが吐いたソースそのままじゃoもろくない
0087名無しさん@お腹いっぱい。
NGNGそれは、
movl $0x4,%eax
pushl %eax
とした方がバイト数減らせるとか?
ちなみに、これはコンパイラが吐いたソースではないよ。
普通にhello.Sでかいてま。教えてplease.
0088名無しさん@お腹いっぱい。
NGNGmachine_halt();
do_exit(0);
0089名無しさん@お腹いっぱい。
NGNG(message-box (prin1-to-string '(Hello Wold)))
0090名無しさん@お腹いっぱい。
NGNGttp://www.gnu.org/software/hello/hello.html
# apt-get install hello
# hello
Hello, world!
0091名無しさん@お腹いっぱい。
NGNG# hello
0092CCルリたん。
NGNG<TITLE>
Hello World
</TITLE>
<BODY>
Hello World
</BODY>
</HTML>
0093awk
NGNG#!/usr/bin/awk
BEGIN{
print "Hello World";
}
0094WRD
NGNG@LOCATE(3;29)@COLOR(37)@WAIT(8);
Hello World.
0095Anonymousさん
NGNGto: [email protected]
hello world
ctrl + d
ををっ!なぜか師匠に差出人不明のメールが...
0096クンクン(零式)
NGNGクン・・・
まぁ、Linuxって便利なようね。。。
# /ver/qmail/bin/qmail-inject
to:[email protected]
"hello world"
ctrl + d
"give_me_UPS_to_use_AS/400"
ctrl + d
ctrl + z
クーン,クンクン
0097CCルリたん。
NGNGruri% wall Hello World
0098ベタでスマソ
NGNG\begin{document}
Hello World
\end{document}
0099VAX DCL
NGNG$ EXIT
0100名無しさん@お腹いっぱい。
NGNGHello World in JavaScript
</TITLE>
<SCRIPT>
document.write ("Hello, world!")
</SCRIPT>
0101てーぎふ
NGNGstate(0,37,100.000,0,0,0,16,1,9,1,1,0,0,1,0,1,0,'Courier',0,80640,0,0,0,10,0,0,1,1,0,16,0,0,1,1,1,1,1088,1408,1,0,2880,0).
%
% @(#)$Header$
% %W%
%
unit("1 pixel/pixel").
script_frac("0.6").
fg_bg_colors('black','white').
page(1,"",1,'').
text('black',16,3,1,0,1,99,16,0,13,3,0,0,0,0,2,99,16,0,0,"",0,0,0,0,16,'',[
minilines(99,16,0,0,0,0,0,[
mini_line(99,13,3,0,0,0,[
str_block(0,99,13,3,0,-1,0,0,0,[
str_seg('black','Courier',0,80640,99,13,3,0,-1,0,0,0,0,0,
"Hello World")])
])
])]).
0102Y2k
NGNGvoid main()
int a=0;
{
while(1)
{
printf("%d\n",a);
a++;
}
}
0103名無しさん@お腹いっぱい。
NGNGハァ?
0104???????????????B
NGNGゆるいしてやってください。
void
0105PL/I
NGNGPUT SKIP LIST ('Hello World');
END HW;
0106???????????????B
NGNG\
0107PostScript
NGNG%%Creator: 2ch-net
%%Pages: 1
%%DocumentFonts: Times-Roman
%%LanguageLevel: 2
%%EndComments
%%BeginProlog
/Hello {
/Times-Roman findfont 10 scalefont setfont
moveto
(Hello, World) show
} def
%%EndProlog
[{
%%BeginFeature: *PageSize A4
mark { statusdict /a4tray get exec } stopped pop
userdict /a4 get exec cleartomark
%%EndFeature
} stopped cleartomark
%%Page: 1 1
200 200 Hello
showpage
%%Trailer
%%Pages: 1
%%EOF
0108Prolog
NGNG0109韓国語
NGNG0110名無しさん@お腹いっぱい。
NGNGvoid 、ハ、ホ、マ、ュ、゚、ホニャ、タ
0111Smalltalk
NGNG0112やはりここは
NGNGメインとは、
"Hello, world!"を表示し、
終了する。
すること。
0113初心者です
NGNGimport java.awt.*;
public class HelloWorld extends Frame {
public static void main( String argv[] ) {
HelloWorld helloWorld = new HelloWorld("4月30日版 ");
helloWorld.show();
}
HelloWorld(String title){
super(title);
setSize(400, 200);
setLayout(null);
this.setBackground(Color.magenta);
Label label = new Label("アンニョンハセヨ セゲー");
label.setLocation(20, 50);
label.setSize(200, 50);
label.setBackground(Color.yellow);
this.add(label);
}
}
0114名無しさん@お腹いっぱい。
NGNG0115名無しさん@お腹いっぱい。
NGNGガイシュツ
0116名無しさん@お腹いっぱい。
NGNG0117名無しさん@お腹いっぱい。
NGNG0118login:Penguin
NGNG0119login:Penguin
NGNG了解!
012070じゃないよ
NGNGC:\>copy con a.txt
Hello World!
^Z
1 個のファイルをコピーしました。
C:\>type a.txt
Hello World!
C:\>
逝ってきます。。。
0121メッセンジャーサービス
NGNG$ smbclient -M YOUR_WINDOWS_CLIENT_NAME
(snip)
Connected. Type your message, ending it with a Control-D
Hello! World
(Ctrl-D)
sent 14 bytes
$
0122sed
NGNG$ sed -r 'a\
Hello! World
'
リターンキーがポイント
0123メッセンジャーサービス
NGNG誰かAppleScriptお願い・・・
0124age
NGNG01258086
NGNGmov dx, msg
int 21h
ret
msg db 'Hello World!$'
0126PL/SQL block
NGNGdbms_output.put_line('Hello World!');
end;
/
0127訂正
NGNG8086 + MS-DOS
0128http
NGNGGET /helloworld.txt HTTP/1.0
以下略
0129秀丸
NGNG0130Tcl/Tk
NGNGHello World
% button .a -text "Hello World" -command {puts "Hello World"}
.a
% pack .a
#好きなだけ押してくれ。
0131login:Penguin
NGNG0132login:Penguin
NGNG01331行野郎
NGNG0134133
NGNGw3m -dump 'http://cocoa.2ch.net/test/read.cgi?bbs=linux&key=986981055' | awk -F\[\"\'\] '{print $2}' | sort | uniq -c | sort -nr | awk 'NR==2{$1="";print}'
0135ドラえもん
NGNG% tmtp doraemon.cat.robo 2173
Connected to tmtp.doraemon.cat.robo in year 2173.
220 tmtp.doraemon.cat.robo Time Machine Server (Version 1.5) Ready.
User (tmtp.doraemon.cat.robo(sewashi)): nobita
Password:
230 Konnichiwa, boku doraemon desu.
tmtp> set lang=en
200 SET command successful.
tmtp> HELO World
200 Hello World!
tmtp>
0136HTML
NGNG<input type=submit value="書き込む" name="submit">
名前:<INPUT TYPE=text NAME=FROM SIZE=19 VALUE=名無しさん@お腹いっぱい。>
E-mail(省略可):<INPUT TYPE=text NAME=mail SIZE=19 VALUE=sage>
<TEXTAREA rows=5 cols=70 wrap=OFF name=MESSAGE value="Hello! World"></TEXTAREA>
<INPUT type=hidden name=bbs value=linux>
</FORM>
0137名無しさん@お腹いっぱい。
NGNG0138C# (Web Service)
NGNG<%@ WebService Language="C#" class="HelloWorld" %>
using System;
using System.Web.Services;
public class HelloWorld {
[WebMethod]
public String HelloService() {
return "Hello World";
}
}
0139あなたも億万長者をめざしませんか?
NGNG0140名無しさん@お腹いっぱい。
NGNG0141汎用機マンセー
NGNG/*MESSAGE HELLO WORLD
//DUMMY EXEC PGM=JDJDUMMY
//
0142名無しさん@お腹いっぱい。
NGNGおまえ●立 汎用機か?
0144Winおばさん厨
NGNGおばさんにはそんなのわかんないよ。
SHなら少しはわかるけど。すうぱぁHだべ?
0145scripter
NGNGecho "Hello World"
0146ドラえもん
NGNG#!/bin/sh
echo "Hello World"
0147login:Penguin
NGNGFCB 'H','E','L','L','O',' ','W','O','R','L','D',00
??のところは覚えなし
0148login:Penguin
NGNGおしい! >>4で既出
■ このスレッドは過去ログ倉庫に格納されています