Блок-схемы

[kliuzhik]

Помогите сделать задание.
1. По представленным блок-схемам составить программу и проанализировать их работу.
2. Сделать трассировку программы (блок-схемы) для массива, состоящего из 5-7 элементов.
3. Сформулировать идею метода.
1.jpg
2.jpg

[Stilet]

Да тут ничего не видно же )
И кстати: Делать трассировку придется тебе самому в любом случае.

[kliuzhik]

Сообщение от Stilet

Да тут ничего не видно же )
И кстати: Делать трассировку придется тебе самому в любом случае.

Так лучше видно?
1.png

2.png

Сообщение от Stilet

Да тут ничего не видно же )
И кстати: Делать трассировку придется тебе самому в любом случае.

Мне самое главное первое )))

[Stilet]

Ниче не видно. Ладно. Телепатирую.
Сортировка пузырьком:

const n=0;
var i,j,x:integer; a:array[1..n] of integer;
begin
 for i:=1 to n do begin
  for j:=n downto i-1 do begin
    if a[j-1]>a[j] then begin x:=a[j];a[j]:=a[j-1]; a[j-1]:=x; end;
  end;
 end;

 for i:=1 to n do    write(a[j]:5);
 readln;
end.

Сортировка перестановкой:

var i,j,m,k,n:integer; a:array[1..100500] of integer;
begin
 readln(n); for i:=1 to n do begin readln(a[i]);

 for i:=1 to n-1 do begin m:=a[i]; k:=i;
  for j:=i+1 to n do    if m>a[j] then begin m:=a[j];k=j; end;
  a[k]=a[i]; a[i]=m;
 end;

 for i:=1 to n do write(a[j]:5);

 readln;
end.

Если ничего не напутал, ибо зрение -200 по F

[p51x]

Если ничего не напутал

В первой i от 2 же, иначе выйдет за границе, да и на блок-схеме от 2х

[Stilet]

Ну вот недобачаю... Картинки вырвиглазные.