بعضی اوقات نیاز داریم اجرای یک یا چند دستور را منوط به برقراری شرط مشخصی نماییم در این مواقع حکم IF-THEN مورد استفاده قرارمی گیرد.
در اینجا قصد داریم برنامه ای برای محاسبه حقوق بنوسیم. برنامه مبلغ دستمزد روزانه ، تعداد روز کارکرد و سقف معافیت مالیات را از کاربر دریافت می کند سپس حقوق ناخالص، کسورات بیمه و مالیات و نهایتا حقوق خالص را محاسبه کرده ، نمایش می دهد.
10 INPUT "ENTER DAILY WAGE"; WAGE
20 INPUT "ENTER TOTAL DAYS" ; DAYS
30 INPUT "ENTER TAX EXEMPTION"; EXEMPT
40 IMPURE = WAGE * DAYS
50 INSURANCE = IMPURE * 0.07
60 TAX = 0
70 IF IMPURE > EXEMPT THEN TAX = (IMPURE - EXEMPT) * 0.1
80 SALARY = IMPURE - INSURANCE - TAX
90 PRINT
100 PRINT "IMPURE SALARY ="; IMPURE
110 PRINT "INSURANCE ="; INSURANCE
120 PRINT "TAX ="; TAX
130 PRINT "SALARY ="; SALARY
همانطور که می دانید حقوق تا سقف مشخصی از مالیات معاف می باشد. به عنوان مثال در سال 94 حقوق کمتر از مبلغ 1150000 تومان معاف از مالیات می باشد و به مابقی آن 10 در صد مالیات تعلق میگرد.
در خط 70 به کامپیوتر می گویم که اگر مبلغ حقوق ناخالص از سقف معافیت بزرگتر بود ده درصد مبلغ اختلاف حقوق و سقف معافیت را در متغییر TAX ذخیره کند. در غیر اینصورت مقدار TAX محاسبه نشده و صفر باقی می ماند.
به عبارت دیگر TAX تنها زمانی محاسبه می شود که مقدار متغییر IMPURE از مقدار متغییر EXEMPT بزرگتر باشد.
60 TAX = 0
70 IF IMPURE > EXEMPT THEN TAX = (IMPURE - EXEMPT) * 0.1
پرسش: در خط 70 دلیل استفاده از پرانتز در عبارت محاسباتی را توضیح دهید.