siemensplcSTEP7scl十个数排序并求算术平均值

//////////////////////////////////////////////////////////////////////////////十个数排序并求算术均匀值（去最大最小值）//////////////////////////////////////////////////////////////////////////////FUNCTION_BLOCKFB12BlockParametersVAR_INPUTin1,in2,in3,in4,in5,in6,in7,in8,in9,in10:INT;END_VARVAR_IN_OUTI/OParametersEND_VARVAR_OUTPUTout1,out2,out3,out4,out5,out6,out7,out8,out9,out10:INT;out_max,out_min:INT;average:INT;END_VARVAR_TEMPEND_VARVARChin:ARRAY[1..10]OFINT;i,j,k:INT;1/4temp,total:INT;END_VARBEGINChin[1]:=in1;Chin[2]:=in2;Chin[3]:=in3;Chin[4]:=in4;Chin[5]:=in5;Chin[6]:=in6;Chin[7]:=in7;Chin[8]:=in8;Chin[9]:=in9;Chin[10]:=in10;out_max:=Chin[1];out_min:=Chin[1];total:=0;FORi:=10TO1BY-1DO//冒泡排序FORj:=1TOi-1BY1DOIFChin[j]out_maxTHENout_max:=Chin[k];//求最大值END_IF;IFChin[K]