Напишите сообщение по инфе "среда исполнения"

Во втором прямоугольнике нужно написать "подойди к платью" и обвести эту рамку зеленым карандашом.
Нужно нарисовать стрелки вниз.
От треугольника в котором написано "остались платья?" нужно провести стрелку со словом "ДА" до второй черной стрелки(после фразы "выйди из шкатулки).Рамку "остались платья?" тоже надо обвести зелёным цветом.
Перед словом "конец" есть пустая рамка,там напиши "иди в шкатулку",а у стрелки которая ведёт к этой рамке нужно написать "НЕТ"
И последнее.От треугольной рамки с вопросом "все банты пришиты?" идёт стрелка вниз,рядом с ней напиши слово "ДА".И нужно самому провести стрелку до стрелки вниз от фразы "подойди к платью" и у новой стрелки написать слово "НЕТ"
Мы делали это в классе,в году поэтому должно быть правильно:)

Const
  nn=50; // максимальное количество учеников
var
  i,n,sm,sd,km,kd:integer;
  am,ad:real;
  var a:array[1..nn] of integer;
begin
  Write('Введите количество учеников: ');
  Read(n);
  Writeln('Введите рост учеников');
  sm:=0; sd:=0; km:=0; kd:=0;
  for i:=1 to n do
    begin
    Read(a[i]);
    if a[i]>0 then begin sd:=sd+a[i]; Inc(kd) end
    else begin sm:=sm-a[i]; Inc(km) end
    end;
  am:=sm/km; ad:=sd/kd;
  Write('Средний рост мальчиков (',am:0:1,') ');
  if am-ad<=10 then Write('не ');
  Writeln('превышает средний рост девочек (',ad:0:1,') ');
  Writeln('больше, чем на 10 см')
end.
   
Примерное решение

Введите количество учеников: 9
Введите рост учеников
-192 165 -174 179 -172 171 169 170 -170
Средний рост мальчиков (177.0) не превышает средний рост девочек (170.8)
больше, чем на 10 см