4. Составьте по следующей программе блок-схему и поясните ее функциональное назначение. For i:=1 to 40 do begin
A[i]:=random(100);
Writeln(‘number’, i, ‘ element array’, a[i]
End;
For i:=1 to 20 do begin
P:=a[i]; a[i]:=a[40-i+1]; a[40-i+1]:=p
End;
A[i]:=random(100);
Writeln(‘number’, i, ‘ element array’, a[i]
End;
For i:=1 to 20 do begin
P:=a[i]; a[i]:=a[40-i+1]; a[40-i+1]:=p
End;
More Questions From This User See All