Заменить в символьном массиве заданную букву на символ «_» - PascalABC.NET

Формулировка задачи:

Дан одномерный массив, который содержит не более 60 английских букв. Получить новый массив, в котором данная буква заменена на символ «_». Использовать процедуры и функции пользователя. Я ещё не всё понимаю, поэтому можно с поясняющими записями? Буду очень признателен.

Решение задачи: «Заменить в символьном массиве заданную букву на символ «_»»

Листинг программы

const
  n = 60;
 
var
  a, b: array  [1..n] of char;
  i: integer;
  ch: char;
 
begin
  write('Введите букву: ');  readln(ch);
  for i := 1 to n do
  begin
    a[i] := chr(random(65, 90));
    write(a[i]:2)
  end;
  writeln;
  for i := 1 to n do
  begin
    if a[i] = UpCase(ch) then
      b[i] := '_'
    else
      b[i] := a[i];
    write(b[i]:2)
  end;
  
end.

Объяснение кода листинга программы

В этом коде происходит следующее:

Вводится буква, которую нужно заменить в массиве.
Массив a заполняется случайными заглавными буквами от A до Z.
Выводится на экран содержимое массива a.
Массив b инициализируется как копия массива a.
Происходит замена буквы в массиве b на символ _, если встречена буква, равная введенной букве (без учета регистра).
Выводится на экран содержимое массива b.