例如，數(shù)據(jù)類型 REAL 在程序中以 6 位小數(shù)的精度進(jìn)行指定和計算。在計算浮點(diǎn)數(shù)（REAL和 LREAL）時，請注意此精度通常應(yīng)用于每個計算步驟。

在加減浮點(diǎn)數(shù)時，將會調(diào)整指數(shù)。因此在加減過程中，基數(shù)和指數(shù)將保持不變，僅增加尾數(shù)。

在以下編程示例中，將對兩個 REAL 數(shù)量類型的操作數(shù)進(jìn)行相加，然后再減去一個數(shù)。在計算的下一步中，用常量 1 除以前面的結(jié)果。為執(zhí)行此操作，創(chuàng)建一個全局?jǐn)?shù)據(jù)塊，在其中聲明用于進(jìn)行計算編程的操作數(shù)和函數(shù)。

計算公式;

y = a + b - c

Z = 1/y

創(chuàng)建數(shù)據(jù)塊“DB_GlobalData”：

1. 雙擊“添加新塊”(Add new block) 命令。

這樣會打開“添加新塊”(Add new block) 對話框。

2. 單擊“數(shù)據(jù)塊 (DB)”(Data block (DB)) 按鈕。

3. 指定名稱“DB_GlobalData”。

4. 選擇“Global DB”作為數(shù)據(jù)塊的類型。

5. 單擊“確定”(OK)。

6. 在數(shù)據(jù)塊中創(chuàng)建以下變量，然后輸入相應(yīng)的起始值：

這兩個變量的起始值都是 100000000.0，并根據(jù)數(shù)據(jù)類型 REAL 轉(zhuǎn)換為 1.0E+8。

創(chuàng)建一個 SCL 函數(shù)并將其命名為“FC_Calculate”。

1. 按如下方式聲明塊接口：

2. 將以下公式寫入程序代碼并建立在線連接以查看結(jié)果：

SCL

#y := "DB_GlobalData".a + "DB_GlobalData".b - "DB_GlobalData".c;

#z := 1/#y;

您可以看到，操作數(shù)的運(yùn)算結(jié)果為 #y = 0，即使實(shí)際期望數(shù)字 1 作為結(jié)果也是如此。

不正確的結(jié)果產(chǎn)生過程如下：

1. 在第一個計算步驟中，將操作數(shù) a 和 b 相加。在指數(shù)調(diào)整后，兩個操作數(shù)（a = 1.000000*108和 b = 1.000000*100）的 REAL 值如下所示：

a = 1.000000*108 且 b = 0.00000001*108。第二個數(shù)字（操作數(shù) b）的最后兩位數(shù)將被截斷，因?yàn)?6 位小數(shù)的精度無法再表示這個數(shù)。因此，該操作數(shù)將會加 0，而不是加 1。

2. 在第二個計算步驟中，將用前面的計算步驟結(jié)果減去操作數(shù) C（中間結(jié)果 = 1.000000*108 - c = 1.000000*108 為 0.000000e0）。

3. 如果現(xiàn)在計算下一個計算步驟中的操作數(shù) z，則嘗試除以 0。

1. 可能的解決方案

要解決此類問題，可以簡單地調(diào)整計算公式。將公式改為如下所示：

計算公式

y = a - c + b

Z = 1/y

由于在第一個計算步驟（操作數(shù) a - c）后將會得到結(jié)果 0.000000e0

，在第二個計算步驟中加上 REAL 值（中間結(jié)果 + b）就會得到正確的結(jié)果 (y = 0.000000*100+ 1.000000*100= 1.000000*100)。

2. 可能的解決方案

要計算上述公式，請使用 LREAL 數(shù)據(jù)類型來代替 REAL 數(shù)據(jù)類型。由于此數(shù)據(jù)類型是以 15位小數(shù)的精度進(jìn)行處理，因此不會產(chǎn)生上述問題。

在全局?jǐn)?shù)據(jù)塊“DB_GlobalData”中，使用相同的值創(chuàng)建三個全為 LREAL 數(shù)據(jù)類型的新變量。

在 FC“FC_Calculate”的塊接口中，另外聲明兩個 LREAL 數(shù)據(jù)類型的新變量。

在程序代碼中對公式使用新的 LREAL 變量并建立在線連接以查看結(jié)果：

SCL

#y_LREAL := "DB_GlobalData".a_LREAL +"DB_GlobalData".b_LREAL - "DB_GlobalData".c_LREAL;

#z_LREAL := 1/#y_LREAL;

審核編輯：劉清