Набор программ для управления работой компьютера называется?

Системное программное обеспечение

Ты объявила массив от 1 до 10, а в конце в цикле пытаешься обратиться к элементу с индексом 0!
 (for i:=0 to m do
begin for j:=0 to n do)
Ну и куча мелких недочетов еще тут есть

const
  n=5;
  m=6;
var
  a:array[1..n,1..m] of integer;
  i,j: integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
   begin
   for j:=1 to m do
     begin
     a[i,j]:=random(10);
     write(a[i,j]:4);
     end;
   writeln;
   end;
writeln('Измененный массив:');
for i:=1 to n do
   begin
   for j:=1 to m do
     begin
     if a[i,j]=0 then a[i,j]:=i+j;
     write(a[i,j]:4);
     end;
   writeln;
   end;
end.

Uses crt;
var b:array[1..100,1..100] of integer;
       r:array[1..100,1..100] of integer;
str,stb,i,j:integer;
Begin
randomize;
clrscr;
Writeln('Введите количество строк :  ');
Read(str);
Writeln('Введите количество Столбцов:  ');
Readln(stb);
writeln;
writeln('Matrica B');
For i:=1 to str do
begin
For j:=1 to stb do begin
b[i,j]:=random(30)+1;
r[i,j]:=2*b[i,j];
write(b[i,j]:3,'  ');
end;
writeln;
end;
writeln;
writeln('Matrica R');
for i:=1 to str do 
begin
for j:=1 to stb do
begin
write(r[i,j]:3,'  ');
end;
writeln;
end;
readln;
end.

Запускаем , и первом делом создаём двухмерный массив Введя числа(когда программа запросит) не превышающий числа 100  (Строки и столбцы) ... после как мы ввели числа создается массив заполняя массив случайными числами в диапазоне 1..30.. И выводим Массив B, после удваиваем каждый элемент и заносим удвоенный результат в масссив R, и тоже выводим