トップページ⇒linux
634コメント146KB

いろんな言語で「Hello World」だ。ゴラァ

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。NGNG
それじゃ俺が知っている C からだ。
皆も知ってる言語・スクリプトで続けてくれ！


#include <stdio.h>
int main()
{
printf("Hello World\n");
return (0);
}
033533302/02/18 00:29ID:2TCMrTnx
× insert into Hello values ("Hello World");
○ insert into Hello values ('Hello World');

もう一つ間違い･･･鬱
0336CASL202/02/18 00:54ID:pGL9N72U
PROGRAM START
　　　　OUT STR,LEN
　　　　RET
STR 　　DC 'Hello World'
LEN 　　DC 11
　　　　END
0337login:Penguin02/02/18 00:58ID:qtFdtCKH
>>327
PERLの項見た？
while(1)って…涙も止まらねえよ…
0338login:Penguin02/02/18 01:02ID:bmTyVCHj
>>327
G,K,W,Y,Zの項目がねーな
うめなきゃ！
0339login:Penguin02/02/18 01:24ID:qtFdtCKH
>>358
すまん、それらの頭文字の言語、どんなのがある？
Gは(少々苦しいが)Gawkあたりでお茶を濁すとしてもだ、
YやZは辛そうだ。
0340login:Penguin02/02/18 01:26ID:eZJVtozR
>>339
プロフェッショナルC言語(だっけな？)ってお気楽プログラミング本に、
AからZまでかいてあったはず。今手もとにないんだけど、
だれかフォロープリーズ
0341仕様書無しさん02/02/18 01:41ID:FnoFtR7N
#VRML V1.0 ascii

AsciiText {
string "Hello, world !"
justification LEFT
}
0342login:Penguin02/02/18 01:41ID:pGL9N72U
>>339
yacc (無理か)
ZPL
漏れは厨なので、どんな言語かは知らない
0343仕様書無しさん02/02/18 01:41ID:FnoFtR7N
HELLO: PROCEDURE OPTIONS (MAIN);

/* A PROGRAM TO OUTPUT HELLO WORLD */
FLAG = 0;

LOOP: DO WHILE (FLAG = 0);
PUT SKIP DATA('HELLO WORLD!');
END LOOP;

END HELLO;
0344login:Penguin02/02/18 01:42ID:pGL9N72U
Gはguileがあるな
0345login:Penguin02/02/18 05:45ID:LRxUYhjM
import java.io.*;
import 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.102/02/18 17:03ID:j+/v6B5h

(defrule sine
(initial-fact)
=>
(printout t "Hello World" crlf))


このげんごなんだかわかる？








0347login:Penguin02/02/18 22:11ID:TZRZOfTS
>>346
CLIPS? その言語見た事無かったのでちょこっと調べた。
検索したら NASA とか出て来て微妙にビビったよ。
0348login:Penguin02/02/19 15:41ID:Kn+9Dg2U
>>347
ピンポーン。
授業の関係で勉強しています。LISPに少し似ています。

http://www.ghg.net/clips/CLIPS.html
0349login:Penguin02/02/19 15:49ID:Kn+9Dg2U
ガイシュツ？

「こんにちは」と、言え。
おわり。

0350login:Penguin02/02/19 23:02ID:dykjZ8yG
echo "Good bye world" | rm -rf /
0351login:Penguin02/02/20 01:41ID:7yoTfaQH
-- Hello world program for april

program
{
run () {
"Hello world\n" >> stdout;
};

main () {
h = spawn run () as handle%%"run";
waitfor (h);
}
} execute main;
0352login:Penguin02/02/20 01:48ID:7yoTfaQH
dnl hello world program for m4
divert(-1)
changequote([, ])
define([h], [Hello World!])
divert(0)dnl
h
0353login:Penguin02/02/20 01:58ID:7yoTfaQH
(* Hello world program for ocaml *)

let 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 ()
0354n8802/02/20 02:18ID:Qudlp95E
10　print "Hello World!"
0355login:Penguin02/02/20 02:20ID:7yoTfaQH
/* Hello world for yacc */
%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:Penguin02/02/20 12:29ID:x5arlsuF
コンパイルできないのがいくつもあるよ・・・
0357login:Penguin02/02/23 11:09ID:hMtg8TsV
echo Hello World! > con

0358login:Penguin02/03/30 16:50ID:SuvdSrW1
たまにはageるか。
0359login:Penguin02/05/10 21:48ID:MCd92ODc
detukushitaka?
0360login:Penguin02/05/14 00:57ID:aan3BIH4
echo もうだめぽ > /etc/motd
0361maruken02/07/19 16:20ID:M1moR91w
plain TeX

\message{Hello world}
\bye
0362login:Penguin02/11/29 22:35ID:lVN8Qxy2
01 MOJI PIC X(11) 'Hello world'.
DISPLAY MOJI.
0363login:Penguin02/11/30 23:18ID:KQgAWRWV
>>79 ぐらいのヒネリがもっとほしいもんだ…
0364login:Penguin02/12/01 02:42ID:WUceu8gu
>>327
Macro Languagesのemacsが埋まってないのが意外だ。
だれか面白いのが作れたら送ってみるヨロシ。

あと、Motifがある割りにXlibが無いとか。
まぁ、コレはコードが大きくなりすぎるからかな。
0365 ◆mVeUbtZCI. 02/12/08 16:33ID:Mt/zzK5r
#include <stdio.h>

int main(zoid)
{
printf("h3lL0 W0rLd\n");
return 0;
}
0366login:Penguin02/12/08 16:46ID:z1WJginy
std::cerr<<"はい、こんにちわ"<<std::endl;
0367login:Penguin02/12/08 18:49ID:yKnIyaBL
PROC main:
dINIT "Hello World"
dBUTTONS "Hello World", 13
DIALOG
ENDP

何の言語か分かったら
・・・・・・・・・・

0368biosmania ◆ZqBiosoUXU 02/12/08 21:20ID:52Ky2Gm2
mov ah,09
mov dx,offset message
int 21h
message db 'Hello World',0Dh,0Ah,24h

ガイシュツだったらスマソ
0369biosmania ◆ZqBiosoUXU 02/12/08 21:23ID:52Ky2Gm2
>>367
Palmの言語だっけ？
0370login:Penguin02/12/11 00:44ID:XL+Ay2dp
http://www.google.co.jp/search?q=Hello+World
0371login:Penguin02/12/11 06:22ID:lgN/OS8v
val _ = print "Hello, World!\n";
0372login:Penguin02/12/14 11:18ID:mFaiuyOo



「あー、もしもし。
『はろーわーるど』っていうプログラムかいてくれ。
たのんだよ」


0373login:Penguin02/12/15 18:24ID:zapqDAhU
ポケベルで、01134 と打って、
逆さにして読むと hEllO
0374login:Penguin02/12/26 02:38ID:rYxVtj9+
C:\Documents and Settings\hage>HelloWorld
'HelloWorld' は、内部コマンドまたは外部コマンド、
操作可能なプログラムまたはバッチ ファイルとして認識されていません。
0375login:Penguin03/01/08 02:37ID:AoseKHTq
　　　PROGRAM HELWLD
　　　REAL*4 STR(3)
　　　DATA STR/4HHELL,4HO WO,4HRLD /
　　　CALL OFLOW('HELWLD')
　　　WRITE(6,100)
　　　WRITE(6,200) STR
　100 FORMAT(1H+)
　200 FORMAT(1H ,1X,3A4)
　　　STOP
　　　END
0376biosmania ◆ZqBiosoUXU 03/01/08 12:40ID:phGae/92
$ed
a
Hello World
.
1p
0377IP記録実験03/01/08 21:21ID:1aQvEFST
IP記録実験
http://qb.2ch.net/test/read.cgi/accuse/1042013605/

1 名前：ひろゆき ◆3SHRUNYAXA ＠どうやら管理人 ★ 投稿日：03/01/08 17:13 ID:???
そんなわけで、qbサーバでIPの記録実験をはじめましたー。

27 名前：心得をよく読みましょう 投稿日：03/01/08 17:20 ID:yL/kYdMc
SETTING.TXT管轄でないということは全鯖導入を視野に、か？

38 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:22 ID:rLfxQ17l
>>27
鋭いです。

73 名前：ひろゆき ◆3SHRUNYAXA 投稿日：03/01/08 17:27 ID:rLfxQ17l
＞ところで、IPが抜かれて何か今までと変わることってあるのでしょうか？
・今までより、サーバが重くなる。
・裁判所や警察からの照会があった場合にはIPを提出することがある。
0378login:Penguin03/01/09 02:35ID:fO3EDHlc
ひろゆきのﾚｲﾌﾟ予告したらIP晒されちゃうかな？
0379login:Penguin03/01/09 03:19ID:I0ACnG/A
ｼｽｵﾍﾟさんも大変だ
0380login:Penguin03/01/09 04:09ID:mK/aEqnH
2chもそう長くは存続できまい。
ここにくるだけ無駄だってことがわかった。
皆も早くほかのことに興味を持とうな。

では、さようなら
0381山崎渉03/01/15 11:42ID:/OP2L6bf
（＾＾）
0382山崎渉03/03/13 17:32ID:52vAtNh8
（＾＾）
0383login:Penguin03/03/23 00:07ID:D3mf7Rql
The World
0384山崎渉03/04/17 12:16ID:PWISM87M
（＾＾）
0385山崎渉03/04/20 06:06ID:X64WTq1+
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0386　03/05/14 01:17ID:R8NiI9/Q
515言語
http://99-bottles-of-beer.ls-la.net/a.html
0387login:Penguin03/05/19 09:29ID:DT+Qwixv
label .l -text "Hello world"
0388login:Penguin03/05/19 09:29ID:DT+Qwixv
pack .l
0389login:Penguin03/05/19 09:42ID:6by1Z4wB
#include <stdio.h>
void main (void)
{
printf("\aHello World\n");
getchar();
}
音をつけてみました
0390山崎渉03/05/22 01:53ID:VfjbtMwi
━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―
0391login:Penguin03/07/12 01:14ID:W3kT2Ez7
*M
90 ^\ "Hello World"
?. &m("Hello World")
.
*
0392login:Penguin03/07/12 01:18ID:W3kT2Ez7
$ WRITE SYS$OUTPUT "Hello World"
0393山崎 渉03/07/15 11:36ID:2JhhXBQM

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣
0394ぼるじょあ ◆yBEncckFOU 03/08/02 05:22ID:+QUfMouI
　　　 　∧＿∧　 ∧＿∧
ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
　　＝〔~∪￣￣￣∪￣￣〕
　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ
0395login:Penguin03/08/14 22:15ID:mY4Mg9W+
10 PRINT "Hello, World!"
20 GO TO 10
0396login:Penguin03/08/15 12:15ID:v1ALGsj2
GO TO HELL
0397無意味な機能を追加するテスト03/08/15 12:18ID:fF3umBuo
#!/bin/sh
for char in H e l l o . _ W o r l d \!
do
if test ${char} = _
then
echo -n ' '
else
echo -n ${char}
fi
sleep 1s
done
echo ''
exit $?
039839703/08/15 12:22ID:fF3umBuo
行頭の半角スペースは無視されるんだった…
インデントした意味無し。
槍田子嚢(-_-)
0399無意味なぬるぽを追加するテスト ◆FCIHX.z9Sc 03/08/15 19:12ID:xbRxYhwt
#include <stdio.h>

typedef signed char c_t;
c_t hw_tbl[] =
{
　　*"ぬるぽ"/-*"ぬるぽ", 111, 4,　8, -1, 79, 6, -1,55, 7, -1, 43, 5, -1, 57, 1, -1,
　　101, 13, -1, 100, 11,-1, 54, 12, -1, 62, 2, 3, 10, -1, 36, 0, -1, 42, 9, -1, -1
};

int main()
{
　　c_t s = -1, c_i = 0, *tbl_p = hw_tbl, ps[128];
　　while(*tbl_p + *(tbl_p+1) >= *"ぬるぽ" /-* "ぬるぽ" ? *"ぬるぽ" : (tbl_p = "ぬるぽ", NULL))
　　　　ps[*((*tbl_p == -1 ? &(c_i += *(tbl_p +=(s=s-s*2)*s)*s):"ぬるぽ", ("ぬるぽ"? tbl_p:tbl_p = "ぬるぽ"))++)] = c_i;
　　printf("%s", ps);
}

0400山崎 渉03/08/15 22:15ID:dil3w4kp
　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン
0401山崎 渉03/08/15 22:30ID:dil3w4kp
　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン
0402login:Penguin03/08/15 22:34ID:TKrXKPTq
echo Hello World! > /dev/null
0403login:Penguin03/08/16 19:31ID:4XBWpn55
#include <stdio.h>

int main()
{
a: printf("Hello, world.");
goto a;
}
0404login:Penguin03/08/16 20:25ID:bHYJgYaQ
MsgBox("hello world", msgboxstyle.okonly, "hello world")
0405login:Penguin03/08/29 18:57ID:CHKIrubT
$ cat hello,
echo $0 $1
$ sh hello, world
0406login:Penguin03/08/30 00:55ID:kCUalFoc
$ cat Makefile
hello, world:
    : $@
$ make hello, world
0407login:Penguin03/09/09 10:57ID:NvtwqI0H
#include<stdio.h>

main()
{
char str[]={0x48,0x65,0x6c,0x6c,0x6f,0x2c,0x57,0x6f,0x72,0x6c,0x64,0x2e,0x00};

puts(str);
}
0408login:Penguin03/10/14 18:09ID:RQcErSFV
[　書き込む　] 名前： [ login:Penguin　　　 　　　] E-mail (省略可) : [ sage　 　　　　　　　]
+-----------------------------------------------------------------------+
| Hello World　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　|
|　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　　　　　　　　　　　　　　　　　　　　　　　　　　|
|　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　　　　　　　　　　　　　　　　　　　　　　　　　　|
|　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　　　　　　　　　　　　　　　　　　　　　　　　　　|
|　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　 　　　　　　　　　　　　　　　　　　　　　　　　　　|
+-----------------------------------------------------------------------+
0409login:Penguin03/10/14 18:17ID:RQcErSFV
; PC-9801限定 あなたのテキストVRAMちょ〜くげきよ
PUSH CS
POP DS
MOV AX,0A000H
MOV ES,AX
MOV SI,offset MSG
XOR DI,DI
MOV CX,12
REP MOVSB
IRET

MSG DB 'Hello,World.'
0410login:Penguin03/10/14 18:24ID:RQcErSFV
Perlならこういう書き方もできる。

print<<'Z';
Hello,World.
Z
0411login:Penguin03/10/14 18:39ID:RQcErSFV
英語 Hello,World!
中文 ｲ尓好,世界
日本語 (なんて訳すのかわからん)
0412login:Penguin03/10/14 21:01ID:6navAVqt
〜略〜
glTranslatef(0.0f, 0.0f, 0.0f);
glListBase(gIndex);
glCallLists(11, GL_UNSIGNED_BYTE, (GLubyte *)"Hello World");
〜略〜
0413login:Penguin03/10/17 12:40ID:LW8b2pZy
10 CLEAR:CLS:DIM C$(7,5):READ P$
20 FOR H=0 TO 6:READ D0$
30 D1=VAL("&H"+LEFT$(D0$,4)):IF D1<0 THEN D1=65536+D1
40 D1$=RIGHT$(STR$(D1),LEN(STR$(D1))-1)
50 D2=VAL("&H"+RIGHT$(D0$,5)):IF D2<0 THEN D2=65536+D2
60 D2$=RIGHT$(STR$(D2),LEN(STR$(D2))-1)
70 IF LEN(D1$)=4 THEN D1$="0"+D1$
80 IF LEN(D2$)=4 THEN D2$="0"+D2$
90 D$=D1$+D2$
100 FOR I=0 TO 4:E=VAL(MID$(D$,2*I+1,2))
110 FOR J=1 TO 5:F=INT(E/2):G=E-F*2
120 IF G=1 THEN C$(H,I)=C$(H,I)+"■" ELSE C$(H,I)=C$(H,I)+"　"
130 E=F:NEXT J:NEXT I:NEXT H
140 FOR H=1 TO 10:P=VAL(MID$(P$,H,1))
150 IF H<6 THEN X=(H-1)*12:Y=0 ELSE X=(H-1)*12-38:Y=6
160 FOR I=0 TO 4:LOCATE X,Y+I:PRINT C$(P,I):NEXT I:NEXT H:END
170 DATA 0122343526,431502DC5,792502793,03F202793,375B11822,433C02F4E,3B430C54D,3B4311823

0414login:Penguin03/10/17 13:57ID:35jeoD/8
>run
Hello World!
>
0415login:Penguin03/10/17 15:00ID:E2Vu7W9W
10 PRINT"■　 ■　 ■■■　 ■　 　 　 ■　 　 　 ■■■　 　 　 ■　 　 　 ■　 ■■■　 ■■■　 ■　 　 　 ■■　 "
20 PRINT"■　 ■　 ■　 　 　 ■　 　 　 ■　 　 　 ■　 ■　 　 　 ■　 　 　 ■　 ■　 ■　 ■　 ■　 ■　 　 　 ■　 ■"
30 PRINT"■■■　 ■■■　 ■　 　 　 ■　 　 　 ■　 ■　 　 　 ■　 ■　 ■　 ■　 ■　 ■■　 　 ■　 　 　 ■　 ■"
40 PRINT"■　 ■　 ■　 　 　 ■　 　 　 ■　 　 　 ■　 ■　 　 　 ■　 ■　 ■　 ■　 ■　 ■　 ■　 ■　 　 　 ■　 ■"
50 PRINT"■　 ■　 ■■■　 ■■■　 ■■■　 ■■■　 ■　 ■■　 ■■　 ■■■　 ■　 ■　 ■■■　 ■■　 "
0416login:Penguin03/10/19 12:37ID:f8wthzLX
'Hello World' displayAt: Sensor waitButton.
0417login:Penguin03/10/28 21:15ID:F90M6H5l
「HelloWorld」と言う。
0418login:Penguin03/10/30 01:04ID:Wg1fJgBn
CだけどRT-Linuxで。
#include <rtl.h>
int init_module(void)
{
　　rtl_printf("Hello, ");
}
void cleanup_module(void)
{
　　rtl_printf("World");
}
0419湯にバック03/12/03 04:43ID:cnWON4tU
MSG,W Hello World
0420login:Penguin03/12/03 05:01ID:Mmy5MH8S
>>48
>これからもっとも人口の多い言語になるC#です。
ならない。なるのはD言語！


MATLAB( http://www.cybernet.co.jp/matlab/ )だ


> a = 'Hello, world!'
これだけでHello, world!が表示されるのだ。

> disp("Hello, world!")

これだけでもHello, world!が表示されるのだ。
0421login:Penguin03/12/04 11:26ID:EVZi/JaB
mflr r0
lwz r3,@msg
stw r0,8(SP)
stwu SP,-64(SP)
bl .printf
nop
li r3,0
lwz r0,72(SP)
addi SP,SP,64
mtlr r0
blr
0422login:Penguin03/12/09 22:51ID:AWCNSXXS
#!/usr/bin/perl

use strict;

my @Array = ('H','e','l','l','o','w','o','r','l','d');
my $char = undef;
my $count = undef;

for ($count = 0; $count <= $#Array; $count++) {

　print "$Array[$count]";

　if ($count == 4) {
　　print "," . " ";
　}
}

print "!";
print "\n";

exit;
0423login:Penguin03/12/09 23:36ID:0e05UupD
波浪
0424いつでもどこでも名無しさん03/12/10 02:09ID:uQxGThXB
declare @s varchar(255)
set @a = 'HELLO WORLD!'

select @world
0425login:Penguin03/12/10 04:42ID:eOBlgg5L
#include <stdio.h>


int main(){
char hello[]={'G','D','K','K','N','V','N','Q','K','C'};
int i;

for(i=0;hello[i]!=NULL;i++){
printf("%c",++hello[i]);
}
printf("\n");
return 0;
}
042642503/12/10 04:53ID:eOBlgg5L
#!/usr/local/bin/perl -w

use strict;

my $hello="gdkknvnqkc";


$hello=~tr/[a-z]/[b-za]/;

print "$hello\n";

今度はperlで
0427login:Penguin03/12/10 17:04ID:39j8EOXy
$ for i in H e l l o \, w o r l d ; do echo -n $i ; done ; echo
0428login:Penguin03/12/14 13:55ID:O/SpGP/c
>>24

可成りの亀レスだが、なにが「こんにちわ」だっ！！
「こんにちは」だろうが！！この非国民！！


ナァンチャッテ。タハハ。
0429ヨージ ◆LMNMWMiDzc 04/01/07 13:07ID:JuA7yOed
2年半以上前のやつにレスしても
相手はすでに死んでいるかもしれない
0430login:Penguin04/01/10 12:58ID:h/g7Q8f1
#include <stdio.h>
int main()
{
　　char *s;
　　s = "Hello world !";
　　while (*s){
　　　putc(*(s++), stdout);
　　}
}

簡単なことをわざわざ複雑にする椰子w
0431login:Penguin04/01/10 13:01ID:h/g7Q8f1
return文、書き忘れたぞｺﾞﾙｱ
0432login:Penguin04/02/21 11:22ID:JOP3tJky
>431
抜けてるのはreturn文よりむしろ'\n'
0433login:Penguin04/02/24 15:34ID:7IPRaPW6
<? echo "Hello, world\n" ?>
0434login:Penguin04/03/25 22:41ID:WJ4H8B4C
#!/usr/bin/perl
$world="hello";
$world->("Hello World");
sub hello {
printf "%s\n",shift;
}
0435login:Penguin04/03/26 10:13ID:nYlGmunW
>+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]
>++++++++[<++++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]
<.+++.------.--------.[-]>++++++++[<++++>-]<+.[-]++++++++++.
■ このスレッドは過去ログ倉庫に格納されています