منتدى الرياضيــات كل من اختار سلك الرياضيات هنا تجد مبتغاك

 
Prev المشاركة السابقة   المشاركة التالية Next
قديم 07-04-2012, 08:28 PM
  #1
SanCheZ
 
La spécialité: Informatique
جامعة 20 أوت 1955 سكيكدة
تاريخ التسجيل: 02-04-2012
المشاركات: 6
SanCheZ عضو يستحق التميز
افتراضي Tp 2 de Calcul formal (Caml)


السلام عليكم ورحمة الله
اقدم لكم الحصة الثانية من الاعمال التطبيقية للبرنامج ال caml مع الحل :

Les function : Ecrire en langage CAML les fonctions suivantes :
- succ qui calcule le successeur d’un entier.
- pred qui calcule le prédécesseur d’un entier.
- sum qui calcule la somme de 2 entiers.
- max qui calcule le maximum de 2 réels.
- max3 qui calcule le maximum de 3 réels de 2 façons différentes (Sans utiliser Max, puis en utilisant Max).
- minmax qui donne le min et le max en même temps de 2 entiers.
- carre qui calcule le carre d’un entier. utilise cette fonction pour calcule cube.
- scarre qui calcule la somme des carrés de 2 entiers (en utilisant la fonction Carre).
- valabs qui calcule la valeur absolue d’un entier.
- abs qui calcule la fonction : Abs ( x, y ) = | x – y | .
- surf qui calcule la suface d’un cercle de rayon r ( ∏ = 3.14).
- pair qui retourne vrai si son argument est un entier est pair, faux sinon.


الحل :
كود:
# let succ(x)=x+1;;
# let pred(x)=x-1;;
# let sum(x,y)=x+y;;
# let max(x,y)=if x<y then y else x;;
#let max1(x,y,z)=if x<y then if x<z then z else y else if x>z then x else z;;
#let max2(x,y,z)=if max(x,y)<z then z else max(x,y);;
#let minmax(x,y)=if x<y then "min=",x," max=",y else "min=",y," max=",x;;
# let carre(x)=x*x;; # let cube(x)=carre(x)*x;;
let scarre(x,y)=carre(x)+carre(y);;
# let valabs(x)=if x<0 then -x else x;;
# let abs(x,y)=if (x-y)>0 then x-y else -(x-y);;
# let surf(x)=x*.(3.14);;
# let paire(x)= x mod 2 = 0;;







ادعو لنا بالنجاح
بالتوفيق


SanCheZ غير متواجد حالياً  
رد مع اقتباس
 

الكلمات الدلالية (Tags)
calcul, caml, cormal

أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
Caml Light HMFouad الإعــلام الآلي والرياضيــات 2 05-10-2010 04:55 PM
Formal and Informal letters islam450 English language 0 22-11-2009 11:12 PM
نبذة عن caml lucky girl الإعــلام الآلي والرياضيــات 4 10-11-2009 09:36 PM
langage CAML lucky girl الإعــلام الآلي والرياضيــات 6 06-05-2009 10:55 PM


الساعة الآن 03:01 PM.