Question

нц для  i от 0 до 10
А[i]:=i
кц


нц для  i  от 0 до 4 
К:=A[t]
A[i]:=A[10i]K
A[10i]:=K
кц
 перевести это на язык паскаля и решить.РЕБЯТ СРОЧНО

Answer 1

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;