Нужна в решение задачи. Задача в файле.

Program Project1;

var m:array [0..14] of integer; i:integer;

function IsPositive(a:integer):boolean;
begin
  result:=(a>-1);
end;

procedure work;
var min, max, count:integer;
begin
  count:=0;
  min:=m[0];
  max:=0;
  for i:=0 to 14 do begin
    if IsPositive(m[i]) then begin
      inc(count);
      if m[i]>max then max:=m[i];
      if m[i]<min then min:=m[i];
    end;
  end;
  writeln('MAX: ', max);
  writeln('MIN: ', min);
  writeln('Count: ', count);
end;

begin
  for i:=0 to 14 do begin
    write('n: ');
    readln(m[i]);
  end;

  work;

  readln;
end.

1) Это кнопки, иконки, поля ввода. Кнопки нажимаются, в поля вводится текст.
2) В Windows -строка заголовка – верхняя строка окна, в которой находится имя программы или имя окна; 
кнопка сворачивания окна; 
кнопка восстановления окна 
кнопка закрытия окна 
кнопка системного меню 
строка меню 
панель инструментов 
полосы прокрутки 
рабочее поле 
строка состояния 
рамка окна. 
Вроде все.
3) 1. System 32. Рабочий стол.
2. Мой компьютер, Мои документы, Корзина, Сетевые окружения(Сеть) и управляющие объекты Windows.
4) 1. Иконки, панель задач, папки
2. Ярлык это ссылка на файл, который может находиться где угодно на ПК, а значок это сам файл
3. На панели задач располагается запущенные приложения, панель быстрого доступа, часы... .
4. Папка "Мой компьютер"
5) Ярлык дает ссылку на значок,который запускает.
6) Пуск,панель задач,программы в фоновом режиме,задачи или все, что ты туда поместишь.