Giriş Yap Kayıt ol Online Üyeler Aktif Konular Arama Üyeler Forum Kuralları
Tahribat.Com | Yardım Basit Bir Pascal Ödevi- Sayfa : 2
Tahribat.Com Forumları
Delphi - Pascal
      Yardım Basit Bir Pascal Ödevi
Bu Bölümde yeni konu açmak için tıklayın Konuyu cevaplamak için tık...
19 Aralik 2011 (Pazartesi) 15:15 tarihinde yazıldı. Kısayol | Alıntı yap | Özel Mesaj
ltcelik


Kayıt : 11 Mayis 2007
YENİGÜN MAALLESİ
Erkek Üye
 

Örnek bir programdan baktım, yaptım.. derlemedim, olsa olsa basit yazım hataları olur..


EPoX Af550G pro /2GB RAM/ winXP Pirated Edişın** özür dileyeni . . . 
27 Aralik 2011 (Sali) 10:18 tarihinde yazıldı. Kısayol | Alıntı yap | Özel Mesaj
microkabus


Kayıt : 9 Aralik 2009
Erkek Üye
 

saol kardeşim yardımların için nasihatlere uyup ve verdiğin örneğe bakarak yazdım programı teşekkürler yardımcı olan ve olmayan arkadaşlara


 
27 Aralik 2011 (Sali) 12:09 tarihinde yazıldı. Kısayol | Alıntı yap | Özel Mesaj
ltcelik


Kayıt : 11 Mayis 2007
YENİGÜN MAALLESİ
Erkek Üye
 

 

Merhaba 

dediğim gibi bascal bilmem, kodu örenk bir programdan bakarak yaptım

öncelikle önemli bir eksiğini farketmiştim kodun fakat sen birşey demeyince

halletmişlerdir deyip konuya yazmadım...

öncellikli eksiklik şu ki tüm katsayıalrın eşit olabileceği durum programda değerlendirilmemiş..

bu durumda

yani a=d AND b=e AND  c=f şartının aynı anda sağlandığı durumda

(aa=0 oalcağından bir sıfıra bölme hatası da ortaya çıkacaktır )

barabollerin çakışık olmasından  söz edilir yani iki parabol her noktada kesişir ve sonsuz çözüm kümesi vardır..

aa=0 olduğunda genel olarak kullandığımız -B+-kök(D)/2A formülü sıfıra bölme hatası üretcektir

aa= 0 olduğunda fark parabolümüz parabol olmaktan çıkacaktır a=d olduğu için

ax^2+bx+c=ax^2+ex+f olacağından

x = -(c-f)/(b-e) programda (cc/bb)

formülü ile tek kök aranmalıdır  bu formul işletilmeden önce yine b-e=0 ise (programda bb)  sıfıra bölme kontrolü yapılıp

(aa=0 AND bb=0 AND cc<>0) koşulu kontrol edilip koşulun sağlandığı durumda  "iki parabol aynı formda( çünkü a ları eşit) aynı eksen üzerinde (çünkü b leri eşit) ve kesişmezler (biri diğerine göre cc kadar y ekseninde ötelenmiştir "

kararı verilmelidir..

 

yani öncelikle aa=0 and bb=0 and cc ise bu paraboller çakışıktır

sonra  aa=0 and bb=0 and cc<> 0 ise bu parboller aynı eksende ötelenmiştir (<> farklı anlamında kullandım)

sonra aa=0 and bb<>0 ise x=  -(cc/bb) de kesişim hesaplanır

 

aa  <> 0 ise normal verdiğim programda verdiğim hesaplama kod çalışır 

 

 

 

 


EPoX Af550G pro /2GB RAM/ winXP Pirated Edişın** özür dileyeni . . . 
27 Aralik 2011 (Sali) 12:45 tarihinde yazıldı. Kısayol | Alıntı yap | Özel Mesaj
SweetyVolty


Kayıt : 12 Temmuz 2008
Erkek Üye
 

KaptanMagaraAdami bunu yazdı:
-----------------------------

Ödev tesliminden tam bir gün önce konu açılır.

Ödevin aslında basit olduğu söylenir.  

Ödevini kendisinin neden yapmadığına dair derse giremedim / yandı bitti kül oldu denir.

Ödevin kendisiyle ilgili her şey karşı taraftan beklenir.

Ödevi yapması gereken kişi ödeve elini sürmez; ödevi nasıl yapması gerektiğine dair gösterilen yolların hiç birini denemez.

Ödevi yapması gereken kişi buraya yorum yazmayı bilir; ama www.google.com kullanmayı aklına bile getirmez.

Ödevi yapması gereken kişinin aslında iş yapmaya g.tü yoktur.

Ödevi yapması gereken kişi kendisine bunlar söylendiğinde kızgınlık dolu ifadeler kullanır.

 

Tatil dönüşü veya teslim tarihi gelenlerin ödevimi yapın konuları gerçekten eğlenceli oluyor.

:)


-----------------------------


Hürriyet olmayan bir memlekette ölüm ve çöküş vardır Her ilerleyişin ve kurtuluşun anası hürriyettir 1906 Bütün ümidim gençliktedir 1919 Adalet gücü bağımsız olmayan bir milletin, devlet halinde varlığı kabul olunamaz 1920 Kılıç ve saban; bu iki fatihten birincisi, ikincisine daima mağlup oldu 1923  

[««] [«]   [1] [2]


Bu Bölümde yeni konu açmak için dıklayın Konuyu cevaplamak için tık...
Allah'a Havale Et Google Bookmark'a Ekle Yahoo'ya Ekle Stumbleupon'a Ekle Facebook'a Ekle Twitter'a Ekle   Google'da Ara : yardım basit bir pascal ödevi Favorilerime Ekle Yukarı Çık
Konuda 15 Mesaj Var.
Konu 686 Sefer Gösterilmiş.
2001-2012 © Tahribat Group - Her Hakkı Saklıdır. - ● Gizlilik İlkeleri ● Kullanım Koşulları ● İletişim