شكرا اخي على اعطائي الحل لكني اريده مفصلا في برنامج باسكال لاني لا افهم قليلا الباسكال ارجو ان تعطوني الحل في برنامج باسكال مفصلا