程序設(shè)計(jì)題 (共20分,第1小題8分,第2小題12分)
1、編寫(xiě)一個(gè)循環(huán)結(jié)構(gòu)程序計(jì)算5的階乘。
2、有營(yíng)業(yè)員數(shù)據(jù)表文件YYY.DBF和日銷(xiāo)售數(shù)據(jù)表文件RXS.DBF
*RXS.DBF *YYY.DBF
營(yíng)業(yè)員代碼 品名 數(shù)量 單價(jià) 營(yíng)業(yè)額
101 電視 3 1230.40 0000.00
102 電話 4 223.00 0000.00
101 電扇 5 334.00 0000.00
103 電話 3 223.00 0000.00
102 電視 1 1230.40 0000.00
編程要求:(1)計(jì)算出RXS.DBF中的營(yíng)業(yè)額字段的值。注:營(yíng)業(yè)額=數(shù)量*單價(jià)
(2)根據(jù)用戶輸入的營(yíng)業(yè)員代碼查詢(xún)某個(gè)營(yíng)業(yè)員的全天營(yíng)業(yè)額,按如下格式顯示:
代碼:101
姓名:天涯 性別: 女
品名 營(yíng)業(yè)額
電視 3691.20
電扇 1670.00
營(yíng)業(yè)額: 5361.20
(1)8分,評(píng)分標(biāo)準(zhǔn):循環(huán)語(yǔ)句4分,累乘3分,輸出1分
clear
s=1
for n=1 to 5
s=s*n
endfor
?”5的階乘為:”,s
return
(2)12分,評(píng)分標(biāo)準(zhǔn):更新4分,臨時(shí)關(guān)聯(lián)4分,匯總和輸出4分
clear
select 1
use rxs
replace all 營(yíng)業(yè)額 with 數(shù)量*單價(jià)
select 2
use yyy
index on 營(yíng)業(yè)員代碼 tag dm
select rxs
set relation to 營(yíng)業(yè)員代碼 into yyy
accept “輸入營(yíng)業(yè)員代碼:” to dm
?”代碼:”+dm
locate for 營(yíng)業(yè)員代碼=dm
?“姓名:”+yyy.姓名+“ 性別:”+ yyy.性別
List 品名,營(yíng)業(yè)額 for 營(yíng)業(yè)員代碼=dm off
sum 營(yíng)業(yè)額 to x1 for 營(yíng)業(yè)員代碼=dm
?” 營(yíng)業(yè)額:”,x1
Close all
return
2015職稱(chēng)計(jì)算機(jī)考試書(shū)PowerPoint2007中 .. 定價(jià):¥45 優(yōu)惠價(jià):¥42 更多書(shū)籍 | |
2015年全國(guó)職稱(chēng)計(jì)算機(jī)考試教材(2007模 .. 定價(jià):¥225 優(yōu)惠價(jià):¥213 更多書(shū)籍 |