基础会计学原理重点整理精编.docx
《基础会计学原理重点整理精编.docx》由会员分享,可在线阅读,更多相关《基础会计学原理重点整理精编.docx(15页珍藏版)》请在冰豆网上搜索。
基础会计学原理重点整理精编
会计学原理重点
会计等式:
资产=负债+所有者权益+收入-费用
会计科目按经济内容分类
一.资产类
库存现金银行存款应收票据应收账款预付账款应收股利应收利息
其他应收款材料采购原材料库存商品固定资产固定资产减值准备坏账准备累计折旧无形资产累计摊销待处理财产损溢商誉
二.负债类
短期借款应付票据应付账款预收账款应付职工薪酬应交税费应付利息
应付股利其他应付款长期借款应付债券
三.所有者权益类
实收资本资本公积盈余公积本年利润利润分配
四.成本类生产成本制造费用
五.损益类
费用类:
销售费用管理费用财务费用所得税费用营业外支出营业税金及附加主营业务成本其他业务成本(营业成本)资产减值损失
收入类:
主营业务收入其他业务收入(营业收入)营业外收入公允价值变动损益
书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)
SelectCaseC
Case"A"To"Z"
IAsc=IAsc+Key
'**********SPACE**********
IfIAsc>Asc("Z")ThenIAsc=IAsc-26
Code=Code+Chr(IAsc)
Case"a"To"z"
IAsc=IAsc+Key
'**********SPACE**********
IfIAsc>Asc("z")ThenIAsc=IAsc-26
Code=Code+Chr(IAsc)
CaseElse
Code=Code+C
EndSelect
NextI
EndFunction
PrivateSubCommand1_Click()
Text2=Code(Text1,2)
EndSub
【程序填空】
'题目:
将字符串S1反向输出
PrivateSubCommand1_Click()
Dims1AsString,s2AsString
s1="abcdef"
'**********SPACE**********
CallInvert(s1,s2)
Prints2
EndSub
PrivateSubInvert(ByValxstrAsString,ystrAsString)
DimtempstrAsString
DimiAsInteger
'**********SPACE**********
i=Len(xstr)
DoWhilei>=1
tempstr=tempstr+Mid(xstr,i,1)
i=i-1
'**********SPACE**********
Loop
ystr=tempstr
EndSub
【程序填空】
'题目:
程序功能:
在Text1,Text2,Text3中分别输入三个数字,
'在Text4中计算这三个数的和。
如果三个文本框的输入不
'为数字则显示错误提示
PrivateSubCommand1_Click()
DimaAsString,bAsString,cAsString
a=Trim(Text1.Text)
b=Trim(Text2.Text)
c=Trim(Text3.Text)
'**********SPACE**********
Ifche(a)Andche(b)Andche(c)Then
Text4.Text=Val(a)+Val(b)+Val(c)
Else
Text4.Text="存在非数字字符"
EndIf
EndSub
Functionche(xAsString)AsBoolean'若存在非数字字符,函数值为假
DimkAsInteger
DimsAsString
'**********SPACE**********
che=True
Fork=1ToLen(x)
s=Mid(x,k,1)
'**********SPACE**********
Ifs<"0"Ors>"9"Then
che=False
ExitFor
EndIf
Nextk
EndFunction
【程序改错】
''题目:
下列程序进行n阶乘运算,当阶乘的值超过21147483648
'溢出报错,并将结果输出为-1。
'**********FOUND**********
PrivateFunctionjc(ByValnAsInteger)AsLong
DimIAsInteger
DimresultAsLong
result=1
I=1
DoWhileI<=n
Ifresult<21147483648#/IThen
'**********FOUND**********
result=result*I
I=I+1
Else
lblerr.Caption="溢出"
'**********FOUND**********
jc=-1
ExitFunction
EndIf
Loop
jc=result
EndFunction
PrivateSubForm_Click()
MsgBoxjc(3)
EndSub
【程序改错】
'题目:
已知自然对数的底数e的级数表示如下:
'e=1+1/1!
+1/2!
+1/3!
+......+1/n!
+.....
'本程序利用函数过程fact()求e,其中绝对值小于
'1E-8的项被忽略。
PrivateFunctionfact(mAsInteger)AsSingle
DimxAsSingle,iAsInteger
x=1
Fori=1Tom
'**********FOUND**********
x=x*i
Nexti
fact=x
EndFunction
PrivateSubForm_Click()
DimeAsSingle,itemAsSingle
DimnAsInteger
e=1
'**********FOUND**********
n=0
Do
n=n+1
item=1/fact(n)
e=e+item
'**********FOUND**********
LoopWhileitem>=0.00000001
Form1.Print"e=";e
EndSub
【程序改错】
'题目:
在下面的程序段中过程pd可以判断任意三个数能
'否构成三角形的三边,利用该过程的判定结果,
'对能构成三角形的计算其面积,构不成的显示"
'不能构成三角形"
OptionExplicit
PrivateSubForm_Click()
'**********FOUND**********
Dimx%,y%,z%,s!
bAsBoolean,hAsSingle
x=InputBox("请输入三角形的边长,要求输入整数!
")
y=InputBox("请输入三角形的边长,要求输入整数!
")
z=InputBox("请输入三角形的边长,要求输入整数!
")
b=pd(x,y,z)
h=(x+y+z)/2
'**********FOUND**********
IfbThen
s=Sqr(h*(h-x)*(h-y)*(h-z))
Print"三角形面积是";s
Else
Print"不能构成三角形"
EndIf
EndSub
'**********FOUND**********
PublicFunctionpd(x%,y%,z%)AsBoolean
Ifx>0Andy>0Andz>0Andx+y>zAndx+z>yAndy+z>xThen
pd=True
Else
pd=False
EndIf
EndFunction