تحويل الأرقام إلى حروف بالفرنسية

[بن دهيبة]

السلام عليكم ورحمة اله تعالى وبركاته.

شكرا على الملاحظة

الخطأ موجود في سطرين:

الخطأ الأول:

كود :

1: Millier:=' mille '+ Centaine(i mod 1000);

الصواب:

كود :

1: Million:=' un million '+ millier(i mod 1000000); //Centaine تصحيح

الخطأ الثاني عدم ادراج السطر التالى:

كود :

0: str:='zero';

الوحدة في المرفق مصححة.