Пожалуйста,помогите решить задачи на Pascale!
1)Составить программу вычисления в двумерном массиве минимального элемента, его номера и замены его на 100
2)Записать в файл последовательность доступа n действительных чисел. Найти разность первого и последнего компонентов файла
3)Составить программу, удаляющую из предложения букву "Е"

const n=7; m=8;Var a:array[1..n,1..m] of integer;i,j,x,y,min:integer;beginfor i:=1 to n do beginfor j:=1 to m do begina[i,j]:=random(21)-10;write(a[i,j]:4);end;writeln;end;min:=a[1,1];x:=1;y:=1;for i:=1 to n dofor j;=1 to m do if a[i,j]<min then beginmin:=a[i,j];x:=i;y:=j;end;writeln ('минимальный элемент=',min,' он находился: ',x,',',y);a[x,y]:=100;for i:=1 to n do beginfor j:=1 to n do write (a[i,j]:4);writeln;end;end.3.Var s:string;i:integer;beginwriteln('Введи строку');readln (s);for i:=1 to length(s) doif (s[i]='Е') or (s[i]='е') then delete(s,i,1);writeln(s);end.