این کد بعد از بهینه سازی جوابش چی میشه؟For i:=1 to 20 doA[i*2]:=i*2;For j:=1 to 20 doA[j*2-1]:=-j*2;For k:=1 to 20 doB[k]:=A[50+k];