Могу Помочь С 5-ым Номером. - (2,3) (6,3) (9,3) (12,1) (9,1) (7,1) (10,1) (5,3) (1,3) (12,1) (4,1) (6,3) (12,1) (3,3) (7,2) (2,1) (5,1) (3,3) (10,3) (4,2) (8,2) (12,1) (10,3) (12,1) (7,1) (7,2) (2,3) (1,1) (10,1) (12,1) (10,3) (9,3) (12,1) (6,1) (7,1) (10,1) (5,3) (1,3) (12,3)
4-ый номер - чётёщ лтчат ыгыт кёюлтёдлц.
или я хочу спать, или 4-тый номер странноватый •_•
F1-3, F2-4, F5-5, F4-1, F3-2?
закрыто окошком
Readln(n);
for i:=1 to n do
a[i]:=random(100); //тут можно ввести макс. значение для рандома
k:=n div 2;
for i:=1 to k do
begin
t:=a[i]; a[i]:=a[k-i+1]; a[k-i+1]:=t;
end;
inc(k);
for i:=k to n do
begin
t:=a[i]; a[i]:=a[n-i+1]; a[n-i+1]:=t;
end;
for i:=1 to n do
write(a[i],' ');
<span>writeln;
readln;
end.</span>