有多少爱你的人_人生感悟
您当前位置： >>
有多少爱你的人
发布:&|&分类:&|&
　　有多少爱你的人　　文/周礼　　有一次，&股神&沃伦&来到一所大学演讲，刚刚结束，就有一位学生迫不急待地问：&尊敬的巴菲特先生，您认为什么样的人生才是真正的？&这位学生猜想，巴菲特一定会回答，是辉煌的事业。但出乎意料的是，巴菲特的回答完全跟事业和财富没有关系，他微笑着说：&很多人认为，衡量一个人成功的标准就是看他旗下拥有多少上市公司，看到银行账户里拥有多少钱，而事实上，当你们到了我这个年纪时，就会发现，衡量自己成功的标准，不是看账户里的数字，而是看有多少人在真正关心你、爱你。&　　还有一次，一位中国记者问巴菲特：&你认为，财富等同于快乐和幸福吗？&巴菲特回答说：&不！不！不！财富与快乐并不成正比，只有爱与快乐才成正比。如果这个世界上有很多人爱你，那么你就是一个快乐的人，幸福的人。要是让我在200亿美元与爱我的20个人之间作一个选择，那么我会毫不犹豫地选择爱我的那20个人。&　　原来，在巴菲特的眼里，爱胜过了世间的一切，包括《福布斯》排行榜和他一手打造的商业帝国。巴菲特的谈话不禁让我想起了那些古代帝王，虽然他们一生叱诧风云，拥有至高无上的权利和地位，但他们的生活过得并不轻松，并不快乐，常常是孤家寡人一个。纵有后宫佳丽三千，但有多少人是真心诚意？纵有子嗣无数，但有多少人不是奔着皇权？纵有臣子万千，但有几个人能推心置腹？当繁华落幕，剩下的只有孤独与惆怅，身边竟没有几个真正关心自己的人。这样的人生，也许算不上成功的人生。　　然而，在今天这个市场经济时代，不少人把赚钱当作了自己人生的首要目标，认为有钱才会拥有一切。为了追求财富，有的人放下了尊严，放弃了家庭，对父母不闻不问，对他人漠不关心，甚至以身试法，不择手段，而到头来又得到了什么呢？爱是一个温暖的字眼，只有历经了岁月的洗涤和沉淀后，才会真正明白，自己到底需要什么。正如韦唯所唱：&在没有心的沙漠，在没有爱的荒原，死神也望而却步。&　　一个人成就的大小，不完全取决于金钱和事业，而在于你一生之中，善待过多少人，帮助过多少人，有多少人怀念你，有多少人感激你。对于商家而言，账本记录了收入与支出的状况，两数相减，便是盈利。而对于人生而言，账本记录了爱与被爱的状况，两数相加，就是成就。每逢夜深人静时，我们不妨扪心自问，我们爱过多少人？除父母之外，又有多少人在真正关心我们？　　尽管钱对我们的生活很重要，但它并不代表一切，我们要始终坚信，有爱才会有希望，有爱才会有未来，有爱才会有幸福。因此，我们在追求事业与财富的同时，不妨时不时地停下来，看看自己身边的人，并给予他们关心和帮助。
你可能感兴趣的文章:
本站为你推荐的文章:
本文标题:本文地址:
Powered By ZBlog | 鄂ICP备号-3 |在excel中如何计算1至33中任意6个数相加其和为100有多少组数据_百度知道
在excel中如何计算1至33中任意6个数相加其和为100有多少组数据
这是“子集和”问题 可用VBA编程求解，结果是19995组。
其他类似问题
为您推荐：
您可能关注的推广
excel的相关知识
其他1条回答
excel中自己编程可以求
要详细的数据。
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁19995年公历4月19日农历是多少？_百度知道
19995年公历4月19日农历是多少？
我是 1995年阴历4月19日的
但是我一直都不知道自己阳历是多少 ，我想确定自己的 星座
提问者采纳
亲，阴历1995年四月十九日阳历日(星期四)星座是金牛座 4月20日-------5月20日
其他类似问题
为您推荐：
4月19日的相关知识
其他1条回答
农历3月十九
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁1-33个数字,选6个数加起来等于114,有多少组这样的数?最好能列出来~谢数字不分前后,不能重复_百度作业帮
1-33个数字,选6个数加起来等于114,有多少组这样的数?最好能列出来~谢数字不分前后,不能重复
1-33个数字,选6个数加起来等于114,有多少组这样的数?最好能列出来~谢数字不分前后,不能重复
这也太多了19995组核心是如何把33个数中取3个的所有组合都搞出来.Private Sub Command5_Click()Dim a(1 To 6) As Integerk = 6: duoshao = 0For i = 1 To 6: a(i) = i: NextDohe = 0For i = 1 To 6: he = he + a(i): NextIf he = 100 ThenFor i = 1 To 6: Text1.Text = Text1.Text + Str(a(i)) + " ": NextText1.Text = Text1.Text + vbCrLfduoshao = duoshao + 1Me.Caption = Str(duoshao)Me.RefreshDoEventsEnd Ifa(6) = a(6) + 1Dok = 7For i = 1 To 6
If a(i) = i + 28 Then
If i = 1 Then
a(i - 1) = a(i - 1) + 1: a(i) = 0
End If Next
If k = 7 Then Exit DoLoopIf k = 0 Then Exit DoFor i = 1 To 6If a(i) = 0 Then a(i) = a(i - 1) + 1NextLoopEnd Sub运行后得到答案: 19995 这是一部分答案1
30以此类推}