基于ABC神經(jīng)網(wǎng)絡(luò)的煙草物流企業(yè)的成本分析研究

1、 基于ABC神經(jīng)網(wǎng)絡(luò)的一種水果物流企業(yè)的成本分析模型楊君岐 鄒松慶 艾曉宇陜西科技大學(xué)管理學(xué)院， 陜西 西安市 郵編 710021摘 要:本文基于作業(yè)成本法建立了對水果物流企業(yè)進(jìn)行成本分析的神經(jīng)網(wǎng)絡(luò)模型，并用陜西省某水果物流企業(yè)2012年資料進(jìn)行了實際分析計算，取得了非常滿意的分析結(jié)果。網(wǎng)路的輸入是企業(yè)的實際若干成本費用項目、網(wǎng)路的輸出，按分析的需要，可以是，不同地區(qū)、不同客戶、不同線路等，成功解決了水果物流費用項目與各核算對象成本之間的多對多的非線性映射關(guān)系，為按不同研究進(jìn)行成本分析提供了可靠地工具，為了便于使用，這里提供了在MATLAB中的分析程序。關(guān)鍵詞:作業(yè)成本法；神經(jīng)網(wǎng)絡(luò)；水果；物流

2、Cost Analysis of Tobacco Logistics Enterprises Based on ABC and Neural NetworkABSTRACT: Activity-Based Costing principle is applied and costing model of tobacco logistics enterprises is built. In order to study the affect of logistics cost to different scales regions, customers of different sizes an

3、d different nature of customer costs, actual data from Dec.2010 to Dec.2012 of some a tobacco logistics in Anhui province is calculated, so that enterprises can refine the customer market and do targeted services. The paper build forward neural network model of costing management and analysis foreca

4、st based on Activity-Based Costing. Train and predict network by actual data and make a good simulation result. The model successfully solves a nonlinear mapping relation law between logistics cost and accounting object, it can provide theoretical support and reference in future research.KEYWORDS：Ac

5、tivity-Based Costing；neural network；tobacco logistics隨著人民生活水平的不斷提高，水果消費在人們消費中占的比重越來越大，水果的生產(chǎn)和運輸已經(jīng)形成了一個非常重要的產(chǎn)業(yè)，由于水果產(chǎn)品的特殊性，運輸和倉儲管理水平的高低不僅直接影響產(chǎn)品的質(zhì)量和品質(zhì)，也是影響產(chǎn)品價格的主要因素之一，為此，本文，緊緊抓住物流環(huán)節(jié)的主要環(huán)節(jié)建立作業(yè)中心，通過建立神經(jīng)網(wǎng)絡(luò)，多角度研究影響水果物流成本的因素，以便降低物流費用，提高企業(yè)和產(chǎn)品的競爭力。1.基于ABC法的水果物流企業(yè)成本核算模型1.1 水果物流企業(yè)作業(yè)中心的建立資源是水果物流企業(yè)在整個服務(wù)過程中投入的各種費用，包

6、括許多項目4。這里選擇主要費用10項包括：運輸費、倉儲費、裝卸費、保險費、薪酬、消防保衛(wèi)費、業(yè)務(wù)招待費、修理費、折舊費、水電費等。按其性質(zhì)，核心業(yè)務(wù)成本，主要是運輸環(huán)節(jié)、保管環(huán)節(jié)和裝卸送達(dá)環(huán)節(jié)，本文將它歸為：運輸、倉儲保管、裝卸搬運等三大類業(yè)務(wù)，并建立對應(yīng)地三個作業(yè)中心：運輸作業(yè)中心、倉儲作業(yè)中心和裝卸搬運作業(yè)中心。陜西省某水果物流企業(yè)的物流費用見表1。表1陜西省某水果物流企業(yè)2011.1-2013.1主要物流費用表 單位：元時間運輸倉儲裝卸保險薪酬消防警衛(wèi)業(yè)務(wù)招待修理折舊水電2011.01661236.71857433.05526731.2437925.65172288.4419710.00

7、1832.001231.495279.429209.832011.021186011.27768967.51619853.511873.04196364.7324710.004995.507790.925279.3912941.352011.031576704.132776263.65717677.98331089.64219426.3324710.004969.006013.375279.4213025.282011.04836984.87866695.44311609.8636928.57175943.9533470.004972.5017271.125279.397148.652011.

8、05784351.23863421.00531256.0034678.89187965.0030123.004876.0010897.005279.366709.002011.06875634.45898834.00489076.0040897.00176890.0034567.005002.007890.005279.337100.002011.07984530.80563214.00542378.0051089.00198765.0029998.006007.008765.005279.307900.002011.081023458.70598763.00679834.0049001.00

9、202144.0030123.004997.005600.005279.276234.002011.09885634.32673421.00430987.0031008.00189001.0040123.005123.006543.005279.246000.002011.101315679.45668234.00704432.0060897.00221189.0048002.005300.009087.005279.216780.002011.111783452.90903421.00843210.0069008.00265690.0043001.004987.008876.005279.1

10、87908.002011.12980765.21560983.00508761.0050123.00302187.0037001.007000.006543.005279.158567.002012.01690012.72765439.00500123.0023541.00199876.0030012.006543.009087.005279.127467.002012.02765543.80790034.00410089.0025009.00176543.0040023.006109.004213.005279.127234.002012.03804567.87742130.10439801

11、.0019006.00190083.0020098.005530.005432.005800.006900.002012.041209342.67832109.12708765.7040987.00220015.0028765.005610.007654.005800.008900.002012.051098753.73890543.00664321.1039998.00218066.0040123.004987.007654.305800.008945.002012.06867634.65776540.12500675.0023150.00239076.0035321.004098.0087

12、65.905800.0012098.002012.07910067.23721309.00480012.0028765.00208876.0029887.005032.0012654.705800.0010235.002012.08837623.90698743.00502310.0018967.00199987.0030124.006006.008976.895800.009802.002012.09101054.23702310.00675431.0030098.00202312.0039124.004900.007875.095800.008923.002012.10784323.328

13、85430.00449087.0021008.00201010.0030875.005200.007865.805800.009678.002012.111323567.782543126.10709865.0050098.00245623.0046002.003987.005567.895800.0014589.002012.121287908.421908787.00678342.0060080.00221045.0050032.006008.00473.875800.0013678.002013.01769312.60521098.00408976.0017543.00201278.00

14、38003.005123.006743.805800.009784.001.2 水果物流企業(yè)各作業(yè)中心成本動因動因的確定與每個作業(yè)中心密切相關(guān)的是每個作業(yè)中心的成本動因的確定，這是成本分析的關(guān)鍵之一。這里依次為運輸、倉儲和裝卸三個作業(yè)中心確定的作業(yè)動因分別是：運輸“標(biāo)準(zhǔn)公里數(shù)”、倉儲“標(biāo)準(zhǔn)件.次”,裝卸“標(biāo)準(zhǔn)件.次”。1.3 水果物流企業(yè)各作業(yè)中心總成本的匯總在ABC法中要進(jìn)行成本分析，首先必須計算出各作業(yè)中心的動因分配率，完成這個工作的前提是匯總各作業(yè)中心的作業(yè)總量和總成本。各作業(yè)中心成本，按其性質(zhì)分為直接成本和間接成本，運輸費、倉儲費、裝卸費，分別是運輸作業(yè)中心、倉儲作業(yè)中心和裝卸搬運作業(yè)

15、中心的直接成本，其他費用屬于間接費用。1.4水果物流企業(yè)動因分配率的計算要計算動因分配率，必須按作業(yè)中心匯總出作業(yè)總量，這里分別匯總運輸、倉儲、裝卸搬運中心的作業(yè)總量，同時結(jié)合前面匯總的各作業(yè)中心的總成本，計算出各作業(yè)中心的動因分配率。動因分配率見表2。表2 A、B、C三個地區(qū)物流成本表 單位：元時間A地區(qū)物流成本B地區(qū)物流成本C地區(qū)物流成本動因分配率運輸倉儲裝卸2011.014610791950308995442875850.8997.79115.352011.025127773752588870530696931.17104.0191.982011.03532214234935590745

16、9150601.05101.3480.962011.046838003266111729430837411.0287.97122.382011.056013870662342516542690460.89108.1694.122011.066605521361892178419432861.1192.6291.542011.076405359550159405485983530.9595.16120.42011.085248440853449925636951391.13105.4691.352011.094762753946984996450516561.0699.19113.882011.

17、105035432042786075547480421.07104.9100.122011.114383548060190408446115341.3288.9105.972011.127272714957913736507226741.2096.3796.12012.015488337244196726502193311.06100.61103.732012.025591577959877135606620521.06113.61105.352012.035517505060165193676746691.04125.6596.342012.0459555351583350325640891

18、61.32103.76100.792012.057067245868612463723141721.20131.85108.722012.066851905763671136548199290.9999.07122.242012.076099240158079502567076171.01101.56116.832012.086316905755577635535555101.16106.37105.362012.096728149277767894715404341.22125.96123.842012.104864457574073080626977721.09109.53105.6120

19、12.118235430173095966574846891.15120.41114.072012.127601517055401781574025511.25105.85105.42013.017029562855874338621124161.72106.3998.73平均值6038948958352505549438351.12105.3105.251.5各成本核算對象作業(yè)中心作業(yè)量的匯總與成本的分?jǐn)傇谟嬎愀鞒杀緦ο蟮某杀局埃仨殞⒏髯鳂I(yè)中心的總成本，按各核算對象對作業(yè)的消耗量進(jìn)行分?jǐn)?，所以必須首先匯總統(tǒng)統(tǒng)計出各成本核算對象對不同作業(yè)的消耗總量，這里以安徽某煙草物流公司2011.01-

20、2013.01期間25個月的資源實際發(fā)生額為研究對象，匯總出三個地區(qū)的作業(yè)消耗，并按動因率計算在各作業(yè)中心攤得的成本。1.6各成本核算對象物流總成本的計算將上步計算的各作業(yè)中心所攤得的成本相加即可得到各核算對象的物流總成本，A、B、C三個地區(qū)物流成本見表2。2.基于BP神經(jīng)網(wǎng)絡(luò)的物流企業(yè)成本分析模型2.1利用BP神經(jīng)網(wǎng)絡(luò)成本分析的原理 在作業(yè)成本法中，核算對象可以靈活設(shè)置，這為問題研究提供了極大的方便，但要研究各成本核算對象成本主要影響因素，是個多對多的復(fù)雜問題，很難用傳統(tǒng)方法進(jìn)行處理，為此，本文建立神經(jīng)網(wǎng)絡(luò)模型進(jìn)行研究。建立如圖1所示一個三層神經(jīng)網(wǎng)絡(luò)結(jié)構(gòu)。它具有:(1)輸入層。用來輸入資源動

21、因數(shù)據(jù)、或作業(yè)中心成本。(2)中間層。也稱為處理層或隱層，處理輸入層的數(shù)據(jù)并為輸出層傳遞信息。(3)輸出層。它以中間層的輸出作為輸入，再經(jīng)處理給出網(wǎng)絡(luò)的最終輸出。若共有m個輸出單元，則一次輸出一個m維向量，這里依據(jù)分析的需要，也許是各個作業(yè)中心的總成本或是服務(wù)產(chǎn)品的總成本或單個產(chǎn)品的成本。x1 x2 x12輸入層 中間層（隱層） 輸出層 圖1 仿真成本分析的BP網(wǎng)絡(luò)結(jié)構(gòu)BP網(wǎng)絡(luò)是一種多層前饋神經(jīng)網(wǎng)絡(luò)，它是仿真人的大腦思考問題的過程，有若干神經(jīng)元構(gòu)成，每個神經(jīng)元，與其他神經(jīng)元之間有聯(lián)系，其聯(lián)系方式，一般通過轉(zhuǎn)換函數(shù)實現(xiàn)，轉(zhuǎn)換函數(shù)取值，一般是絕對值以歸一化，而且，基本都是初等的連續(xù)函數(shù)，這里構(gòu)造三

22、層神經(jīng)元。如果權(quán)值的調(diào)整采用反向傳播(Back Propagation)的學(xué)習(xí)算法，就叫BP網(wǎng)絡(luò)。在確定了BP網(wǎng)絡(luò)的結(jié)構(gòu)后，利用本文所選樣本公司的若干項指標(biāo)數(shù)據(jù)和輸出層對應(yīng)的若干項數(shù)據(jù)（這些依據(jù)研究分析的需要不同，或許是資源成本動因+作業(yè)中心總成本；資源成本動因+服務(wù)產(chǎn)品總成本等），可以對網(wǎng)絡(luò)進(jìn)行訓(xùn)練，也即對網(wǎng)絡(luò)的權(quán)值和閾值進(jìn)行學(xué)習(xí)和調(diào)整，以使網(wǎng)絡(luò)確定有關(guān)費用項目與物流成本之間的復(fù)雜映射關(guān)系。網(wǎng)絡(luò)的訓(xùn)練過程實際上是一個循環(huán)調(diào)整神經(jīng)元之間權(quán)重的過程，控制循環(huán)的目標(biāo)是仿真值與真值誤差向量，權(quán)重的調(diào)整用計算方法中的梯度下降法。6 設(shè)BP網(wǎng)絡(luò)的輸入層為： (3.1)其中x是為訓(xùn)練網(wǎng)絡(luò)選取的輸入層數(shù)據(jù)。

23、BP 網(wǎng)絡(luò)的中間層單元輸入和輸出值： (3.2) (3.3)其中 為權(quán)向量， 為網(wǎng)絡(luò)的轉(zhuǎn)換函數(shù)，它可以依據(jù)研究需要靈活調(diào)整，例如sigmoid： (3.4)訓(xùn)練網(wǎng)絡(luò)的（BP網(wǎng)絡(luò)）的輸出層為： (3.5)其中 是神經(jīng)網(wǎng)絡(luò)系統(tǒng)的輸出向量，一般由輸出層的要素數(shù)確定，輸出層神經(jīng)元的的傳遞函數(shù)也可靈活選擇，本文logsig函數(shù)， 為權(quán)系數(shù)。 控制網(wǎng)絡(luò)訓(xùn)練迭代過程的目標(biāo)是，輸出量構(gòu)成的誤差向量，其s基本計算公式如下： (3.6)在訓(xùn)練網(wǎng)絡(luò)時，首先確定一個極限誤差，和極限迭代次數(shù)，二者中有一個滿足條件即可結(jié)束網(wǎng)絡(luò)訓(xùn)練，否則，不斷調(diào)整，權(quán)重向量，計算新的網(wǎng)絡(luò)輸出，再與真值比較計算仿真誤差。梯度搜索算法中權(quán)重向

24、量的計算公式如下。 (3.7) (3.8)其中為學(xué)習(xí)修正率， 。另外由式(3.4)，可得到： 。 3.2 BP網(wǎng)絡(luò)的MATLAB實現(xiàn)建立BP神經(jīng)網(wǎng)絡(luò)模型的核心，是反映多對多關(guān)系的網(wǎng)絡(luò)的建立，這里主要環(huán)節(jié)有三個：建立網(wǎng)絡(luò)、訓(xùn)練網(wǎng)絡(luò)和利用網(wǎng)絡(luò)進(jìn)行仿真，Matlab軟件包為我們提供了大量的函數(shù)，其中就有實現(xiàn)上述功能的函數(shù)：1.網(wǎng)絡(luò)的初步建立網(wǎng)絡(luò)仿真的第一步就是要搭建網(wǎng)絡(luò)框架，以便為下一步用實際數(shù)據(jù)進(jìn)行網(wǎng)絡(luò)訓(xùn)練打下基礎(chǔ)，建立BP網(wǎng)絡(luò)的函數(shù)為newff(),調(diào)用格式如下：newff(minmax(p)，n，k，tansig，logsig，traingdx)2. 訓(xùn)練網(wǎng)絡(luò)第二步，就是用實際歷史數(shù)據(jù)訓(xùn)練網(wǎng)絡(luò)

25、，以便研究對象之間的多對多關(guān)系，用來完成此項功能的函數(shù)為train()，調(diào)用格式如下：net=train(net，p，t)3.仿真與使用網(wǎng)絡(luò)最后，就是利用訓(xùn)練好的網(wǎng)絡(luò)進(jìn)行分析研究，給出網(wǎng)絡(luò)輸入，研究網(wǎng)絡(luò)輸出，進(jìn)行仿真預(yù)測，完成該功能的函數(shù)為sim(net，testp)，調(diào)用格式如下：y=sim(net，testp)3.3 樣本數(shù)據(jù)處理利用2010.12-2012.12安徽某煙草企業(yè)實際數(shù)據(jù)，建立反映煙草物流企業(yè)各資源動因、作業(yè)中心，按地區(qū)核算的服務(wù)產(chǎn)品成本之間的非線性映射關(guān)系的神經(jīng)網(wǎng)絡(luò)。網(wǎng)絡(luò)中輸入層節(jié)點個數(shù)：作業(yè)中心為三個，所以輸入層為3；隱含層結(jié)點數(shù)可以由程序調(diào)節(jié)。這里的網(wǎng)絡(luò)輸入數(shù)據(jù)就是25

26、個月有關(guān)物流費用科目的月發(fā)生額。為了避免不同量級數(shù)據(jù)差異帶來的訓(xùn)練網(wǎng)絡(luò)所造成的誤差，在進(jìn)行網(wǎng)絡(luò)訓(xùn)練、仿真時都將有關(guān)數(shù)據(jù)首先進(jìn)行“標(biāo)準(zhǔn)化”處理。 訓(xùn)練網(wǎng)絡(luò)時，輸入輸出是對應(yīng)的，與對網(wǎng)絡(luò)輸入處理一樣，也是利用2010.12-2012.12安徽某煙草企業(yè)實際數(shù)據(jù)，建立反映煙草物流企業(yè)，各資源動因、作業(yè)中心，按地區(qū)核算的服務(wù)產(chǎn)品成本之間的非線性映射關(guān)系的神經(jīng)網(wǎng)絡(luò)將訓(xùn)練網(wǎng)絡(luò)的有關(guān)輸出數(shù)據(jù)同樣做“標(biāo)準(zhǔn)化”處理。下文重點研究的是各地區(qū)物流成本受各物流費用科目的影響研究，所以輸出數(shù)據(jù)是25個月按地區(qū)核算（A地區(qū)、B地區(qū)、C地區(qū)）的各地區(qū)當(dāng)月物流成本數(shù)據(jù)，見表2。3.4 網(wǎng)絡(luò)建立與仿真用上述處理思想，建立一個N

27、KM的 BP網(wǎng)絡(luò)，分別利用Matlab中的函數(shù)NEWFF()、train()、，sim()建立、訓(xùn)練和仿真網(wǎng)絡(luò)。6利用本文所選安徽某煙草公司2010.12-2012.12，25個月數(shù)據(jù)訓(xùn)練網(wǎng)絡(luò)，并進(jìn)行模擬計算分析，這里隱層和輸出層傳遞函數(shù)分別取tansig和logsig，定義訓(xùn)練步數(shù)為2000，目標(biāo)誤差為0.03，訓(xùn)練過程見下圖2，由圖可見，利用我們所選的參數(shù)進(jìn)行網(wǎng)絡(luò)訓(xùn)練，收斂很快，網(wǎng)絡(luò)最終仿真誤差極小。最大相對誤差在3%以內(nèi)。說明本文建立的神經(jīng)網(wǎng)絡(luò)具有很好的仿真能力，完全可以利用它進(jìn)行物流企業(yè)成本費用分析研究，也就是說，該模型能非常有效地仿真物流企業(yè)各相關(guān)指標(biāo)之間的非線性關(guān)系。圖2 神經(jīng)網(wǎng)絡(luò)

28、系統(tǒng)訓(xùn)練過程經(jīng)過用2010.12-2012.12年安徽某煙草企業(yè)物流數(shù)據(jù)的模擬計算可以看出神經(jīng)網(wǎng)絡(luò)系統(tǒng)的仿真值與原始模糊評價數(shù)據(jù)比較接近，除個別點外，仿真誤差在3%以內(nèi)，圖2為系統(tǒng)訓(xùn)練過程，可見網(wǎng)絡(luò)迭代收斂很快。圖3為25個月三個地區(qū)實際成本與網(wǎng)絡(luò)模擬成本對比，可見兩條曲線幾乎重合，網(wǎng)絡(luò)仿真結(jié)果非常好；為了更進(jìn)一步觀察網(wǎng)絡(luò)仿真效果，圖4列出三個成本誤差曲線，可見誤差曲線都在0點附件，仿真效果非常理想。圖3 A、B、C成本 神經(jīng)網(wǎng)絡(luò)仿真結(jié)果圖4 A B C成本的仿真誤差3.5 分析不同地區(qū)物流成本的影響因素通過上面分析可見，本文所建ABC神經(jīng)網(wǎng)絡(luò)模型具有非常好的仿真效果，為了分析不同費用科目對地

29、區(qū)物流成本的影響，這里以各科目25月平均值為基礎(chǔ)，采取單項分別變化的辦法構(gòu)造網(wǎng)絡(luò)輸入數(shù)據(jù)，讓一個科目發(fā)生額增加和減少平均值的10%，其他科目采取平均值，考查網(wǎng)絡(luò)輸出的三個成本變化，分析結(jié)果如下：當(dāng)運輸費分別增加和減少平均成本的10%,A地區(qū)的物流成本有顯著的同方向變化，其歸一化成本值由0.57，分別變?yōu)?.88,0.32，B和C地區(qū)的物流成本略有下降，說明運輸費與A地區(qū)物流成本呈正相關(guān)、與B地區(qū)及C地區(qū)物流成本呈負(fù)相關(guān)。當(dāng)倉儲費分別增加和減少平均成本的10%時,B和C地區(qū)的物流成本有明顯同方向變化，其歸一化成本值分別由0.858和0.266，分別變?yōu)?.985,0.278和0.531,0.23

30、2 ；A地區(qū)物流成本與倉儲費呈現(xiàn)反方向變化，其歸一化成本值由0.57，分別變?yōu)?.454,0.883；說明倉儲費與B和C地區(qū)物流成本呈正相關(guān)、與A地區(qū)物流成本呈負(fù)相關(guān)。當(dāng)裝卸費分別增加和減少平均成本的10%時,C地區(qū)的物流成本有明顯同方向變化，其歸一化成本值分別由0.266，分別變?yōu)?.592,0.244 ，A和B地區(qū)物流成本呈現(xiàn)反方向變化；說明裝卸費C地區(qū)物流成本呈正相關(guān)、與A地區(qū)和B地區(qū)物流成本呈負(fù)相關(guān)。當(dāng)其它間接物流費用發(fā)生變化時，對三各地區(qū)物流成本影響無論是量還是方向都不是太固定，這是由于，相比較運輸費用、倉儲費用和裝卸費用，這些間接費用都比較小。就成本控制而言，要想降低A地區(qū)物流成本

31、，就要合理安排和控制運輸費用，適當(dāng)增加和調(diào)整庫存；對B地區(qū)而言，要適當(dāng)增加運輸費用，減少庫存費用；對C地區(qū)而言，要嚴(yán)格控制裝卸費用，適當(dāng)增加庫存費用。4. 結(jié)束語本文基于作業(yè)成本法建立了煙草物流企業(yè)成本分析模型，為了分析方便靈活，建立了BP神經(jīng)網(wǎng)絡(luò)模型，并用安徽某煙草物流企業(yè)2010.122012.12期間25個月實際物流發(fā)生費用對網(wǎng)絡(luò)進(jìn)行了訓(xùn)練和仿真預(yù)測，取得了令人滿意的效果。本文所用模型、原理和方法，可以推廣到物流行業(yè)及其他行業(yè)。參考文獻(xiàn)1扈景科.煙草行業(yè)物流現(xiàn)狀與改革措施J.衡水學(xué)院學(xué)報,2008,10(5):22-232魏國辰,楊莉.我國物流企業(yè)服務(wù)管理現(xiàn)狀與對策研究J.物流技術(shù).20

32、12,31(2).165-1683樓前飛,嚴(yán)偉.淺析我國第三方物流的發(fā)展現(xiàn)狀及對策J.物流技術(shù),2005,11:25-274邵鐵柱,吳丹丹.作業(yè)成本法成本動因在高新技術(shù)企業(yè)中的應(yīng)用J.北方經(jīng)貿(mào),2012(6):112-1145左杰.作業(yè)成本法在物流企業(yè)中的應(yīng)用研究D.天津財經(jīng)大學(xué).20076楊君岐等.基于模糊神經(jīng)網(wǎng)絡(luò)仿真顧客飲料口味的評價模型構(gòu)建J.中國釀造.2006,6:.37-41作業(yè)簡介：楊君岐(1962-)，男，陜西省岐山縣人，陜西科技大學(xué)管理學(xué)院教授，碩士，主要從事經(jīng)濟(jì)學(xué)與電子商務(wù)研究；鄒松慶（1987-），女，山東省煙臺市人，陜西科技大學(xué)企業(yè)管理碩士研究生，碩士，主要從事經(jīng)濟(jì)學(xué)、電

33、子商務(wù)的研究；聯(lián)系方式：陜西省西安市未央?yún)^(qū)陜西科技大學(xué)849信箱 HYPERLINK mailto: ，郵編710021 附錄資料:不需要的可以自行刪除c語言典型問題處理方法小結(jié)循環(huán)問題（1）、數(shù)論問題1、求素數(shù) for(i=2;i1，如果它僅有平凡約數(shù)1和a，則我們稱a為素數(shù)(或質(zhì)數(shù))。整數(shù) 1 被稱為基數(shù)，它既不是質(zhì)數(shù)也不是合數(shù)。整數(shù) 0 和所有負(fù)整數(shù)既不是素數(shù)，也不是合數(shù)。 2、求最大公約數(shù)和最小公倍數(shù)a、 if(ab) t=a; a=b; b=t; for(i=a;i=1;i-) if(a%i=0&b%i=0) break; printf(largest co

34、mmon divisor:%dn,i); printf(least common multiple:%dn,(a*b)/is);b、輾轉(zhuǎn)相除法求解 a1=a; b1=b; while(a%b!=0) t=a%b; a=b; b=t; printf(largest common divisor:%dnleast common multiple:%d,b,a1*b1/b);3、求完數(shù) 一個數(shù)如果恰好等于它的因子之和，這個數(shù)就稱為“完數(shù)”。 例如：6的因子為1、2、3，而6123，因此6是“完數(shù)”。for(a=1;a=1000;a+) s=0; for(i=1;i=a) break; if(s=a)

35、 printf(%dt,a);注意S=0所放的位置 4、分解質(zhì)因數(shù) 將一個整數(shù)寫成幾個質(zhì)因數(shù)的連乘積，如： 輸入36，則程序輸出36=2*2*3*3 。解一、看似簡單，但要自己完整地寫出來還真不容易！竟然還動用了goto語句，正好可以熟悉一下goto語句的用法！main() int a,z,i; clrscr(); scanf(%d,&a);判斷下一個數(shù)開始有要重新從2開始了。所以用loop語句回到for語句，這是for語句仍從2初始化。從2開始的原則不變，變的是a的值。 loop: for(z=2;z=a;z+)判斷是否為質(zhì)數(shù)for(i=2;i=z;i+) if(z%i=0) break;判

36、斷是否為a的質(zhì)因數(shù) if(z=i) if(a%z=0) k+; if(k=1) printf(%d=%d,a1,z);用計數(shù)器來解決每行輸入不同的問題。 else printf(*%d,z); a/=z; goto loop; 解二：main() int n, k=2, isfirst=1; printf(Input n=); scanf(%d,&n); while(k=n) if(n%k=0) if(isfirst) printf(%d=%d, n, k); isfirst=0; else printf(*%d,k); n/=k; else k+; printf(n);5、從鍵盤輸入兩個整數(shù)

37、，輸出這兩個整數(shù)的商的小數(shù)點后所有1000位整數(shù) for(i=1;i=2;i-) if(fm%i=0&fz%i=0) fz/=i; fm/=i; z=fz/fm; fzx=fz%fm; if(fzx=0) printf(%d%d/%d-%d%d/%d=%dn,z1,fz1,fm1,z2,fz2,fm2,z); else if(z=0) printf(%d%d/%d-%d%d/%d=%d/%dn,z1,fz1,fm1,z2,fz2,fm2,fzx,fm); else printf(%d%d/%d-%d%d/%d=%d%d/%dn,z1,fz1,fm1,z2,fz2,fm2,z,fzx,fm);（

38、2）近似問題1、書P122習(xí)題4-6注意千萬不要忘記添加#include “math.h”#include math.hmain() float x,j=1,k,s,so; int n; scanf(%f,&x); s=x; so=x+1; for(n=1;fabs(s-so)1e-6;n+) for(k=1;k1e-6) x=(x1+x2)/2; f=x*x*x+4*x*x-10;可以用/*if(f*f10) x2=x; else x1=x; printf(%fn,x);（3）枚舉法（4）數(shù)列問題二、數(shù)組問題（1）排序問題1、從小到大排序main() int a10,i,j,t; for(i

39、=0;i10;i+) scanf(%d,&ai); for(i=1;i10;i+) for(j=0;jaj+1) t=aj+1;aj+1=aj;aj=t; for(i=0;i10;i+) printf(%d ,ai); printf(n);注意排序問題：1、須迅速，熟練，無差錯經(jīng)常插入在程序中間2、現(xiàn)使用最大數(shù)下沉冒泡法還可以使用最小數(shù)上浮冒泡法3、j控制前面一個數(shù)和后面一個數(shù)一一比較。由于是最大數(shù)下沉，i+1后j仍要從0開始。4、i控制這樣的操作一共要做多少次5、注意i j的控制次數(shù)2、從大到小排序main()現(xiàn)使用最大數(shù)上浮冒泡法還可使用最小數(shù)下沉冒泡法 int a10,i,j,t; fo

40、r(i=0;i10;i+) scanf(%d,&ai); for(i=1;i=i;j-) if(ajaj-1) t=aj-1; aj-1=aj; aj=t; for(i=0;i10;i+) printf(%d ,ai);（2）二維數(shù)組三、字符或字符串輸入輸出問題（1）字符打印1、打印*此類題的溯源為書P122 4.11（1），其他題都是它的拓展 for (i=1;i=n;i+) 一共要輸出的行數(shù) for(j=1;j=i;j+) 每行要打印的*數(shù) printf(*); printf(n); a、*解題要點：此類題關(guān)鍵在于找到每行要打印的個數(shù)和行數(shù)的關(guān)系。此題j=i j=n-i+1b、* for(

41、i=1;i=n;i+) 一共要輸出的行數(shù) for(j=1;j=n-i;j+) 控制空格數(shù) printf( ); for(k=1;k=i;k+) 每行要打印的*數(shù) printf(*); printf(n); c、 * * *解題要點：在出現(xiàn)空格的時候，在找到每行要打印的*個數(shù)和行數(shù)的關(guān)系后，還應(yīng)找到空格和行數(shù)的關(guān)系，分不同的參數(shù)進(jìn)行循環(huán)。此題k=i j=n-i j=i-1k=n-i+1d、* * for(i=1;i=n;i+) for(j=1;j=n-i;j+) printf( ); for(k=1;k=2*i-1;k+) printf(*); printf(n); * *e、 * * * fo

42、r(i=1;i=n-1;i+) for(j=1;j=i;j+) printf( ); for(k=1;k=2*(n-1-i)+1;k+) printf(*); printf(n); for(i=1;i=n;i+) for(j=1;j=n-i;j+) printf( ); for(k=1;k=2*i-1;k+) printf(*); printf(n); * * * * * *2、打印9*9乘法表解題要點：注意尋找行與列的規(guī)律。i*ji代表列j代表行for(i=1;i=9;i+) for(j=1;j=9;j+) printf(%-3d ,i*j); 注意輸出格式的控制 printf(n); 3、

43、九九乘法表1 2 3 4 5 6 7 8 92 4 6 8 10 12 14 16 183 6 9 12 15 18 21 24 27 9 18 27 36 45 54 63 72 814、楊暉三角形11 11 2 11 3 3 11 4 6 4 11 5 10 10 5 11 6 15 20 15 6 1（2）字符串打印問題for(i=1;i=7;i+) ai1=1; aii=1; for(i=3;i=7;i+) for(j=2;j=i-1;j+) aij=ai-1j-1+ai-1j; gets(a); puts(a); for(i=1;i0;j-) aj=aj-1; a0=t; for(k

44、=0;k=a&ai=z) ai-=32; puts (a);3、逆序輸出gets (a); c=strlen(a); for(i=0;i=0;i-) 藍(lán)色部分可以簡寫為綠色部分coutai-1;4、如輸入：ab1 3,;z 輸出：ab1注意點：1、= =2、while語句的使用處體會3、全面考慮問題 3,;zgets(a); while(a0= ) for(i=0;ai!=0;i+) ai=ai+1; for(i=0;ai!=0;i+)if(ai= &ai+1!= ) printf(n); else if(ai= &ai+1= ) for(k=i;ak!=0;k+) ak+1=ak+2; i-

45、; elseprintf(%c,ai);5、輸入3個字符串，按從小到大排序輸出這3個字符串。 使用一個兩維數(shù)組貯存多個字符串char a8181;注意：如何使用一個兩維數(shù)組貯存多個字符串 int i,j; for(i=0;i3;i+) gets(ai); for(i=0;i3;i+) puts(ai);注意：1、scanf(%d%s,&n,str) 其中%s為字符串格式2、逐個給字符串賦值的方法見書140頁。 不可for（i=0；ai!=0;i+）3、stri=stri-A+10;4、pow函數(shù)5、任何進(jìn)制轉(zhuǎn)為十進(jìn)制的方法6、輸入一個整數(shù)n和一個字符串str，計算并輸出n進(jìn)制數(shù)str的值。 如

46、輸入：7 16則輸出：13(16)7=(13)10如輸入：16 3A則輸出：58(3A)16=(58)10#include stdio.h#include math.hmain() char str81; int n,i,s=0,t; clrscr(); scanf(%d%s,&n,str); for(i=0;stri!=0;i+) if(stri=A) stri=stri-A+10; else stri=stri-0; t=strlen(str); for(i=0;stri!=0;i+) s+=strt-i-1*pow(n,i); printf(%d,s);編寫程序，將一個十進(jìn)制正整數(shù)轉(zhuǎn)換成

47、十六進(jìn)制數(shù)。 注意類比#include main()char a20;int x,i=0,j;clrscr();scanf(%d,&x);while(x) if(x%16=10&x%16=0;j-)printf(%c,aj);printf(n);7、輸入一個字符串，將其中的縮寫形式展開，并輸出展開后的該字符串。所謂展開縮寫形式就是將其中由大小寫字母或數(shù)字構(gòu)成的形如a-f、U-Z、3-8 的形式展開成為 abcdef 、UVWXYZ 、345678，若出現(xiàn)f-a、A-7、9-5等形式則不予理睬。例如： 輸入：qwe246e-hA-d$-%4-7A-Dz-xp-R4-0輸出：qwr246efghA

48、-d$-%4567ABCDz-xp-R4-0main() char a81; int i,c,s,k,t; gets(a); for(i=0;ai!=0;i+) if(ai=-) if(ai-1=A&ai+1=a&ai+1=0&ai+1i;k-)ak+c-2=ak;as-1+c-2+1=0; for(;i=t;i+) ai=ai-1+1; puts(a);補(bǔ)充：循環(huán)：求：a+aa+aaa+.的值#includevoid main()int a,n,i=1,sn=0,tn=0;coutinput a and nan;while(i=n)tn=tn+a;sn+=tn;a*=10;i+;coutth

49、e answer is snendl;兩個乒乓球隊進(jìn)行比賽，各出3人。甲隊為A,B,C;已對是X,Y,Z；已經(jīng)抽簽決定比賽名單。有人向隊員大廳比賽的名單。A說他不和X比，C說他不和X,Z比。請編程序找出3對賽手的名單。#includevoid main()char i,j,k;for(i=X;i=Z;i+)for(j=X;j=Z;j+)if(i!=j)for (k=X;k=Z;k+)if(i!=k&j!=k)if(i!=X&k!=X&k!=Z)coutA-i B-j C-kendl;枚舉口袋中有紅，黃，藍(lán)，白，黑5種顏色的球若干。每次從口袋中任意取出3歌，問得到3種不同顏色球的可能取法，輸出每種排列的情況。#include#include /在C語言中不用加這句void main()enum colorred ,yellow ,blue,white, black;color pri;int i,j,k,n=0,loop;for(i=red;i=black;i+)for(j=red;j=black;j+)if(i!=j)for (k=red;k=black;k+)if(k!=i)&(k!=j)n+;coutsetw(3)n; /setw是輸出格式的限定for(loop=1;loop=3;loop+)switch(loop)case 1:pri=color(i);break;c