tümü

pascaldan anlayan piçler

  1. 1.
    0
    {$N+}
    uses crt;
    var
    n, m :double;
    x, i:longint;

    begin

    n:=0;
    m:=1;
    writeln(' (',n:10:0,')');
    writeln(' (',m:10:0,')');
    x:=172;
    for i:=0 to x do
    begin
    m:=m+n;
    n:=m-n;
    writeln(' (',m:10:0,')');
    end;
    readln;
    end.

    yukarıdaki örnek programda 171. sayıdan sonrası 1.03362832342818950E+0036 oluyor bunun sebebi nedir? bu arada program fibonacci sayılarını veriyor.
    ···
    #34330356 şikayet
  2. 2.
    0
    up up up up
    ···
    #34330427 şikayet
  3. 3.
    0
    @4 evet panpa 171. ye kadar normal bu arada @3 x ve i nin yazdırılan sayılarla bir ilgisi yok üstelik o x ve i ye real değerler verilmiyor zati..
    ···
    #34330700 şikayet
  4. 4.
    0
    @7 tam olarak
    638817435613190342000000000000000000 ediyor amın oğlu..
    ···
    #34330819 şikayet
  5. 5.
    0
    sonucun öyle çıkmaması için yapabileceğim bir şey yok mu??
    ···
    #34330895 şikayet
  6. 6.
    0
    @14 168. de veriyor onu çünkü dizi 0-1-1 diye başlıyor sanırım sen direk 1 den başlattın
    ···
    #34330944 şikayet
  7. 7.
    0
    @17 anlama kıtlığın mı var amık diziyi 0 dan başlattım 0-0-1 diye sen direk 1-2-3 diye başlatmışsın
    ···
    #34331086 şikayet
  8. 8.
    0
    @23 deniyorum panpa..
    ···
    #34331706 şikayet
  9. 9.
    0
    @20 eminim 199 dan başlayarak geri geri de yazarsın bunları 5 dakika içinde ?
    ···
    #34331797 şikayet