[ ホームページ ] [ 携帯用URL ]
月影〜掲示板〜

[ EZBBS.NET | DoChat.NET | 新規作成 | ランキング | オプション ]
iモード&Vodafone(絵文字)、au対応!ケータイからも返信できる無料掲示板!
名前
 E-mail 
題名
内容
投稿KEY    タグ有効 改行有効 等幅フォント
URL



1878.なんとなく 返信  引用 
名前:真殿勇助    日付:2006/03/25(土) 01:30
懐かしさに書き込みしてみたり。このHN使うのも本当に久しぶりだ…。またあのころみたく、カラオケとかボーリングで盛り上がりたいなぁ!!



1879.Re: なんとなく
名前:真殿勇助    日付:2006/03/25(土) 01:31
と、密かに思っていることを解放してみたり。


1880.Re: なんとなく
名前:レイラ    日付:2006/04/24(月) 11:36
管理人自体、見るのが久しぶりだったり(笑)

みんなでカラオケ&ボーリングいいねぇ!!
また集まりたいわぁw

1876.19000人目ゲッッット♪ 返信  引用 
名前:みあ    日付:2006/01/20(金) 17:24
久ッびさのキリ番ですv(^^)



1877.Re: 19000人目ゲッッット♪
名前:レイラ    日付:2006/01/24(火) 00:32
ありがとーw
こっち書き込んでくれる人がいたとはww
みあちゃんめっちゃひさしぶりやん♪

1875.いやはや・・・ 返信  引用 
名前:レイラ    日付:2006/01/17(火) 00:28
私事にBBS使ってしまいました(笑)
いずれ消すと思います・・。
mixiの所為で(?)、こっちのカキコ&足跡は少ないですねー・・・
うれしいような悲しいような??
どんどん書き込んでくださいねっ

1874.(untitled) 返信  引用 
名前:管理人のメモ    日付:2005/12/22(木) 14:47
/*()*/
T_b=T_a-fabs(-7.83*RHO*Z/(A*T_a)*log(174*T_a/Z))*s_n;

/*()*/
theta_a=theta_b;
phi_a=phi_b;
T_a=T_b;
R_a=R_b;

/*()*/
if(R_a.k>D){
N_t++;
break;
}
else if(R_a.k<0){
N_b++;
break;
}
else if(T_a<0.5){
N_ab++;
break;
}
if((i+1)%5==0){
printf("%f %f %f\n",R_a.i,R_a.j,R_a.k);
}

}

printf("\n");

}

/*()*/
printf("\n %f \n%f \n%f\n",(double)N_t/E_NUMBER,(double)N_b/E_NUMBER,(double)N_ab/E_NUMBER);

return 0;


}

1873.(untitled) 返信  引用 
名前:管理人のメモ    日付:2005/12/22(木) 14:45
/**/
typedef struct{
double i;
double j;
double k;
}
R_n;
R_n R_a;
R_n R_b; /*R_aR_b*/

/**/
printf("()(keV)");
scanf("%d",&ENE);

printf("()");
scanf("%d",&Z);

printf("()");
scanf("%lf",&A);

printf("()(g/cm^3)");
scanf("%lf",&RHO);



/*()*/
/*()*/
srand((unsigned)time(NULL));

for(i=0;i<E_NUMBER;i++){
/**/
theta_a=THETA;
phi=0;
phi_a=0;
R_a.i=0.0;
R_a.j=0.0;
R_a.k=0.0;
T_a=ENE;

/**/
while(1){

/**/
BETA=(0.05389500937*pow(Z,0.666666666666))/(pow(PI,2)*T_a);

/* */
R_theta=(double)rand()/RAND_MAX;
R_phi=(double)rand()/RAND_MAX;
R_s=(double)rand()/RAND_MAX;

/*()*/
cos_t=1-2*BETA*R_theta/(1+BETA-R_theta);
sin_t=sqrt(1-cos_t*cos_t);
phi=2*PI*R_phi;

/*()*/
theta_b=acos(cos(theta_a)*cos_t+sin(theta_a)*sin_t*cos(phi));
BUNBO=cos_t-cos(theta_b)*cos(theta_a);

/*0*/
if(BUNBO==0.0)
{BUNBO=0.0000000000000000000000000001;
}
phi_b=atan(sin(theta_a)*sin_t*sin(phi)/BUNBO)+phi_a;
s_n=-1.02*BETA*(BETA+1)*A*T_a*T_a*log(R_s)/(Z*(Z+1)*RHO);


/*()*/
R_b.i=R_a.i+s_n*sin(theta_b)*cos(phi_b);
R_b.j=R_a.j+s_n*sin(theta_b)*sin(phi_b);
R_b.k=R_a.k+s_n*cos(theta_b);

1872.(untitled) 返信  引用 
名前:管理人のメモ    日付:2005/12/22(木) 14:45
#include<stdio.h>
#include<stdlib.h>
#include<math.h>
#include<time.h>

/**/
#define PI 3.14159265
#define D 1
#define E_NUMBER 100
#define THETA 0


int main(void)
{
/**/
int i;
int ENE;
int Z;
double A;
double RHO;

int N_t=0;
int N_b=0;
int N_ab=0;

double BUNBO;
double BETA;
double theta_a;
double theta_b;
double phi;
double phi_a;
double phi_b;
double T_a;
double T_b;

double R_theta;
double R_phi;
double R_s;

double cos_t;
double sin_t;
double s_n;

1860.ごぶさた 返信  引用 
名前:かほり    日付:2005/10/09(日) 13:42
ものすさまじくごぶさたのかほりです。これで誰かわかってもらえんかったら凹むな(笑)
みんな楽しそうやなあ。わしももうすぐやっとマイパソを買おうと思ってるので、そしたらもっと顔出しますんでよろしう



1861.Re: ごぶさた
名前:麗羅    日付:2005/10/11(火) 01:13
うわーめっちゃ久しぶりやぁっ!
二年ぶりくらいじゃない??全然会わないし・・・
うんうん、どんどん来てどんどん書き込んでくださいまし☆
また会いたいねー(^_^)


1870.Re: ごぶさた
名前:かほり    日付:2005/10/25(火) 21:52
買った!!パソコン!!
借金地獄っす(笑)


1871.Re: ごぶさた
名前:麗羅    日付:2005/10/26(水) 00:51
おめでたふ☆
私は・・・ようやく今日、ド貧乏からぬけだした(笑)


ページ: 1 2 3 4 5 6 7 8 9 

無料アクセス解析

アクセス解析の決定版!無料レンタルで最大100ページ解析!

   投稿KEY
   パスワード

EZBBS.NET produced by InsideWeb