esat faho
ESAT66:=Input("HIGH-PERYOT : ",1,2000,100);
S1:=SAR(1.061800 ,1.61800) ;
Y1:=HHV(H,ESAT66);
Y2:=LLV(L,ESAT66);
B:=ValueWhen(1,C >S1 AND C>(H+L)/3,HHV(Y1,3))*1.009;
B1:=ValueWhen(1,C >S1 AND C>(H+L)/3,(Y1*0.886+Y2*0.114));
B2:=ValueWhen(1,C >S1 AND C>(H+L)/3,(Y1*0.764+Y2*0.236))...