معادله درجه دوم عدد اول و...

[aleas]

سلام خسته نباشید واقعا من خودم خیلی گشتم ولی به جوابم نرسیدم وهر چی دیدم ناقص بودن
من سه تا سورس میخوام خواهشا" هر کسی که میتونه کمکم کنه
1-یه سورس میخوام که یه عدد بگیره بگه عدد اول هسته یا نه؟ که خیلی گشتم و خیلی تلاش کردم ولی به جواب نرسیدم و هرچی که دیدم جواب قطعی نبود ناقص بودن
2-یه سورس که یه معادله درجه دوم گرفته و ریشه های آنها را برگردونه و از ساختار felect case استفاده بشه ؟
3-یه سورس که x و y بگیره و در عبارت زیر که عکس گرفتم جایگزین کنه و جواب بدست بیاره؟
خواهشا" هر کسی میتونه کوتاهی نکنه

[aleas]

بابا حداقل یکی سورس شماره دو رو بده
2-یه سورس که یه معادله درجه دوم گرفته و ریشه های آنها را برگردونه و از ساختار felect case استفاده بشه ؟
؟

[salehjg]

1)
یه زمانی با vb6 الگوریتم غربال رو نوشته بودم.
بگردم ببینم کجاست.
پیداش کردم سورس رو میزارم.

با الگوریتم غربال می توانید ببینید که عدد اول هستش یا نه.
البته شاید راه های بهتری هم باشه!!
------------------------------------------
2) سخت نیست. فقط بستگی به این داره که میخواهید جواب نهایی رادیکالی باشه یا اعشاری؟!
------------------------------------------
3) من اینو نوشتم:

کد:

#include "stdafx.h"
#include <math.h>
int _tmain(int argc, _TCHAR* argv[])
{

int x,y,n,A_n,facto;

double val,sum= 0.0f;

x=1;

y=5;

// 1,3,5,7,9,11,...

// A_n = A0 + (n-1)*d

// A_n = 1 + (n-1)*2

// = 2n-1 = y => n=0.5(1+y)


n = (1+y)/2;


for(int i = 1 ; i<=n;i++)

{


A_n = 2*i-1;


facto = 1;


for(int j = 2; j<=A_n;j++)


{



facto = j*facto;


}


val = (::powl(x,i)/(facto));



sum+=val;

}



return 0;
}

_________________________________
ویرایش:

ای بابا..... الان دیدم این تاپیک توی بخش ویژاول بیسیکه.
اگر با کد های بالا مشکلی بود بگید سعی میکنم برای vb تغییرش بدم.

[aleas]

ای بابا..... الان دیدم این تاپیک توی بخش ویژاول بیسیکه.
اگر با کد های بالا مشکلی بود بگید سعی میکنم برای vb تغییرش بدم.

منم الان نگاه کردم دیدم بابا رفته تو باغچه!چی میچینه آلوچه
جواب یک وسه رو خودم تا حدودی فهمیدم فقط اگر میتونی جواب دو رو بده vb6