A Million of Love, For You

[EHARA Jun-ichi]

We will give you
a million of love,
from many worlds,
in many languages ...

#include <stdio.h>
int main(void)
{
int i;
for (i = 0; i < 1000000; i++)
printf("Love");
return 0;
}

#include <iostream>
int main(void)
{
for (int i = 0; i < 1000000; i++)
std::cout << "Love";
return 0;
}

public class love
{
public static void main (String[] args) {
for (int i = 0; i < 1000000; i++)
System.out.print("Love");
}
}

program Love(input, output);
var i : integer;
begin
for i := 0 to 1000000 do
write('Love');
end.

WRITE(6,1)
1 FORMAT(1000000(4HLove))
STOP
END

#!/usr/bin/perl -w
print "Love" x 1000000;

#!/usr/bin/python
for i in range(1000000):
print 'Love',

#!/usr/bin/ruby
for i in 1..1000000
print "Love"
end

#!/usr/bin/awk -f
BEGIN {
for (i = 0; i < 1000000; i++)
printf("Love");
}

#!/bin/sh
# The next line restarts using wish \
exec tclsh "$0" "$@"
for {set i 0} {$i < 1000000} {incr i} {
puts -nonewline "Love"
}

(dotimes (i 1000000)
(princ 'Love))

10 DEFINT I,J
20 FOR I=0 TO 99
30 FOR J=0 TO 9999
40 PRINT "Love";
50 NEXT J
60 NEXT I
70 END

#!/bin/sh
i=0
while [ $i -lt 1000000 ]; do
echo -n Love
i=`expr $i + 1`
done

--
江原 純一 mailto:j-e...@pop17.odn.ne.jp

[Tomomi Kashiwagi]

"EHARA Jun-ichi" <j-e...@pop17.odn.ne.jp> wrote in message
news:bob36m$19j6$1...@nwall1.odn.ne.jp...

0100 B9 64 00 51 B9 10 27 B4 09 BA 18 01 CD 21 E2 F7
0110 59 E2 F0 B8 00 4C CD 21 4C 6F 76 65 24

--
元鳥取県民 kash...@cup.com

0100 B96400 MOV CX,0064
0103 51 PUSH CX
0104 B91027 MOV CX,2710
0107 B409 MOV AH,09
0109 BA1801 MOV DX,0118
010C CD21 INT 21
010E E2F7 LOOP 0107
0110 59 POP CX
0111 E2F0 LOOP 0103
0113 B8004C MOV AX,4C00
0116 CD21 INT 21
0118 4C6F766524 DB 'Love$'

[TATSUMI Takeo]

Love(N, M, List) :- N>= M | List=[].
Love(N, M, List) :- N<M | List=[Love|Rest], X=N+1, Love(X, M, Rest).
Love(M,List) :- Love(0,1000000,List).

[名称不定]

１６ビット環境で実行するんやったらちょっと嫌やなぁ。（＾＾；；

[EHARA Jun-ichi]

define(`ten', `$1$1$1$1$1$1$1$1$1$1')dnl
define(`thousand', `ten(ten(ten($1)))')dnl
define(`million', `thousand(thousand($1))')dnl
million(love)