いろんな言語で「Hello World」だ。ゴラァ
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん@お腹いっぱい。
NGNG皆も知ってる言語・スクリプトで続けてくれ!
#include <stdio.h>
int main()
{
printf("Hello World\n");
return (0);
}
0261既出ならすんまそん。
01/08/31 06:43ID:200uXQHQ/*オラクルのPL/SQLだ。*/
BEGIN
DBMS_OUTPUT.PUTLINE("Hello World !!");
END;
/
0262各無しさん@Emacs
01/09/01 00:36ID:/qbYDcAI0263各無しさん@Emacs
01/09/02 23:05ID:tNGvVpZM(r (car (gimp-layer-new g 512 128 0 "Hello World" 100 0)))
(w '(#(8 9 30 83 56 71 71 2 79 155 55 85 30 90 28 158)
#(98 94 119 60 84 58 88 140 122 104 103 118 90 62 108 66)
#(136 11 127 144 140 131) #(156 10 150 143 160 129)
#(171 66 170 120 195 137 213 76 177 66 202 89 195 119 178 112)
#(221 -14 226 155 271 70 287 152 343 -29 290 89 276 25 242 108)
#(330 57 310 113 339 133 356 67 330 58 347 81 336 113 324 103)
#(365 35 368 137 379 95 408 64 378 81) #(428 16 397 142 412 128)
#(458 76 422 98 454 115 458 143 478 15 453 105 437 105)
#(495 -20 476 159 472 140 517 -2))) (s (cons-array 32 'double)))
(gimp-image-undo-disable g) (gimp-image-add-layer g r 0) (gimp-edit-fill r 1)
(while (begin (set! c (car w)) (set! l (length c)) (> l 0)) (set! n 0)
(while (< n l) (aset s n (aref c n)) (set! n (+ n 1)))
(gimp-free-select g n s 0 1 1 8) (set! w (cdr w)))
(gimp-edit-fill r 0) (gimp-selection-clear g) (gimp-image-undo-enable g)
(gimp-image-clean-all g) (gimp-display-new g) (gimp-displays-flush)))
(script-fu-register "script-fu-hello-world"
"<Toolbox>/Xtns/Script-Fu/Misc/Hello World" "Beginner's instruction."
"2ch <age>" "2ch" "2001" "")
0264login:Penguin
01/09/03 02:07ID:jDGRRFRMあのことは誰にもいいません。そのかわり、わがままかも
しれませんが、お願いがあるのです。本番中に3回まわって、
「Hello World」
と絶叫していただきたいのです。今月中に実行してください。
ご無理なようでしたら結構です。奥様にすべて打ち明ける
覚悟はしております。
かしこ。
EOF
0265login:Penguin
01/09/03 10:21ID:5UuSjmvg20 Dim X,Y,Z
30
40 Data 1,0,0,0,1,0,1,1,1,1,1,0,1,0,0,0,0,0,1,0,0,0,0
50 Data 0,0,1,1,1,0,0,0,1,0,0,0,1,0,0,1,1,1,0,0,1,1,1
60 Data 1,0,0,1,0,0,0,0,0,1,1,1,1,0
70 Data 1,0,0,0,1,0,1,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0
80 Data 0,1,0,0,0,1,0,0,1,0,0,0,1,0,1,0,0,0,1,0,1,0,0
90 Data 0,1,0,1,0,0,0,0,0,1,0,0,0,1
100 Data 1,1,1,1,1,0,1,1,1,1,1,0,1,0,0,0,0,0,1,0,0,0,0
110 Data 0,1,0,0,0,1,0,0,1,0,1,0,1,0,1,0,0,0,1,0,1,1,1
120 Data 1,0,0,1,0,0,0,0,0,1,0,0,0,1
130 Data 1,0,0,0,1,0,1,0,0,0,0,0,1,0,0,0,0,0,1,0,0,0,0
140 Data 0,1,0,0,0,1,0,0,0,1,0,1,0,0,1,0,0,0,1,0,1,0,0
150 Data 1,0,0,1,0,0,0,0,0,1,0,0,0,1
160 Data 1,0,0,0,1,0,1,1,1,1,1,0,1,1,1,1,1,0,1,1,1,1,1
170 Data 0,0,1,1,1,0,0,0,0,1,0,1,0,0,0,1,1,1,0,0,1,0,0
180 Data 0,1,0,1,1,1,1,1,0,1,1,1,1,0,0
190 FOR Y=1 TO 5
200 FOR X=1 TO 60
210 Read Z
220 PSet(X+100,Y+100),Z
230 NEXT X
240 NEXT Y
かっこ悪いですか?
0266ABAP
NGNGwrite 'Hello, World'.
0267CASLII
NGNGOUT BUF,LEN
BUF DC "Hello World!"
LEN DC 11
RET
END
0268元 TeXnician
NGNGメタフォントでHello, world!
なる図形を表示させる奴書いてくれよ。
それをネタに日本語によるオリジナルなメタフォントの教科書書いてくれよ。
いま、メタフォントはなあ、
「はろーワールドすら書けないろくでなし言語」として蔑まれているんだよ。
それを救うためにはメタフォントでハローワールドしかないんだよ。
0269login:Penguin
01/09/14 12:45ID:kahe/Yro0270login:Penguin
01/09/14 12:47ID:hpMFThis0271デフォルトの名無しさん
01/09/14 12:54ID:RxM/qzygshowpageが抜けとるの
0272login:Penguin
01/09/14 21:38ID:DnAyJxV20273login:Penguin
01/09/23 23:52ID:akzhrDq6今更だが、>>76は"ALL YOUR BASE ARE BELONG TO US."でウケを狙ったのでは
ないだろーか?
ってゆーか、このネタを知っている人は多いのだろうか?
hattenやwasabiよりは少ないような気がする。
0274Smalltalk-72
01/09/24 12:01ID:R4t.M4XYってSmalltalk-80以降も同じか (藁
0275login:Penguin
01/09/30 21:55ID:Ymabq/h.0276いやー
01/09/30 23:44ID:3EetH5nkMS-DOS 1987 Ver1.0
A:\>DATE
09-11-1987 11:32
A:\>ECHO Hello!
Hello!
A:\>run word
→あなたは不正な処理をしました。再起動します。
ゴルァ!(`へ /
0277Oracle
01/10/01 01:17ID:7ZxH9NKcSQL*Plus: Release 9.0.1.0.0 - Production on 月 Oct 1 01:17:47 2001
(c) Copyright 2001 Oracle Corporation. All rights reserved.
Oracle9i Enterprise Edition Release 9.0.1.0.0 - Production
With the Partitioning option
JServer Release 9.0.1.0.0 - Production
に接続されました。
SQL> select 'Hello World' from DUAL ;
'HELLOWORLD
-----------
Hello World
SQL> exit
Oracle9i Enterprise Edition Release 9.0.1.0.0 - Production
With the Partitioning option
JServer Release 9.0.1.0.0 - Productionとの接続が切断されました。
$
0278login:Penguin
01/10/01 01:28ID:GBmwHvVAHi, Mark.
I need the "Hello world" program.
Please send immediately.
.
%exit
0279いやー
01/10/01 01:37ID:iFlw4rCAMSX-BASIC 1989
LOAD "TEST.DAT"
list[RET]
10 CLS
20 LOCATE 10 10
30 PRINT "Hello!"
He...→メインメモリが不足しております。再起動します。
ゴルァ!(`へ /
0280login:Penguin
01/10/01 10:12ID:VCOUIYL2今、一応全部見たつもりなんですがネットワーク系はまだの気が?
0281login:Penguin
01/10/01 12:24ID:XVJTd5fU0282login:Penguin
01/10/01 22:59ID:VCOUIYL20283login:Penguin
01/10/02 03:10ID:Q3YDZ.Ck0284海老塩
01/10/06 00:52ID:Y76.IDOcbyひまわり
簡単で悪かったな。でもこれで出来るんだよ。
日本語だぜ。日本人だもん。
0285NASM
01/10/06 18:41ID:ifhTHbDYglobal _start
msg db 'hello, world', 0x0A
msglen equ $ - msg
_start:
mov ecx, msg
mov edx, msglen
mov eax, 4
mov ebx, 1
int 0x80
mov eax, 1
mov ebx, 0
int 0x80
0286login:Penguin
01/10/08 21:50ID:xEU6d7hs0287login:Penguin
01/10/08 22:54ID:Pb1MUUygfor i=1 to 100
i=i+1
print "Hollow"
next i
stop : end
BASICです。
0288login:Penguin
01/10/27 08:01ID:i+fZmFso0289login:Penguin
01/10/27 10:16ID:xSKauLzEdelay = 50
vga = extended
message = /boot/msg.txt
image = /vmlinuz
root = /dev/hda3
label = plamo
read-only
age:$ cat /boot/msg.txt
Hello! World
age:$
0290login:Penguin
01/10/27 10:19ID:xSKauLzEHollow Werld
ですか?
0291login:Penguin
01/10/27 16:18ID:LklSfNVx0292課長
01/11/04 07:34ID:egcekF+kお前らちゃんとコード書けよ! そのためのネットワークだろが。
ageとくからな。
0293login:Penguin
01/11/05 13:47ID:xmx282/P(insert "Uryyb jbeyq!")
(mule-caesar-region (point-min) (point-max))
(message (buffer-string))
)
0294login:Penguin
01/11/16 05:01ID:L78f4K5Y0295各無しさん@Emacs
01/11/16 05:22ID:lb+o8fJvTBL='Hello World00112233'
TRL='abcdefghijklmnopqrs'
COL=80; SPD=0; OFF=0
RANDOM=$(date +%s)
LEN=$( echo -n "$TBL" | wc -c | sed 's/ //g' )
ROW=$( I=0; while [ $I -lt $COL ]; do
echo -n $TRL; let I+=$LEN; done | cut -b1-$COL )
STATUS=0; while [ $STATUS -eq 0 ]; do
RND=$[$RANDOM&7]
if [ $RND -eq 0 ]; then let SPD-=1
elif [ $RND -eq 7 ]; then let SPD+=1; fi
if [ $SPD -lt -3 ]; then SPD=-3
elif [ $SPD -gt 3 ]; then SPD=3; fi
let OFF+=$SPD
while [ $OFF -lt 0 ]; do let OFF=+$LEN; done
if [ $OFF -gt $LEN ]; then let OFF=$OFF%$LEN; fi
echo -n $ROW | tr $TRL "$(
echo -n "$TBL$TBL" | cut -b$[$OFF+1]-$[$OFF+$LEN])" |
(if [ $SPD -gt 0 ]; then tr 0-$[$SPD-1] '!'
elif [ $SPD -lt 0 ]; then tr $[4+$SPD]-3 '!'
else cat ;fi) | tr 0-3 ' ' || STATUS=1
echo -ne "\r"
done
0296login:Penguin
01/11/16 17:18ID:fWh4bGWW20 moji$="Hello World" '全角で書け
30 for i=1 to klen(moji$)
40 put@(16*i,0),,val("&h"+kanji(kmid$(moji$,i,1)))
50 next
N88-BASICで実行すれば多分表示される...と思う。
put@使うの久しぶりだからなー
0297login:Penguin
01/11/16 23:29ID:1+GjOyGd!!C%!!gR!2"DRo-@S'=o!s$o^2;K!'"H:2elC3CD}a!4Hy2o'n!!!!!!!!!!!!!!!!!!!!!!!!m0G=
!!C%!!gR!2"DRo-@S'=o!s$o^2;K!'"H:2elC3CD}a!4Hy2o'n!!!!!!!!!!!!!!!!!!!!!!!!m0G=
!!C%!!gR!2"DRo-@S'=o!s$o^2;K!'"H:2elC3CD}a!4Hy2o'n!!!!!!!!!!!!!!!!!!!!!!!!m0G=
"C7<Ez+la<0c6(PV:)$o$,!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!![;I\
aC^I\u/l@Lu|=,Psr8{T!d!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!rjn!
c_cAz84M3e1MF=Ac:AnQoM/x_DO+w/HiYar"}^M;iT>QKI[-8OvZGBexre,w{fnNr@{4m'}W{u9LLG
--- hello.txt (8/8) ---
0298login:Penguin
01/11/17 03:39ID:YquQPBDI10 PRN "HELLO WORLD":END
0299login:Penguin
01/11/19 12:43ID:ctHVVaXo#!/bin/sh
echo Hello World!
% tcpserver 0 10000 ./hello &
% telnet localhost 10000
Trying 127.0.0.1...
Connected to localhost.
Escape character is '^]'.
Hello World!
Connection closed by foreign host.
0300login:Penguin
01/11/19 20:07ID:5iJ+kKF00301login:Penguin
01/11/19 20:33ID:Va57rtBm0302な
01/11/19 22:19ID:FPRstUm90303login:Penguin
01/11/19 23:25ID:JFqR1Kqdアンニョンハセヨ、世界。
とかは既出?
0304login:Penguin
01/11/20 20:59ID:WPoPbZ0Oimport stdio;
int main()
{
printf ("Hello, world\n") ;
return 0;
}
詳しくはこちら
http://www.digitalmars.com/d/index.html
参考スレ
http://pc.2ch.net/test/read.cgi/tech/1003674814/
0305K Compiler
01/11/21 01:11ID:b65FJIzg0306REXX
01/11/27 23:57ID:gaJcOLrLsay 'Hello, world'
0307jsp
01/11/28 10:05ID:gAGkcKBAout.println("Hello World");
%>
0308(._.)
01/11/28 13:52ID:lwwLdjVmfor I in H e l l o , W o r l d
do
echo $I
done
0309login:Penguin
01/11/28 18:22ID:eDaFsgCR====================終了====================
0310login:Penguin
01/11/28 19:33ID:BBVjytiGecho -n $l
0311login:Penguin
01/11/28 23:50ID:67Nw4XZo日本語 こんにちは、世界
フランス語 Bonjour Monde
ドイツ語 Guten Tag Welt
イタリア語 Ciao Mondo
ポルトガル語 Oi Mundo
スペイン語 Hola mundo
韓国語 ???? ??
0312311
01/11/28 23:51ID:67Nw4XZo0313(._.)
01/11/29 13:07ID:24qXGkxe縦になるのぅ。
訂正さんくす。
0314login:Penguin
01/12/25 23:32ID:OgTGhrCpanswer "Hello World"
doMenu "Quit HyperCard"
end openStack
on closeStack
doMenu "Compact Stack"
end closeStack
0315login:Penguin
01/12/26 01:08ID:ofP8X4WDとか
dialog --msgbox "Hello World" 20 40
とか
echo "Hello World" |banner -w 40
とかは既出でしょうか?
0316Matlab
02/01/02 20:54ID:y8Rz3rZSdisp('hello world');
0317login:Penguin
02/01/05 01:48ID:DkBsTvKK0318login:Penguin
02/01/14 13:01ID:nsG1/69+0319TeX でプレゼン
02/01/14 21:58ID:WVzuP52R\usepackage[dvipdfm]{color}
\pagestyle{empty}
\special{pdf: pagesize width 8in height 4.6in}
\special{pdf: docview
<<
/ViewerPreferences
<<
/HideToolbar false /HideMenubar false /FitWindow true /CenterWindow true
>>
>>
}
\special{pdf: bgcolor [1.0,1.0,0.0]}%
\begin{center}
Hello,World!
\end{center}
以上をfoobarbaz.tex として保存し、
platex foobarbaz
dvipdfm foobarbaz
して、Acroread で見るだけ。うまくいくかなぁ。
0320login:Penguin
02/01/22 13:03ID:zY6sexL/int main()
{
cout << "Hello World";
}
0321login:Penguin
02/01/22 13:10ID:3TJZdmGT0322login:Penguin
02/01/22 13:16ID:SE2qe6hO/Times-Roman findfont
20 scalefont
serfont
25 800 moveto
(Hello World) show
showpage
0323login:Penguin
02/01/27 15:04ID:NqY9tsrhnet send 相手のIP Hello World
てどうよ?
0324login:Penguin
02/01/27 15:16ID:/sf6+BWm0325あってるっけ?
02/01/27 19:11ID:sdTtdx52INPUT H $ W $;
CARDS;
Hello World
;
PROC PRINT;
RUN;
0326login:Penguin
02/02/03 03:48ID:WoHWeH7susing namespace std;
int main(int argc, char **argv)
{
cout << "ハロー!モーニング。" << endl;
return 0;
}
0327login:Guest
02/02/03 04:23ID:ag4A7Strhttp://www2.latech.edu/~acm/HelloWorld.shtml
分ったか。こんなことで、サーバー重くすんのよせよな。
★★★★★★★★★★★★終了★★★★★★★★★★★
0328login:Penguin
02/02/03 04:29ID:TnaT6RWaなんかすごくえらくなった気分?
0329クワサワ先生
02/02/03 04:40ID:qmGuOBGY/ ̄ l | / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
■■-っ < オーイ、これ貼っといてー。
´∀`/ \http://www.puchiwara.com/hacking/
∋8ノハ8∈@ノノヽ@ヽ \__________
(´�D` ) (‘д‘__) |
∪∪∋∪∈|__ノ|
∪∪ ∪∪
0330login:Penguin
02/02/03 14:31ID:UszX6bbX0331login:Penguin
02/02/03 15:01ID:Q/R4jG2G0332login:Penguin
02/02/18 00:13ID:Dn9ir7dHnkf -j hw.txt | Mail -s hello [email protected]
telnet pop.vinnakinkyrooligt.ne.jp 110
user hogeyarou
pass jorojoro
retr 1
HelloWorld
0333login:Penguin
02/02/18 00:26ID:2TCMrTnxhello varchar2(100)
)
tablespace users
pctused 70 pctfree 20
storage (
init 1M
next 1M
pctincrease 0
)
/
insert into Hello values ("Hello World");
commit;
select * from Hello;
-------------
Hello World
-------------
0334333
02/02/18 00:27ID:2TCMrTnx○ Hello
まちがった・・・
0335333
02/02/18 00:29ID:2TCMrTnx○ insert into Hello values ('Hello World');
もう一つ間違い・・・鬱
0336CASL2
02/02/18 00:54ID:pGL9N72UOUT STR,LEN
RET
STR DC 'Hello World'
LEN DC 11
END
0337login:Penguin
02/02/18 00:58ID:qtFdtCKHPERLの項見た?
while(1)って…涙も止まらねえよ…
0338login:Penguin
02/02/18 01:02ID:bmTyVCHjG,K,W,Y,Zの項目がねーな
うめなきゃ!
0339login:Penguin
02/02/18 01:24ID:qtFdtCKHすまん、それらの頭文字の言語、どんなのがある?
Gは(少々苦しいが)Gawkあたりでお茶を濁すとしてもだ、
YやZは辛そうだ。
0340login:Penguin
02/02/18 01:26ID:eZJVtozRプロフェッショナルC言語(だっけな?)ってお気楽プログラミング本に、
AからZまでかいてあったはず。今手もとにないんだけど、
だれかフォロープリーズ
0341仕様書無しさん
02/02/18 01:41ID:FnoFtR7NAsciiText {
string "Hello, world !"
justification LEFT
}
0342login:Penguin
02/02/18 01:41ID:pGL9N72Uyacc (無理か)
ZPL
漏れは厨なので、どんな言語かは知らない
0343仕様書無しさん
02/02/18 01:41ID:FnoFtR7N/* A PROGRAM TO OUTPUT HELLO WORLD */
FLAG = 0;
LOOP: DO WHILE (FLAG = 0);
PUT SKIP DATA('HELLO WORLD!');
END LOOP;
END HELLO;
0344login:Penguin
02/02/18 01:42ID:pGL9N72U0345login:Penguin
02/02/18 05:45ID:LRxUYhjMimport javax.servlet.*;
import javax.servlet.http.*;
public class HelloWorld extends HttpServlet {
public void doGet(HttpServletRequest request,HttpServletResponse response)
throws IOException,ServletException{
response.setContentType("text/html");
PrintWriter out = response.getWriter();
out.println("<html><body>");
out.println("hello world");
out.println("</body></html>");
}
}
0346名無しさん@emacs21.1
02/02/18 17:03ID:j+/v6B5h(defrule sine
(initial-fact)
=>
(printout t "Hello World" crlf))
このげんごなんだかわかる?
0347login:Penguin
02/02/18 22:11ID:TZRZOfTSCLIPS? その言語見た事無かったのでちょこっと調べた。
検索したら NASA とか出て来て微妙にビビったよ。
0348login:Penguin
02/02/19 15:41ID:Kn+9Dg2Uピンポーン。
授業の関係で勉強しています。LISPに少し似ています。
http://www.ghg.net/clips/CLIPS.html
0349login:Penguin
02/02/19 15:49ID:Kn+9Dg2U「こんにちは」と、言え。
おわり。
0350login:Penguin
02/02/19 23:02ID:dykjZ8yG0351login:Penguin
02/02/20 01:41ID:7yoTfaQHprogram
{
run () {
"Hello world\n" >> stdout;
};
main () {
h = spawn run () as handle%%"run";
waitfor (h);
}
} execute main;
0352login:Penguin
02/02/20 01:48ID:7yoTfaQHdivert(-1)
changequote([, ])
define([h], [Hello World!])
divert(0)dnl
h
0353login:Penguin
02/02/20 01:58ID:7yoTfaQHlet main () =
let rec loop = function
[] -> print_newline()
| x::xs -> print_char (Char.chr x); loop xs
in loop [72; 101; 108; 108; 111; 32; 87; 111; 114; 108; 100; 33]
let _ = Printexc.catch main ()
0354n88
02/02/20 02:18ID:Qudlp95E0355login:Penguin
02/02/20 02:20ID:7yoTfaQH%token HELLO
%%
hello: HELLO
{ printf ("Hello world!\n"); }
%%
int yylex ()
{
static int count = 0;
return count++ ? 0 : HELLO;
}
void yyerror (char* s) {}
int main ()
{
yyparse ();
}
0356login:Penguin
02/02/20 12:29ID:x5arlsuF0357login:Penguin
02/02/23 11:09ID:hMtg8TsV0358login:Penguin
02/03/30 16:50ID:SuvdSrW10359login:Penguin
02/05/10 21:48ID:MCd92ODc0360login:Penguin
02/05/14 00:57ID:aan3BIH4■ このスレッドは過去ログ倉庫に格納されています