Програмування мова паскаль

У двовимірному масиві
H[1..5,1..6] всі від’ємні елементи
замінити на їх модулі і вивести
новий масив на екран дисплея.

Uses GraphABC;procedure P1(x,y:integer);begincircle(x,y,10);floodfill(x,y,clyellow);ellipse(x-15,y+10,x+15,y+70);floodfill(x,y+20,clyellow);line(x,y+70,x-15,y+100);line(x,y+70,x+15,y+100);end;procedure P2(x,y:integer);begincircle(x,y,10);floodfill(x,y,clyellow);ellipse(x-15,y+10,x+15,y+70);floodfill(x,y+20,clyellow);line(x,y+70,x,y+100);end;var x,y,i:integer;beginx:=40;y:=100;i:=1;repeat LockDrawing; ClearWindow(clgreen); setpenwidth(3);  if odd(i) then P1(x,y)  else P2(x,y); setpenwidth(10);  line(0,y+100,windowwidth,y+100); Redraw; Sleep(500); x:=x+5; i:=i+1;until x>=windowwidth-20;end.

Объяснение:

формировать понятие "сортировка информации"; рассмотреть виды сортировок; познакомить с алгоритмом простой и вложенной сортировок; научить сортировать данные в Microsoft Access; формировать умение работать с конструктором запросов; развивать навыки по заполнению и редактированию базы данных.

Развивающие: развивать алгоритмическое и логическое мышление; развивать умение работать в группе; развивать умение анализировать результаты своей работы.

Воспитательные: Воспитывать чувства коллективизма, ответственности, аккуратности.

думаю правильно