Нц для i от 0 до 10 а[i]: =i кц нц для i от 0 до 4 к: =a[t] a[i]: =a[10i]k a[10i]: =k кц перевести это на язык паскаля и решить.

for i := 0 to 10 do
  А[i]:=i;

for i := 0 to 4 do
begin
  К := A[t];
  A[i] := A[10 * i] * K;
  A[10 * i] := K;
end;