Объясните пожалуйста, что означает эта строка WRITE('ВВЕДИTE ЭЛЕМЕНТ МАССИВА '); READLN(MAS[1])?

PROGRAM PRG_1;
CONST М = 100;
VAR MAS : ARRAY[1..M] OF INTEGER;
I, MAX, K, N : INTEGER;
BEGIN
WRITE('BBEДИTE РАЗМЕР МАССИВА N = ');
READLN(N);
WRITE('ВВЕДИTE ЭЛЕМЕНТ МАССИВА ');
READLN(MAS[1]);
MAX := MAS[1];
K:= 1;

В строке WRITE('BBEДИTE РАЗМЕР МАССИВА N = ');READLN(N);я уже понял, что пользователь должен ввести размер массива, а по условию задачи надо найти значение максимального элемента.

А вот строки
WRITE('ВВЕДИTE ЭЛЕМЕНТ МАССИВА ');
READLN(MAS[1]);
MAX := MAS[1];
K:= 1;
мне не совсем понятны.

Далее, после того как ввели размер массива, ну например, ввели 98. С такой вводной нетрудно догадаться, что максимальный элемент и будет 98, а не 50, к примеру, а что значит WRITE('ВВЕДИTE ЭЛЕМЕНТ МАССИВА '); а затем READLN(MAS[1]); и MAX := MAS[1]; что это за 1 в двух этих строках? потом заканчивается K:= 1;, что вообще ввело меня в недоумение. Если нетрудно подскажите пожалуйста. А то я не могу разобраться, в учебниках расписано очень сжато, а детально никто не объясняет. Если 98 максимальный элемент, то зачем вводить еще элемент массива, максимальный элемент и непонятное K:= 1;???