基础会计学原理重点整理(精编!!)

会计学原理重点会计等式：资产=负债+所有者权益+收入－费用会计科目按经济内容分类一．资产类库存现金银行存款应收票据应收账款预付账款应收股利应收利息其他应收款材料采购原材料库存商品固定资产固定资产减值准备坏账准备累计折旧无形资产累计摊销待处理财产损溢商誉二．负债类短期借款应付票据应付账款预收账款应付职工薪酬应交税费应付利息应付股利其他应付款长期借款应付债券三．所有者权益类实收资本资本公积盈余公积本年利润利润分配四．成本类生产成本制造费用五．损益类费用类：销售费用管理费用财务费用所得税费用营业外支出营业税金及附加主营业务成本其他业务成本（营业成本）资产减值损失收入类：主营业务收入其他业务收入（营业收入）营业外收入公允价值变动损益书P93账户类别借方贷方资产类增加减少有余额在借方负债类减少增加有余额在贷方所有者权益类减少增加有余额在贷方成本类增加减少收入类减少增加费用类增加减少账户按用途和结构分类（书P116）集合分配账户：制造费用跨期摊销账户：长期待摊费用成本计算账户：生产成本，在建工程，研发支出财务成果账户：本年利润计价对比帐户：材料采购暂记账户：待处理财产损溢盘存账户：资本账户：结算账户：债权结算账户债务结算账户调整账户：备抵调整账户附加调整账户备抵附加调整账户汇转账户：收入汇转账户费用汇转账户企业主要经济业务核算筹资业务核算P127账户设置——实收资本资本公积银行存款固定资产无形资产短期借款长期借款应付债券应付利息财务费用采购业务核算P133账户设置——材料采购原材料库存现金应付账款预付账款应付票据制造业务核算P138账户设置——生产成本制造费用管理费用累计折旧应付职工薪酬库存商品销售业务核算P148账户设置——主营业务收入主营业务成本其他业务收入其他业务成本销售费用营业税金及附加应收票据应收账款预收账款应交税费财务成果业务核算P153财务成果是企业一定期间内生产经营取得的最终成果，表现为利润或亏损。利润的形成营业利润=营业收入-营业成本-营业税金及附加－销售费用－管理费用－财务费用利润总额=营业利润+营业外收入-营业外支出净利润=利润总额－所得税费用﹝应纳税所得额（利润总额）*税率（25%）﹞账户设置——营业外收入营业外支出所得税费用利润分配盈余公积应付股利净利润分配提取盈余公积未分配利润向投资者分配股利或利润会计：以货币为主要计量单位，对企事业单位的经济活动进行连续，系统，全面，综合地反映和监督的一种管理活动。会计职能基本职能其他职能会计特定目标会计基础收付实现制权责发生制会计信息质量要求（8项）会计核算的基本程序会计核算的方法（7步）“累计折旧”是“固定资产”的备抵调整账户，但“累计折旧”账户为借方反映折旧额的减少，贷方则增加。(固定资产净值=固定资产账户余额—累计折旧账户余额)材料采购：材料的采购费用，包括买价，运输费，装卸费，保险费及购入材料时应负担的税金等其他费用。产品成本：各种生产费用之和。生产成本（生产费用）：直接材料，直接人工，制造费用。制造费用：用于产品生产的各种耗费，如机器设备的折旧费，劳动保护费，机物料消耗等。还包括车间范围内发生的办公费，水电费，生产管理人员的薪酬。直接材料：构成产品实体的原料，主要材料以及有助于产品形成的辅助材料。直接人工：直接从事生产的人员的薪酬的总和。管理费用：行政管理人员的薪酬，管理使用固定资产的折旧费，管理部门的办公费以及企业生产车间和行政管理部门发生的固定资产修理费等。财务费用：包括利息支出（减利息收入）以及相关的手续费。销售费用：企业销售商品及提供劳务过程中发生的费用，包括运输费，装卸费，包装费，保险费，展览费，广告费等。会计凭证：记录经济业务，明确经济责任，作为登记账簿依据的书面证明。会计凭证的种类★原始凭证（书P169）按来源不同按填制手续和方法记账凭证记账凭证的填制要求（7点）会计账簿：由具有一定格式且又相互联系的帐页组成，以审核无误的会计凭证为依据，用来连续，系统，全面地反映各种经济业务的簿籍。账簿的分类（书P206）★按用途○按外表形式▲按帐页格式错误更正方法（书P230）（账簿记录错误）（记账凭证正确）划线更正法红字更正法会计科目错误会计科目正确，金额多计补充登记法会计科目正确，金额少计对账与结账P230财产清查：是对各项财产、物资进行实地盘点和核对，查明财产物资、货币资金及债权债务的实存数，并与账面数进行核对，从而检查账实是否相符的一种会计专门核算方法。P246财产清查的种类按清查范围按清查时间内容1.实物资产清查2.库存现金清查3.银行存款清查（银行存款余额调节表P251）财产清查的结果处理借方待处理财产损溢贷方1.清查时盘亏数清查时盘盈数2.批准后盘盈转销数批准后盘亏转销数会计核算程序：会计凭证和帐簿组织与记账程序和方法有机结合的方式。P317会计核算程序的种类名称优点缺点★适用范围1.记账凭证2.科目汇总表3.汇总记账凭证4.多栏式日记账会计财务报告：由会计报表和会计报表附注构成分类：1.按报送对象对外报告；对内报告（资产负债表，利润表，现金流量表，所有者权益变动表2.按编制主体个别报告；合并报告3.按编制时间年度，半年度，季度，月度报告资产负债表有关项目的填列P289货币资金=应收账款=预付款项=应付账款=预收款项=存货=固定资产=【程序填空】'题目：信息加密问题。信息加密有各种方法，最简单的一种加密方法是：'将每个字母加一个序数，序数称为密钥。如果取序数为3，那么转换的方式就是:'A→D，B→D，a→d，Y→B，Z→C'解密过程与加密过程正好相反。'编一个加密程序，将输入的一行字符串中的所有字母加密。FunctionCode(ByValS$,ByValKey%)DimCAsString*1,IAsc%,I%Code=ForI=1ToLen(S)'**********SPACE**********C=Mid$(S,I,1)IAsc=Asc(C)SelectCaseCCaseAToZIAsc=IAsc+Key'**********SPACE**********IfIAscAsc(Z)ThenIAsc=IAsc-26Code=Code+Chr(IAsc)CaseaTozIAsc=IAsc+Key'**********SPACE**********IfIAscAsc(z)ThenIAsc=IAsc-26Code=Code+Chr(IAsc)CaseElseCode=Code+CEndSelectNextIEndFunctionPrivateSubCommand1_Click()Text2=Code(Text1,2)EndSub【程序填空】'题目：将字符串S1反向输出PrivateSubCommand1_Click()Dims1AsString,s2AsStrings1=abcdef'**********SPACE**********CallInvert(s1,s2)Prints2EndSubPrivateSubInvert(ByValxstrAsString,ystrAsString)DimtempstrAsStringDimiAsInteger'**********SPACE**********i=Len(xstr)DoWhilei=1tempstr=tempstr+Mid(xstr,i,1)i=i-1'**********SPACE**********Loopystr=tempstrEndSub【程序填空】'题目：程序功能：在Text1，Text2，Text3中分别输入三个数字，'在Text4中计算这三个数的和。如果三个文本框的输入不'为数字则显示错误提示PrivateSubCommand1_Click()DimaAsString,bAsString,cAsStringa=Trim(Text1.Text)b=Trim(Text2.Text)c=Trim(Text3.Text)'**********SPACE**********Ifche(a)Andche(b)Andche(c)ThenText4.Text=Val(a)+Val(b)+Val(c)ElseText4.Text=存在非数字字符EndIfEndSubFunctionche(xAsString)AsBoolean'若存在非数字字符，函数值为假DimkAsIntegerDimsAsString'**********SPACE**********che=TrueFork=1ToLen(x)s=Mid(x,k,1)'**********SPACE**********Ifs0Ors9Thenche=FalseExitForEndIfNextkEndFunction【程序改错】''题目:下列程序进行n阶乘运算，当阶乘的值超过21147483648'溢出报错，并将结果输出为-1。'**********FOUND**********PrivateFunctionjc(ByValnAsInteger)AsLongDimIAsIntegerDimresultAsLongresult=1I=1DoWhileI=nIfresult21147483648#/IThen'**********FOUND**********result=result*II=I+1Elselblerr.Caption=溢出'**********FOUND**********jc=-1ExitFunctionEndIfLoopjc=resultEndFunctionPrivateSubForm_Click()MsgBoxjc(3)EndSub【程序改错】'题目：已知自然对数的底数e的级数表示如下:'e=1+1/1!+1/2!+1/3!+......+1/n!+.....'本程序利用函数过程fact()求e，其中绝对值小于'1E-8的项被忽略。PrivateFunctionfact(mAsInteger)AsSingleDimxAsSingle,iAsIntegerx=1Fori=1Tom'**********FOUND**********x=x*iNextifact=xEndFunctionPrivateSubForm_Click()DimeAsSingle,itemAsSingleDimnAsIntegere=1'**********FOUND**********n=0Don=n+1item=1/fact(n)e=e+item'**********FOUND**********LoopWhileitem=0.00000001Form1.Printe=;eEndSub【程序改错】'题目：在下面的程序段中过程pd可以判断任意三个数能'否构成三角形的三边，利用该过程的判定结果，'对能构成三角形的计算其面积，构不成的显示'不能构成三角形OptionExplicitPrivateSubForm_Click()'**********FOUND**********Dimx%,y%,z%,s!,bAsBoolean,hAsSinglex=InputBox(请输入三角形的边长，要求输入整数！)y=InputBox(请输入三角形的边长，要求输入整数！)z=InputBox(请输入三角形的边长，要求输入整数！)b=pd(x,y,z)h=(x+y+z)/2'**********FOUND**********IfbThens=Sqr(h*(h-x)*(h-y)*(h-z))Print三角形面积是;sElsePrint不能构成三角形EndIfEndSub'**********FOUND**********PublicFunctionpd(x%,y%,z%)AsBooleanIfx0Andy0Andz0Andx+yzAndx+zyAndy+zxThenpd=TrueElsepd=FalseEndIfEndFunction