3.const n=10; var a:array [1..n] of integer; i,max,min,imax,imin:integer; begin min:=100; max:=1; write(' Исходный массив: '); for i:=1 to n do begin a[i]:=random(100) 1; if a[i] > max then begin max:=a[i]; imax:=i end; if a[i] < min then begin min:=a[i]; imin:=i end; write(a[i]:3,' ') end; writeln; a[imax]:=min; a[imin]:=max; write('Полученный массив: '); for i:=1 to n do write(a[i]:3,' ') end.4.const n=10; var a:array [1..n] of integer; i,v:integer; begin write(' Исходный массив: '); for i:=1 to n do begin a[i]:=random(100) 1; write(a[i]:3,' ') end; writeln; for i:=1 to 5 do begin v:=a[i*2-1]; a[i*2-1]:=a[i*2]; a[i*2]:=v end; write('Полученный массив: '); for i:=1 to n do write(a[i]:3,' ') end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
