[Bargest]

Не пойму, что надо. По какой переменной case? При каких значениях какая функция вызывается?
Общий вид:

Код:

case i of
1: InpuMatrix;
2: inputmatrix;

Только вот функции тут не за чем. Лучше процедуры, если сразу в глобальные переменные пишешь.

Код:

procedure InpuMatrix;
...
procedure inputmatrix;
...