09/08/10 19:49:07 jfWI8eyR0
6 仕様書無しさん :2008/02/26(火) 21:36:51
懐かしいな。俺もMZ-80-K2Eで円周率を無限に求めるプログラムを開発して、
小学校時代の友達を驚かせたことがある。
10 PRINT "3. 1 4 1 5 9 2 6 5";
20 A=INT(RND(1)*10)
30 PRINT A;
40 GOTO 20
09/08/10 19:49:07 jfWI8eyR0
6 仕様書無しさん :2008/02/26(火) 21:36:51
懐かしいな。俺もMZ-80-K2Eで円周率を無限に求めるプログラムを開発して、
小学校時代の友達を驚かせたことがある。
10 PRINT "3. 1 4 1 5 9 2 6 5";
20 A=INT(RND(1)*10)
30 PRINT A;
40 GOTO 20