打开考生文件夹下的DB数据库，完成如下简单应用：
编写一个名为FOUR.PRG的程序，根据表TABA中所有记录的a，b，c三个字段的值，计算各记录的一元二次方程的两个根x1和x2，并将两个根x1和x2写到对应的字段x1和x2中，如果无实数解，在note字段中写入“无实数解”。提示：平方根函数为SQRT()；程序编写完成后，运行该程序计算一元二次方程的两个根。注意：一元二次方程公式如下：
[*]

【参考答案】

新建程序four，并输入以下命令：
*****"four"程序文件中的代码*****
CLOS AL......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)