[مخالف - طلب حل : ]سؤال في لغة البرولوج

اتمنى احد يساعدني لان البرنااامج مهم ولازم اسلمه السبت بلييييز

السلام عليكم ..

1. أعرف ردي جدا متأخر ..
2. الكود الصحيح :

   calculations :- write('Calculations'),nl,nl, write('----Select the type of calculation----'),nl,write('Enter 1 for addition '),nl,
   write('Enter 2 for subtraction'),nl,
   write('Enter 3 for multiplication'),nl,
   write('Enter 4 for division '),nl,
   read(Calculation),nl,
   write('Enter First Input '),
   read(X),
   write('Enter Second Input '),nl,
   read(Y),
   process(Calculation,X,Y).
   
   
   process(Calculation,X,Y) :- Calculation==1 , write(X),write('+'),write(Y),write('='), Z is X+Y , write(Z) , nl ;
   Calculation==2 , write(X),write('-'),write(Y),write('='),A is  X-Y, write(A) , nl ;
   Calculation==3 , write(X),write('*'),write(Y),write('='), B is X*Y, write(B), nl ;
   Calculation==4 , write(X),write('/'),write(Y),write('='), C is X/Y,write(C), nl.

الأخ الكريم/الأخت الكريمة

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

مرحباً بكم في منتدى الفريق العربي للبرمجة

تأسف إدارة المنتدى لغلق الموضوع وذلك لمخالفته قوانين المشاركات، فقرة طلب حل الواجبات والتمارين.

قواعد طرح المشاركات

/index.php?showtopic=29343

شاكرين لكم حُسن تعاونكم