标题：百鸡百钱
百鸡百钱
  我国古代数学家张丘建在《算经》一书中提出了“百鸡问题”：鸡翁一值钱五，鸡母一值钱三，鸡雏三值钱一。百钱买百鸡，问鸡翁、鸡母、鸡雏各几何？
详解
答：鸡翁一值钱五——公鸡五文一只，而百钱买百鸡（100文钱买鸡），所以公鸡数量要至少小于20。
解：设母鸡x只，公鸡y只，小鸡（100-x-y）只，
所以3x+5y+(100-x-y)/3=100
且x，y为整数，所以可以得出正确答案：
化简：9x+15y+(100-x-y)=300
有三种情况符合要求：
1.公鸡4只，母鸡18只，小鸡78只
2.公鸡8只，母鸡11只，小鸡81只
3.公鸡12只，母鸡4只，小鸡84只
水仙花数
clear
for m=100 to 999
a=m%10
b=int(m/100)
c=int(mod(m,100)/10)
if m=a^3+b^3+c^3
?m
endif
endfor
return
一元二次方程（所有的情况均在内）
set talk off
clear
input'a='to a
input'b='to b
input'c='to c
if a=0
if b=0
?'此方程无解'
else
x=-c/b
?此方程有单根：',x
endif
else
delt=b^2-4*a*c
if delt<0
? '此方程无实根'
else
r=sqrt(delt)
x1=(-b+r)/(2*a)
x2=(-b-r)/(2*a)
?'此方程的根为：',x1,x2
endif
endif
return
百元百鸡
set talk off
for x=0 to 33
for y=0 to 50
if 3*x+2*y+0.5*(100-x-y)=100 then
?x,y,100-x-y
endif
endfor
endfor
3文一公鸡,2文一母鸡,1文3小鸡
var
a,b,c:integer;
begin
for a:=1 to 100 do
for b:=1 to 100 do
for c:=1 to 100 do
if(c mod 3=0)and(a*3+b*2+c div 3=100)and(a+b+c=100)
then writeln(a:4,b:4,c:4)
end.
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer, i As Integer
For a = 1 To 100
For b = 1 To 100
For c = 1 To 100
If a + b + c = 100 And a * 5 + b * 3 + c * 0.5 = 100 Then
i = i + 1
End If
Next c
Next b
Next a
msgbox "有"+ i + "个方案"
End Sub
我国古代数学家张邱建编《张邱建算经》中记有有趣的数学问题：“今有鸡翁一，值钱五；鸡母一，值钱三；鸡雏三，值钱一。凡百钱，买鸡百只，问鸡翁、母、雏各几何？”用QBASIC程序解此问题。
有一种思路，即：
公鸡（鸡翁）不能超过20只，母鸡不能超过33只，小鸡不能超过300只。所以只要用3个计数变量控制循环即可。
rooster=1
hen=1
chick=1
DO
DO
DO
money = rooster*5 + hen*3 + chick/3
IF money = 100 THEN
PRINT rooster, hen, chick
END IF
chick=chick+1
LOOP UNTIL chick>300
hen = hen+1
chick = 1
LOOP UNTIL hen> 33
rooster = rooster+1
hen = 1
LOOP UNTIL rooster>20
END
另一个注脚就是题中的隐含条件，鸡雏一定是3的倍数，那么鸡雏就应该是3为步进值而不是1。事实上鸡雏的循环最多也只有101次，考虑0的情况。但既是百钱买百鸡，鸡雏的个数绝不可能超过一百只。而且三者的总和是100。以上程序只要两个循环就够了。
rooster=0
DO
hen=0
DO
money = rooster*5 + hen*3 + (100-rooster-hen)/3
IF money = 100 THEN
PRINT rooster, hen, (100-rooster-hen)
END IF
if money >100 then
rooster=rooster+1
hen=0 //这儿让其重新循环开始。
end if
hen = hen+1
LOOP UNTIL hen>33
rooster = rooster+1
LOOP UNTIL rooster> 19
END

简介
个体之间在进行交往时通常保持的距离。这种距离受到个体之间由于相容关系不同而产生的情感距离的影响。人类学家霍尔认为“人际距离”可区分为4种：[1]
一、亲密距离（0-18英寸，相当于0~0.5米），通常用于父母与子女之间、情人或恋人之间，在此距离上双方均可感受到对方的气味、呼吸、体温等私密性刺激。   
1.密切距离─接近型（0.15米）
这是为了爱抚、格斗、安慰、保护而保持的距离，是双方关系最接近时所具有的距离。这时语言的作用很小。   
2.密切距离─较近型（0.15~0.45米）
这是伸手能够触及到对方的距离。是关系比较密切的同伴之间的距离；也是在拥挤的电车中人与人之间不即不离的距离。 
二、个人距离（1.5~4英尺，相当于0.45~1.2米），一般是用于朋友之间，此时，人们说话温柔，可以感知大量的体语信息。
三、社会距离（4-12英尺，相当于1.2~3.5米），用于具有公开关系而不是私人关系的个体之间，如上下级关系、顾客与售货员之间、医生与病人之间等。  
四、公众距离（12-25英尺，相当于3.5~7.5米），用于进行正式交往的个体之间或陌生人之间，这些都有社 会的标准或习俗。这时的沟通往往是单向的。 
1、公众距离─接近型（3.6~7.5米）
如果保持4米左右的距离，说明说话人与听话人之间有许多问题或思想待解决与交流。
2、公众距离─远离型（7.5米以上）
这是讲演时采用的一种距离，彼此互不相扰。
如能将以上8种距离铭记在心，就能准确、顺利地判断出你与对方所处的关系与密切程度。
研究
肢体语言丰富多彩
从表面上看，这同体育的身体活动手段似乎相同，实际上它们之间仍然存在差别:舞蹈以身体活动来表现生活及表达和抒发情感，因而舞蹈这种身体活动具有“语言”功能，称为肢体语言。
早在查尔斯·达尔文开始研究肢体语言之前，1872年他就曾写过一篇题为《人和动物情感表达》的文章。他认为能读懂肢体语言无论对学习和工作都很有用。国际上著名的心理分析学家、非口头交流专家朱利乌斯·法斯特曾写道：很多动作都是事先经过深思熟虑，有所用意的，不过也有一些纯属于下意识。比如说，一个人如果用手指蹭蹭鼻子下方，则说明他有些局促不安；如果抱住胳臂，则说明他需要保护。 
根据相关研究，一个人向外界传达完整的信息，单纯的语言成分只占7%，而55%的信息都需要由非语言的体态来传达。同时因为肢体语言通常是一个人下意识的举动，它也很少具有欺骗性，所以在想了解他人的心理状况时，肢体动作是一个很好的参考工具。
现象 
人类学家观察发现，人与人之间在面对面的情境中，常因彼此间情感的亲疏不同，而不自觉地保持不同的距离：最亲密的人，彼此间可以接近到0.5 米；有私交的朋友间，彼此可以接近到0.5—1.25米；一般公共场所的陌生人之间沟通时，彼此间的距离，通常维持在三米以上。此种因情感亲疏而表现的人际间距离的变化，在心理学上称为人际距离（interpersonal distance）。
显然，人际距离的变化，是由双方当事人沟通时，在肢体语言上的一种情感性的表示；彼此熟悉者，就亲近一点，彼此陌生时，就保持距离。如一方企图向对方接近，对方将自觉地后退，仍然维持相当的距离。