Сортировка массивов. Визуализация. Программа на языке Pascal ABC.

Школьная конференция по информатике. Программа визуализации сортировки массива.

Учитель: Викторов Борис Юрьевич, школа 10, г. Дубна, Московская область.

Одной из самых сложных тем по программированию для 9 класса является сортировка массивов. Как показывает практика, в средней школе многим детям сложно понять суть этой темы. Для того, чтобы более доходчиво донести материал, предлагаю использовать визуализацию сортировки массивов.

Ниже приведена программа на языке PascalABC которая наглядно показывает, как работает метод «пузырька».

Программу можно использовать как для демонстрации детям на уроке, так и в качестве задания повышенной сложности для одарённых детей.

Также с этим проектом можно выступать на школьной конференции, а также на городском или более высоком уровне.

uses graphABC;

var i : integer;

m : array [1..10] of integer;

f : boolean;

procedure DrawMas; //РИСОВАНИЕ МАССИВА

var x_m,y_m,ots,n,l : integer;

Begin

x_m:=WindowWidth; y_m:=WindowHeight; ots:= 30; n:=10;

l:= round((x_m - 2*ots)/n);

for var j:= 1 to n do begin

setbrushcolor(ClBlue);

Rectangle(ots+(j-1)*l, 400-m[j]*3,ots+ j*l,400);

end;End;

Begin

for i:= 1 to 10 do m[i]:=random(100);

writeln(m);

Repeat

f:=false;

for i:= 1 to 9 do begin

if m[i]m[i+1] then begin

swap(m[i],m[i+1]);

f:=true;

end;

end;

clearwindow;

DrawMas; //Запуск процедуры рисования, которая описана выше.

sleep(1000);

Until f=false;

writeln(m);

End.

Результат работы программы:

После завершения сортировки можно увидеть массив данных в левом верхнем углу программы. Высота столбцов соответствует величине элемента массива.