Wert yle diosunda abi demek istediğim şuydu benim, Bu adam zaten kkleri bulmak istese benim altta dediğim yntemden sıfıra hata payından düşük olan kkleri alır ama elde edeceği işte sonunda şyle birşey olur (x+0,222325) (2x- 5,223115) (9x+8954,5555555) Bende diyorum ki integerları denerse (x-1)(x+8,33333222)(2x-444,888888) gibi daha düzenli en azından varsa daha düzenli çıkaracak bir algoritma olur. Tabi en alttaki yazdığın korkunç şey çalışıyorsa problem yok onu kullansın :) http://yigitdemirag.com

skm bu dersi 1. sınıfta kamıştım :|

dediğim gibi müdür ben hiç anlamıyorum bu dilden anlasam geçerdim.. x^1 xe eşit zaten ve 3. derecede +d diye bir sayı olmalı. formül ile çzüm yaptırabilirsin 3. dereceden 2. dereceye dnüşümler var ancak yazarken o mantığı otutturmak sıkıntı işte

birde aşkamcılar grsün ana sayfada Bu site bağımlılık yapıyor şimdi fark ettim tarih 1 haziran 2011 saat 00:02

wert in denklemlerini denedim... bulunan sonuçları matlab çzümüyle karşılaştırdım sonuçlar aynı... düzenleme: aslında csr288 nin tam olarak ne istediğini anlamadım... iterasyon mu yoksa tam çzümmü? valar morghulis...

ilerde bir işede yaramaz çalışdığına değmez kopyayla geçsin ;) edit:2. dereceden buldum ama 3. dereceden yok be dostum anlasam yapardım ama ben kopya çektimkız anlıyosa az çok bunu editlesin 3. dereceye gre mantık aynıdır zaten Kod: ! ! Solve Ax^2 + Bx + C = 0 given B B-4 A C >= 0! Now, we are able to detect complex roots and! repeated roots. ! PROGRAM QuadraticEquation IMPLICIT NONE REAL :: a, b, c REAL :: d REAL :: root1, root2! read in the coefficients a, b and c READ a, b, c WRITE 'a = ', a WRITE 'b = ', b WRITE 'c = ', c WRITE ! compute the discriminant d d = b b - 4.0 a c IF (d > 0.0) THEN! distinct roots? d = SQRT root1 = /(2.0 a) ! first root root2 = /(2.0 a) ! second root WRITE 'Roots are ', root1, ' and ', root2 ELSE IF (d 0.0) THEN! repeated roots? WRITE 'The repeated root is ', -b/(2.0 a) ELSE! complex roots WRITE 'There is no real roots!' WRITE 'Discriminant = ', d END IF END IF END PROGRAM QuadraticEquation

ikinci dereceden kkleri bulan verdiğin kodlarla 3. dereceden'in hiçbir alakası yok. 3. dereceden denklemler zaten formülle çzülebilse, bu kadar uğraştırıcı olmazdı :) 3. dereceden nasıl çzdürürsün? bir sınır verirsin programa for i 1den 100'e kadar i'yi yerine koysun, denklem misal x^3+x^2+x^1=0 mı? i'yi koydugunda, sıfıra çok yakın bişey çıkıyorsa kabul edersin çzümü if sonuç<0.00001 gibi misal. hata payını kendin düşünceksin

hocam matlab yada microsoft matematik 4.0 var onlara baksana belki yardımcı olurdüzeltme:algoritma yazmıssın pardon

Demek istediğin problem denklemin x^3+2 x^2-x-2 olsun. Deneme yanılmayla 3 kkü bulunabilcek bir denklem var sayalım ilk kkünü buldun (x-1) bu noktada yapman gereken ilk denklemini x-1 e bldürmek olucak. Ondan sonra yapacağın arkadaşın verdiği diskriminant yntemi. Yani 3 bilinmeyenli denklemi al i değerini -100 + 100 aralığında integer ile sonuç 0 çıkıyor mu bak. Arkadaşın dediğinin aksine tam 0 çıkıyor mu diye bak tam blüm arıyoruz çünkü integer alırsan float lardaki gibi 0,000001 hata payı uğraşmazsın zaten. Eğer 0 çıktıysa -> i değerini root 1 e eşitle yada yazdır direk 1 kk olarak sen bilirsin. Asıl problem buradan sonra iki bilinmeyenli denklemi elde etmede, O da (ax^3 +bx^2 +cx +d )yi e blebilmek ve benim aklıma şuan hiçbirşey gelmedi bununla ilgili o yüzden edit için şurayı aldım buradan elde ettiğim ux^2+üx+ç yi de arkadaşın verdiği programla kklerine ayırıyorsun. Bylece daha düzenli bir (x-3)(x-0,423212)(2x+ 32,222) gibi yazdırabiliyorsun. Lakin i yi - long intten + long inte artık sınır rakamı bilmiyorum. Yaparsın i++ yapıp arttırarak deneyip 0 a yakın olanları yazdırırsın daha abzürd çıkar ama çıkar ennayetinde.. http://yigitdemirag.com

tam çzüm aramktaym :) Bu site bağımlılık yapıyor şimdi fark ettim tarih 1 haziran 2011 saat 00:02

üstadım ben geçtm de sevglm mat okuyo fen edb de onlara harbıden bzden agır gosterıyolarmııs Bu site bağımlılık yapıyor şimdi fark ettim tarih 1 haziran 2011 saat 00:02

arkadaslar konu başlıgı gayet acık yardımlarınızı beklemekteym :)) Bu site bağımlılık yapıyor şimdi fark ettim tarih 1 haziran 2011 saat 00:02

hPayi = 0.0001; for i -1000000000 den +1000000000 e kadar i++ //(Yazacağın 1000000000 olacak die bişi yok) if (( ai^3 +bi^2+ ci + d ) <= hPayi $$ ( ai^3 +bi^2+ ci + d ) >= -1 hPayi ) root1 = i; bu demek istediğin sanırım psycode da yazdım hemen.. FORTRAN a çevirirsin diye abi http://yigitdemirag.com

evet hata payı veriyo 0.1000 gibi ama bunuı nasıl algoritmaya dkücemi bulamadım yarılama yntemi alt program felan çzülüyomuş ama yok yani Bu site bağımlılık yapıyor şimdi fark ettim tarih 1 haziran 2011 saat 00:02

bu çalışma performansını serbes piyasada yapsanız varya kafadan 1500 tl +sigorta+yemek+yol bilmem ne kazanırsınız :D bu ne lan. ne işe yarıyo bunlar. mantık bunun neresinde Kayalardan kayarım yoktur benim ayarım (;

: Demek istediğin problem denklemin x^3+2 x^2-x-2 olsun. Deneme yanılmayla 3 kkü bulunabilcek bir denklem var sayalım ilk kkünü buldun (x-1) bu noktada yapman gereken ilk denklemini x-1 e bldürmek olucak. Ondan sonra yapacağın arkadaşın verdiği diskriminant yntemi. Yani 3 bilinmeyenli denklemi al i değerini -100 + 100 aralığında integer ile sonuç 0 çıkıyor mu bak. Arkadaşın dediğinin aksine tam 0 çıkıyor mu diye bak tam blüm arıyoruz çünkü integer alırsan float lardaki gibi 0,000001 hata payı uğraşmazsın zaten. Eğer 0 çıktıysa -> i değerini root 1 e eşitle yada yazdır direk 1 kk olarak sen bilirsin. Asıl problem buradan sonra iki bilinmeyenli denklemi elde etmede, O da (ax^3 +bx^2 +cx +d )yi e blebilmek ve benim aklıma şuan hiçbirşey gelmedi bununla ilgili o yüzden edit için şurayı aldım buradan elde ettiğim ux^2+üx+ç yi de arkadaşın verdiği programla kklerine ayırıyorsun. Bylece daha düzenli bir (x-3)(x-0,423212)(2x+ 32,222) gibi yazdırabiliyorsun. Lakin i yi - long intten + long inte artık sınır rakamı bilmiyorum. Yaparsın i++ yapıp arttırarak deneyip 0 a yakın olanları yazdırırsın daha abzürd çıkar ama çıkar ennayetinde.. iyide olaya illede ss manrığı ile bakmamak lazım kkler tam sayı olacak diye bir kaide yok wikipedia da byle bişi var ama :D bunları yazma uğraşma diyede byle bişiler buldum ama :D x1 = -b/(3 a) - (2^(1/3) (-b^2 + 3 a c))/(3 a (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)) + (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)/(3 2^(1/3) a) x2 = -b/(3 a) + ((1 + i Sqrt ) (-b^2 + 3 a c))/(3 2^(2/3) a (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)) - (1 - i Sqrt ) (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)/(6 2^(1/3) a)x3 = -b/(3 a) + ((1 - i Sqrt ) (-b^2 + 3 a c))/(3 2^(2/3) a (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)) - (1 + i Sqrt ) (-2 b^3 + 9 a b c - 27 a^2 d + Sqrt )^(1/3)/(6 2^(1/3) a) |sadece aptalların başarısı ders notu ile lçülür|