les algorithme d'aproximation

الموضوع في 'لغات البرمجة' بواسطة ziedrg, بتاريخ ‏5 ماي 2008.

  1. ziedrg

    ziedrg عضو

    إنضم إلينا في:
    ‏29 أفريل 2008
    المشاركات:
    65
    الإعجابات المتلقاة:
    5
      05-05-2008 19:28
    :besmellah1:

    :satelite:

    ce programme est un programme d'aproximation

    program zied;
    uses wincrt;
    var
    pas,r1,r:real;

    function recherche(pas,r:real):real;
    var
    r1f,shf,sh:real;
    begin
    r1f:=0;
    r1:=0;
    shf:=0;
    repeat
    r1:=r1+pas;
    sh:=(r*r*3.14)-((r1*r1*3.14)+(r-r1)*(r-r1)*3.14);
    if sh>shf then
    shf:=sh;
    r1f:=r1;
    until r1>r/2;
    recherche:=r1;
    end;
    begin
    writeln('donnez le rayon');
    readln(r);
    readln(pas);
    r1:= recherche(r,pas);
    write('r1= ',r1:5:3,'r2= ',r-r1:5:3);
    end.



    :ahlan:
     
    2 شخص معجب بهذا.
  2. achref_the_boss

    achref_the_boss عضو

    إنضم إلينا في:
    ‏22 مارس 2008
    المشاركات:
    296
    الإعجابات المتلقاة:
    33
      09-05-2008 14:12
    tfaski w tjib 5dimneh fil classe ça
    mdrrrrrrrrrrrrrrrrrr
     
  3. Maher2010

    Maher2010 عضو فعال

    إنضم إلينا في:
    ‏21 فيفري 2006
    المشاركات:
    306
    الإعجابات المتلقاة:
    50
      10-05-2008 01:45
    ce koi le question ??
     
  4. mjdmjd

    mjdmjd عضو نشيط

    إنضم إلينا في:
    ‏17 مارس 2008
    المشاركات:
    173
    الإعجابات المتلقاة:
    33
      10-05-2008 11:45
    un peu plus d'explication ziedrg
     
جاري تحميل الصفحة...
مواضيع مشابهة التاريخ
شرح Transformer les nombres en lettres windev ‏22 مارس 2016
شرح Python - Les fonctions ‏2 سبتمبر 2016

مشاركة هذه الصفحة

جاري تحميل الصفحة...