Заполни таблицу. Алгоритм движения робота по квадрату

Презентации сделанные на компьютере значительно облегчают жизнь делового человека.Чаще всго люди используют их для того ,чтобы "донести" до людей определенную информацию.это происхдит потому ,что человек лучше всео воспринимает зрительную информацию ,и глядя на экран достаточно ясно понимает ,то что ему хотят объяснить.Поэтому в школах часто ученики делают свои проэкты с презентаций.это легко ,быстро,надежно и качественно.раньше для того чтобы сделать проэкт школьником приходилось часами просиживать за столом ,вырезая,клея,рисую тллюстрации к проэктам,чтобы хоть как-то сделать свое выступление понятным.время изменилось.и благодаря компьютерам ,мы все это проделываем за секунды.и работа на которую уходило огромное количеств времени выплняется за час.презентаци  важныне только для школьников.например, мои знакомые использут презентации для рзрроботки бизнес-плана.можно сделать вывод ,что презентации являют одним из главных компонентов нашей современной жизни

//Pascal ABC.NET v3.1 сборка 1219

Const
 n=5;

Var
 ar:array[1..n] of real;
 i,maxi,mini:integer;
 s,min,max:real;
begin
 randomize;
 min:=2147483647;
 max:=-2147483648;
  writeln('First array:');
  for i:=1 to n do
   begin
    ar[i]:=random(30);
    write(ar[i]:6);
    if ar[i]>max then
     begin
      max:=ar[i];
      maxi:=i;
     end;
    if ar[i]<min then
     begin
      min:=ar[i];
      mini:=i;
     end;
     s:=s+ar[i];
   end;
 s:=s/n;
 ar[maxi]:=ar[maxi]-maxi;
 ar[mini]:=ar[mini]+s;
 writeln;
 writeln('Final array:');
 for i:=1 to n do
  write(ar[i]:6);
end.