Cevapla
 
Konu Araçları
Eski 20-04-04, 10:04 #21
CirkinkraL CirkinkraL çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

ok oyle de guzel olur... Sence 2000 sayıya kadar olan bır dızıde en az kac kere denerse tuttugu sayıyı bulur.
__________________
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 20-04-04, 10:43 #22
haldunuraz haldunuraz çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru


bu şekilde yazarsan sorun çözülür

uses wincrt;
var
f1,f2,n,adet,gecici:integer;
begin
f1:=1;f2:=1;adet:=2;
write('Kaçinci FIBONACCI sayisina kadar yazdirmak istiyorsunuz..=');
readln(n);
write(f1,' ',f2,' ');
repeat
gecici:=f1;
f1:=f2;
f2:=gecici+f2;
write(f2,' ');
adet:=adet+1;
until adet=n;
end.
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 21-04-04, 16:00 #23
frt frt çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru


haldunuraz, teşekkürler sorun kısmen çözülüyor bu kod ile ama sayıları real türü yapıp tüm hanelerini görmek istiyorum ve bu durumda da belli bir yerden sonra toplama yapmayıp son haneleri sıfırla dolduruyor. ayrıca benim son kodumla bunun arasındaki fark neydi acaba, ben çözemedim?

çirkinkral hesaplarıma göre en fazla 15 adımda bulması lazım ama yanlış olabilirim, ayrıca programın tahmin ettiği sayıları hafızasına almasını sağlamam gerek ve bu şimdilik beni aşar gibi görünüyor. önce bunları yapmayı öğreneceğim...
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 21-04-04, 23:12 #24
CirkinkraL CirkinkraL çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

cok oldu ama yaklastin
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 22-04-04, 00:41 #25
frt frt çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

mesela ben 350 tutmuşumdur ve o da ilk 100 tahmin eder. ben yukarı derim bu sefer 100 ile 2000'in tam ortasındaki sayıyı bulup söyler(950) böyle böyle toplam 12 adım falan olur ama hata payı bırakıp 15 demiştim. daha az nasıl olabilir ki?
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 22-04-04, 06:48 #26
haldunuraz haldunuraz çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

son yazdığın koda bakmamıştım
integer kısımını longinteger yapsan sorun çözülür mü yok olmaz dersen
longinteger için virgülden sonraki basak sayısını belirlemeni tavsiye ederim
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 22-04-04, 16:16 #27
frt frt çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

evet kısmen oluyor da, sen de çok şey istiyorsun demeyin ama, mesela ben 35 basamaklı bir sayı hesaplatacağım, hiçbir pascal kodu ya da sürümü böyle bir şeye izin vermez mi?
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 22-04-04, 22:25 #28
CirkinkraL CirkinkraL çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

frt abicim cok iyisin az kaldi algorithmasini cozecen isin. (Binary search oluyor senin yaptigin...)
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 23-04-04, 08:32 #29
haldunuraz haldunuraz çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

Alıntı:
Gerçek Mesajı Gönderen frt
evet kısmen oluyor da, sen de çok şey istiyorsun demeyin ama, mesela ben 35 basamaklı bir sayı hesaplatacağım, hiçbir pascal kodu ya da sürümü böyle bir şeye izin vermez mi?
istersen 1035 haneli yappascal izin verir ama senin önce sayı aralığını tanıtman lazım. eğer bu kadar merak saldıysan bu pascal a sana kitap tavsiye edelim ordan oku.


bu arada extended die tanıt sayı dizini
programın başınada {$N+} koy

extended :10byte yer kaplar memoryde 1.1x10 üzeri4932 ile 3.4x10üzeri-4932 arasındaki sayıları kapsar
işini görür heralde

Mesajı son düzenleyen haldunuraz ( 23-04-04 - 08:40 )
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 23-04-04, 13:35 #30
CirkinkraL CirkinkraL çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

e oda isini gormezse artik kendin string leri carpabilecegin bir program yapmak zorunda kalirsin
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 23-04-04, 22:16 #31
haldunuraz haldunuraz çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

bide benim anlamadığım 35 basamaklı sayıyı naapıcan
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 24-04-04, 18:17 #32
mechanics mechanics çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

frt abicim bu iş böyle yürümeyecek. Ankaradaysan gel sana bi kitap veriyim iyice bi oku, syntax falan hepsini kap ondan sonra yapamadıklarını sor.

Not : Eğer kitabı istersen özelime mesaj at.
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 25-12-04, 14:55 #33
lady lady çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

uses crt;
var
a,b,c,dongu_sayisi,index=integer;
writeln('Kac tane Fibonacci sayisi gormek istiyorsunuz:');
readln(dongu_sayisi);
a=0;
b=1;
index=0;
do
{
index=index+1;
c=a+b;
a=c-a;
b=c;
writeln(c);
}
while(index<dongu_sayisi);
end.

bu programı denemeden şimdi yazdım pascalı neredeyse unutuyormusum kullanımım yanlış olabilir ama ben c++ da bu formülü kullanarak yazmıştım.bi dene istersen...
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 25-12-04, 16:56 #34
kumarbahz kumarbahz çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

fibonacci olayının java kodunu yaptım

public class fib{
public static void main(String[] args){
int n1=0;
int n2=1;
System.out.println(n1);
System.out.println(n2);
for(int i=0;i<30;i++) // i<30 da 30 yerine kac tane sayi gosterceginizi yazın
{
System.out.println(n1+n2);
if(n1<n2)
n1+=n2;
else
n2+=n1;

}
}
}
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Eski 29-11-05, 22:06 #35
uA-ƒaяσ uA-ƒaяσ çevrimdışı
Varsayılan Cvp: pascalla ilgili bir soru

arkadaşlar nasıl duyarsız kalırız pascal a hadi örnekler atalım ne olucak bi tane
atsanız
  Alıntı Yaparak CevaplaAlıntı Yaparak Cevapla
Cevapla

Bu konunun kısa yolunu aşağıdaki sitelere ekleyebilirsiniz

Konu Araçları

Gönderme Kuralları
Yeni konu açamazsınız
Cevap yazamazsınız
Dosya gönderemezsiniz
Mesajlarınızı düzenleyemezsiniz

BB code is Açık
Smiley Açık
[IMG] kodu Açık
HTML kodu Kapalı



Tüm saatler GMT +3. Şuan saat: 19:49
(Türkiye için artık GMT +3 seçilmelidir.)

 
5651 sayılı yasaya göre forumumuzdaki mesajlardan doğabilecek her türlü sorumluluk yazan kullanıcılara aittir. Şikayet Mailimiz. İçerik, Yer Sağlayıcı Bilgilerimiz. Reklam Mailimiz. Gizlilik Politikası. Tatil
Copyright © 2019