ماڈیول اسباق (1/2)
COBOL ریاضی
COBOL میں، ریاضی کی کارروائیاں یا تو وقف شدہ فعل (ADD, SUBTRACT, MULTIPLY, DIVIDE) یا عام اور اظہاری بیان کا استعمال کرتے ہوئے انجام دی جاسکتی ہیں۔
رسمی فعل کے ساتھ ریاضی کی کارروائیاں
COBOL ہر بنیادی ریاضی کے عمل کے لیے مخصوص متنی ہدایات فراہم کرتا ہے:
1. اضافہ (ADD)
متغیر میں ایک یا زیادہ قدریں شامل کرتا ہے۔
ADD WS-NUM-A TO WS-NUM-B.
* Equivalent to: WS-NUM-B = WS-NUM-B + WS-NUM-Aاگر آپ اضافے میں ترمیم کیے بغیر نتیجہ کو تیسرے متغیر میں محفوظ کرنا چاہتے ہیں تو GIVING شق استعمال کریں:
ADD WS-NUM-A TO WS-NUM-B GIVING WS-RESULT.2. گھٹاؤ (SUBTRACT)
ایک قدر کو دوسری سے گھٹاتا ہے۔
SUBTRACT 10 FROM WS-BALANCE.
SUBTRACT WS-TAX FROM WS-SUBTOTAL GIVING WS-TOTAL.3. ضرب (MULTIPLY) اور تقسیم (DIVIDE)
ایک ہی انداز میں اقدار کو ضرب اور تقسیم کریں۔
MULTIPLY WS-QTY BY WS-PRICE GIVING WS-TOTAL.
DIVIDE WS-TOTAL BY WS-ITEMS GIVING WS-AVERAGE.COMPUTE کا بیان
پیچیدہ ریاضیاتی تاثرات کے لیے، انفرادی ریاضی کے فعل کا استعمال لمبا اور پڑھنا مشکل ہو سکتا ہے۔ COMPUTE بیان آپ کو معیاری ریاضیاتی آپریٹرز استعمال کرنے کی اجازت دیتا ہے (+, -, *, /, ** جدید سے ملتی جلتی زبانوں کے لئے)۔
COMPUTE WS-TOTAL = (WS-PRICE * WS-QUANTITY) - WS-DISCOUNT.خود ہی آزمائیں۔
WS-NUM-A کو WS-NUM-B کرنے کے لیے ADD فعل کا استعمال کرتے ہوئے پروسیجر ڈویژن کے اندر ایک بیان لکھیں اور نتیجہ WS-RESULT میں محفوظ کریں۔
اشارہ دکھائیں۔
نحو استعمال کریں: WS-NUM-A کو WS-NUM-B میں WS-نتیجہ دیتے ہوئے شامل کریں۔
3 کوششوں کے بعد حل دستیاب ہے۔
فارمولے کو لاگو کرتے ہوئے WS-RESULT کی قدر کا حساب لگانے کے لیے COMPUTE سٹیٹمنٹ کا استعمال کریں: دو بار WS-NUM-A مائنس WS-NUM-B۔
اشارہ دکھائیں۔
* اور - آپریٹرز کے ارد گرد خالی جگہیں استعمال کریں: COMPUTE WS-RESULT = (WS-NUM-A * 2) - WS-NUM-B۔
3 کوششوں کے بعد حل دستیاب ہے۔