Подскажите что не так(Паскаль)

Дано: с клавиатуры вводятся два целых числа – М и К. 1<M<10, 1<K<10. (М – число строк, К – число столбцов)
Требуется: сгенерировать матрицу размерности М х К из случайных целых чиселиз интервала [-100, 80].
Вывести её на экран в отформатированном табличном виде.
Определить и вывести на экран максимальный и минимальный по модулю элементы матрицы.
Определить и вывести на экран индексы (номера строк и столбцов) найденных элементов матрицы.
Генерацию, обработку и вывод матрицы производить с помощью двух вложенных циклов. Внешний цикл – for, внутренний – while.

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
Grids;

type

{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
Memo2: TMemo;
StringGrid1: TStringGrid;
private
{ private declarations }
public
{ public declarations }
end;

var
x: array [1..m,1..k] of integer;
i, j: byte;
m, k: byte;
// z: x;
// : of byte;
Form1: TForm1;

implementation

{$R *.lfm}

begin
x: array [1..m,1..k] of integer;
m :=StrtoInt(Edit1.Text);
m :=StrtoInt(Edit2.Text);
//Memo1: TMemo:=z;
// maxmod, minmod, : of Integer;

randomize;

x [i,j]:= random(79)-100;

for i :=1 to m do begin;
for j :=1 to k do;
write (x[i,j]:5);

//Memo2.Text := InttoStr(z);

end.

Компиляция проекта, цель: project1.exe: Код завершения 1, ошибок: 4
unit1.pas(29,19) Error: Identifier not found "m"
unit1.pas(29,20) Error: Can't evaluate constant expression
unit1.pas(29,24) Error: Identifier not found "k"
unit1.pas(29,25) Error: Can't evaluate constant expression

Среда разработки Lazarus


Я только начал учить! Что не так с Identifier?