VF实习报告（祥细版） - Wizard(3)

Wizard WongVF实习报告

3. 第三小题：求二元一次方程ax^2+bx=c=0的根

CLEAR

?\求解一元二次方程：a*x^2+b*x+c=0\input \请输入参数a=\input \请输入参数b=\input \请输入参数c=\d=b*b-4*a*c DO case CASE a=0 ?\ CASE d<0

?\此方程组无实根\ CASE d=0

?\ CASE d>0

?\ ?\ENDCASE

↓↓↓↓↓

11 / 40

Wizard WongVF实习报告

4. 第四小题：计算自然数前N项和S=1+2+3+??+N，设N=50

clear

?\计算自然数前N项和S\input \请输入项数N=\S=0

FOR i=1 to N S=S+i NEXT ? \

12 / 40

Wizard WongVF实习报告

↓↓↓↓↓

三、第三题

1、 第一小题：计算每个人的应发工资及各项工资合计 （1） 命令方式：

use gz20131000495

replace all 应发工资 with 基本工资+奖金-扣款 list

sum 基本工资,奖金,扣款,应发工资 to a,b,c,d go 6

replace 基本工资 with a replace 奖金 with b replace 扣款 with c

replace 应发工资 with d list

13 / 40

Wizard WongVF实习报告

（2） 程序方式：

clear text

**************************

* 1. 计算个人应发工资 * * 2. 计算各项工资合计 *

* 3. 退出此项运行程序 * ************************** endtext do while .t. @10,0 clear

input \请输入所需操作功能的编号:\ do case case gn=1 do e1 case gn=2 do e2 case gn=3

wait \系统将关闭！\ exit endcase enddo return

procedure e1

use gz20131000495

14 / 40

Wizard WongVF实习报告

replace all 应发工资 with 0 list

input \请按表格输入所需计算应发工资职工的记录号:\go mc

replace 应发工资 with 基本工资+奖金-扣款 display wait

procedure e2

use gz20131000495 go 6

replace 基本工资 with 0 奖金 with 0 扣款 with 0 应发工资 with 0 list

sum 基本工资,奖金,扣款,应发工资 to a,b,c,d go 6

replace 基本工资 with a 奖金 with b 扣款 with c 应发工资 with d list wait

↓↓↓↓↓

15 / 40

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库VF实习报告（祥细版） - Wizard(3)在线全文阅读。