मॉड्यूल पाठ (1/2)
कोबोल अंकगणित
COBOL में, गणितीय संचालन या तो समर्पित क्रियाओं (ADD, SUBTRACT, MULTIPLY, DIVIDE) का उपयोग करके या सामान्य और अभिव्यंजक COMPUTE कथन का उपयोग करके किया जा सकता है।
औपचारिक क्रियाओं के साथ अंकगणितीय संक्रियाएँ
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 WS-TOTAL = (WS-PRICE * WS-QUANTITY) - WS-DISCOUNT.खुद कोशिश करना
WS-NUM-A को WS-NUM-B में जोड़ने के लिए ADD क्रिया का उपयोग करके प्रक्रिया प्रभाग के अंदर एक कथन लिखें और परिणाम को WS-RESULT में संग्रहीत करें।
संकेत दिखाएँ
सिंटैक्स का उपयोग करें: WS-नंबर-बी में WS-NUM-A जोड़ें और WS-परिणाम दें।
3 प्रयासों के बाद समाधान उपलब्ध है
सूत्र का उपयोग करके WS-RESULT के मान की गणना करने के लिए COMPUTE कथन का उपयोग करें: दो गुना WS-NUM-A घटा WS-NUM-B।
संकेत दिखाएँ
* और - ऑपरेटरों के आसपास रिक्त स्थान का उपयोग करें: WS-RESULT = (WS-NUM-A * 2) - WS-NUM-B की गणना करें।
3 प्रयासों के बाद समाधान उपलब्ध है