ݤä
꤬ޤ
311ڡ 0:01:12 35894

681014152122262733(311311)äƿƽλ
äʪ­ʤΤ100ܤƤߤ褦ʡ
311ڡ 0:10:00 35895
die neue Frau
ȤƤΤդ
ϡ4ĤˤʤΤоݤˤʤ
Ĥޤꡢǿ2Ĥ⤷Ʊǿ3ˤʤΤߤ
23571113
681014152122262733
33
ϾγڱǤʤʡ 311ڡ 0:10:46 MAIL:jjyhr530@yahoo.co.jp 35896
fumio
ФϡƤơʤĤΤȤǤϤϤϡ˰İ㤨ޤ
񤭽ФǤϤϤϡǤϤޤ轵
311ڡ 0:11:33 35897
tomh
ǿp,qȤơpqp^3ηΤΤǤ͡
ԡ 311ڡ 0:11:43 MAIL:tomh@yahoo.co.jp HomePage:H to M35898

ñʥߥ٤ʤޤ
դ꣱ȤοʳˤϰĤʤΤ
ΰ־ǿȷդƤޤäפᣳƤޤޤorz
ߣȡߣϣϣˤʤǤ͡

ʳˤ⣳äͤ뤳Ȥ򤵤䤫˴äƤޤ
ƻ˿夲Ǥ
ޡ 311ڡ 0:12:15 35899
⤬Ф
6Ȥǿޤ(^^)
뤫ɤ֤ˤǤͤ뤳Ȥˤ褦
311ڡ 0:12:15 35900
ѡ
ǿƱΤ򤫤ƤǤ
27äȤ餷Ǥ͡
311ڡ 0:12:21 35901

夲1ĤOTL
ŷϿ͡ 311ڡ 0:16:27 35902
cyclone
#35899
Ǥ(^^;
311ڡ 0:17:27 35903
С
ĤΤΤ夲ФȤ˲򤤤ǵŤޤ
ʳΤ꤫Ǥ͡
311ڡ 0:17:39 35904
Ȥ
ץǤޤ
6ʸˤΤǰʲ10ܤΤΤޤ

8 2
8 4

10 2
10 5

14 2
14 7

15 3
15 5

21 3
21 7

22 2
22 11

26 2
26 13

27 3
27 9

33 3
33 11
˭ԡ 311ڡ 0:17:49 MAIL:fttnm528@ybb.ne.jp 35905
ߤ
פĤäƤȤǤΤʡ

ĤǤʡ
311ڡ 0:18:07 35906

ࡦ100ܤϤäȤĤʡ
٤ˤΩäƤΤ
311ڡ 0:19:07 35908
ͣ.ǥ
24ϵĤΤǤ39ƨơ֥
ʥƥȤʤ顢ְ㤨ޤޤˤƤ뤫
311ڡ 0:20:16 35909
negl.
ǿp,qˤĤơpq⤷p^3ʤ˺줫ޤˤηˤʤΤ¤٤Ƥߤޤp=2,3ǽʬǤ͡
¿ΰŪˡϤǤ礦
311ڡ 0:32:09 35910
tomh
οŵǤϡǤ: Numbers with 4 divisors.
http://www.research.att.com/~njas/sequences/A030513
Υ
http://www.research.att.com/~njas/sequences/b030513.txt
ˤС100ܤ326Ǥ͡

ԡ 311ڡ 0:40:58 MAIL:tomh@yahoo.co.jp HomePage:H to M35911

ءʥ󥯤äǤ͡Τޤ
ʤܤǤʤޤǤ狼ޤ͡
311ڡ 0:45:40 35912

326Ǥ͡ޤդ
ŷϿ͡ 311ڡ 1:04:31 35913
Ȥ
1000ܤ3646
˭ԡ 311ڡ 1:37:02 MAIL:fttnm528@ybb.ne.jp 35914
⡼ޥ
ƱǤ...
夲ʳˤˡΤ...^^;
2,3,5,7 ...4C2=6
2*2^2,3*3^2,2*11,2*13,3*11,2*17<5*7
ä...6+6=12
5*7,2*17 ...3*1110
󤫿ȴƤޤäƤޤ...^^;
311ڡ 1:53:24 35915
̤ꤹ
ϤꡢΤΥХϡǤ礦
http://www.research.att.com/~njas/sequences/A007422
311ڡ 3:28:44 35916
???
Option Explicit
Sub Macro1()
Sheets("Sheet1").Select
Dim n As Integer
Dim seki As Integer
Dim j As Integer
Cells(1, 1).Value = 0
n = 2
While Cells(1, 1).Value < 10
seki = 1
For j = 2 To n - 1
If n Mod j = 0 Then
seki = seki * j
End If
Next j
If seki = n Then
Cells(1, 1).Value = Cells(1, 1).Value + 1
Cells(Cells(1, 1).Value, 2).Value = n
Range("B" & Cells(1, 1).Value).Select
End If
n = n + 1
Wend
End Sub
311ڡ 9:11:54 35917
abcba@jugglermoka
#35910
ĤȤꡢ2ĤǿѤ⤷ǿ3褬ޤ͡
äƤȤϡnܤοˤǿʬۤĴ٤ʤ̵ʤΤ...
311ڡ 10:36:38 35918
uchinyan
Ϥˤϡơϡ
äȿؤäݤʤäƤޤޤʴDz򤭤ޤ

N Ȥ 1 Ǥ N Ǥʤ¸ߤȤơ A Ȥޤ
ȡB = N/A ⡤1 Ǥ N Ǥʤˤʤޤ
ǡʳˤ C Ȥȡ1 Ǥ N Ǥʤ M ϡ
M >= A * B * C > A * B = N
Ȥʤꡤ()ޤ󡣤ơC ʤС
M = A * B = N
ǡ()ޤ
ǡ() N ϡ1ABN λͤĤˤȤʤޤ
ϡpq ǿȤơ
N = p * q N = p * p * p
ηǤϡǿ򾮤ƤϤĴ٤ȡ
6810141521222627333435
Ȥʤꡤ10 ܤ 33 ˤʤޤ
ͥνȡ 311ڡ 11:01:48 MAIL:uchi@sco.bekkoame.ne.jp 35919
uchinyan
ǼĤɤߤޤɤ鳧ƱˡΤ褦Ǥ

ʤN = pq, p^3p, q ǿȤư̤ˤϤɤʤ뤫Ǥ
ˤŦ⤢褦ˡǿθñǤϤʤΤǡǤ̵ʵޤ
Ūˤϡʹͤ٤˻ꡤǤϤʤǤץȤ󤸤ä᤽Ǥ͡
㤨Сʥ١åǤ

LET n = 10000
FOR i = 1 TO n
LET f = 0
FOR j = 2 TO SQR(i)
IF MOD(i,j) = 0 THEN
LET f = f + 1
LET k = j
IF f = 2 THEN
EXIT FOR
END IF
END IF
NEXT j
IF (f = 1) AND (i > k * k) THEN
LET c = c + 1
PRINT c; i
END IF
NEXT i
END

Ȥ
ͥνȡ 311ڡ 11:58:21 MAIL:uchi@sco.bekkoame.ne.jp 35920
Ȥ
10000ܤ 41037
100000ܤ 460011
1000000ܤ 5111443 ˤʤޤ
˭ԡ 311ڡ 15:12:07 MAIL:fttnm528@ybb.ne.jp 35921
ϥ饮㡼ƥ
ץǤMATHEMATICADivisorsȤޤmatlabmodȤȤפäΤǤ
ĹʤΤǤ٤ƤФƤؿȤޤ
311ڡ 15:59:00 HomePage:ϥ饮㡼ƥ湩35923
uchinyan
#35921
100000ܤޤǤϡ#35920ΥץܦdzǧǤޤ
1000000ܤϡʤʤɤ夫ʤǤ (^^;

ϡĶʤɤäƤơ̵̤ʷ׻򤷤Ƥޤ
#35920ΥץνʬѤǡPCΥѥˤޤȾ餤ǡ
1 ܡ 6
10 ܡ 33
100 ܡ 326
1000 ܡ 3646
10000 ܡ 41037
100000 ܡ 460011
1000000 ܡ 5111443
Ȥʤޤ
#35920Υץ̵̤¿Τǡޤޤɤ;ϤϤޤ
⤦夲μϡBASICܻPC Ǥϡʤ긷Ǥ (^^;

äƤ뤫ɤǧ񤷤Ǥ#35920ΥץβǤǡ
1 ܡ 6
10 ܡ 33
100 ܡ 326
1000 ܡ 3646
10000 ܡ 41037
100000 ܡ 460011
1000000 ܡ 5111443
10000000 ܡ 56173466
Ȥʤޤ
ʾϡץưĶŪ˸ľʤȡ̤ФޤǤ˰ʾ夫ꤽ
ͥνȡ 312ʶ 16:49:27 MAIL:uchi@sco.bekkoame.ne.jp 35924
wowka
ޤꤳ뤳ȤϤʤΤǤϤʤꡰ
ܤʤץȤ鷺Ȥ⤤ޤ
ǤɤΤޤǿӤ뤫ˤäƤϷմǤƤ⡰
311ڡ 19:42:34 35925
ѥ&10ﶥ
#35924
ʬ(javaˤƱȤäƤߤޤ
ǸϺ뽢餻ޤ

1ܡ6
10ܡ33
100ܡ326
1000ܡ3646
10000ܡ41037
100000ܡ4600110.03
1000000ܡ511144310.0
10000000ܡ56173466319.2
100000000ܡ61173679910336.4áʣ֣ʬ
üλ֤PCβɻ֤Ǥ
313ڡ 6:16:55 HomePage:ѥ&10ﶥ35926
uchinyan
#35926
®Ǥ͡
ä顤JavaΥɤ򸫤ĺޤ󤫡
ͥνȡ 313ڡ 9:04:28 MAIL:uchi@sco.bekkoame.ne.jp 35927
Ѥ
ƱǤ夲
٤ƤޤޤߤʤⵤĤƤ
Ҥäա 313ڡ 20:44:19 HomePage:BLOOOOOOOOG35928
ѥ&10ﶥ
#35927

դ˴ŤƵҤޤ

int n,count;count=0;
for(int i=2;i<1000000000;i++){
int s=(int)Math.sqrt(i);
n=0;
for(int j=2;j<(s+1);j++){
if((i%j)==0){
n++;
if(n>1)break;
if((j==s)&&(s*s==i))n=2;
}
}
if(n!=1)continue;
count++;
//System.out.println("count="+count+" ="+i);
if(count==100000){ //target Number
System.out.println("count="+count+" ="+i);
break;
}
}

314 9:26:09 HomePage:ѥ&10ﶥ35929
⤬Ф
4ĤäƤȤʤǤ͡
58 314 11:01:18 HomePage:YoutubeȤǤ35930
ߡ
ɽ줿Ȼפä
314 13:16:50 35931
uchinyan
#35929
ɤ󼨡꤬Ȥޤ

Ѥäȸ#35920ΥץȤޤѤʤ褦ʴΤǡ
ӤΤ˽ʥ١åȤľƤߤ顤ϤꡤۤȤѤޤǤ
#35920Υץβǡǿ˸ꡤ٤褦Ǥ
ȤȤϡ¿ʬưĶʤ㤦ΤǤ礦BASIC ΥޥϡʤΥΡPCʤ

ʤߤˡ#35920ΥץβǤ C ȤľƤߤ顤

1 ܡ 6 0
10 ܡ 33 0
100 ܡ 326 0
1000 ܡ 3646 0
10000 ܡ 41037 0
100000 ܡ 460011 0
1000000 ܡ 5111443 6
10000000 ܡ 56173466 174
100000000 ܡ 611736799 5179 á(126ʬ19)

ȤʤޤϤꡤC ®Ǥ͡
ͥνȡ 314 15:52:38 MAIL:uchi@sco.bekkoame.ne.jp 35932
粬ҹ
夲Ǥ̤ޤʡ
315ʷ 22:30:32 35933