clearset talk offinput "a=" to ainput "b=" to binput "c=" to ck=0if a<=0 or b<=0 or c<=0k=k+1endifif a+bk=k+1endifif k=0p=(a+b+c)*0.5s=sqrt(p*(p-a)*(p-b)*(p-c))? selse? "不满足三角形条件＂endifreturn
