Создать матрицу

[Chertenok666]

Уважаемые программисты помогите пожалуйста написать код по созданию матрицы размерностью 5 на 5

[Alex Cones]

Статья (моя): http://www.programmersforum.ru/showthread.php?t=70310

[ОДИНОЧЕСТВО В СЕТИ]

код по созданию матрицы размерностью 5 на 5

for i:=1 to 5 do
for j:=1 to 5 do
a[i,j]:=random(20);{при ручном ввводе заменить на readln(a[i,j];)}

[Chertenok666]

Извините за может глупый вопрос(просто вообще не понимаю в этом) мы работаем в делфи ,начало кода есть, выглядит так

procedure TForm1.Button1Click(Sender:TObject) ;
var a: array [1..5,1..5] of integer;
i,j: integer;
begin
Button1.Visible:=false;
for i:=1 to 5 do
for j:=1 to 5 do
и вот дальше пролемка возникла не знаю что написать

[ОДИНОЧЕСТВО В СЕТИ]

а допиши

a[i,j]:=random(20);

[Chertenok666]

А что значит этот оператор random и число 20 в скобках?

[Chertenok666]

И оно не работает

[ОДИНОЧЕСТВО В СЕТИ]

А что значит этот оператор random и число 20 в скобках?

это значит заполнение случайными числами от 0 до 19
а чтоб не возникало подобных вопросов -выделяйте неизвестное слово и жмите F1

И оно не работает

а как вы это определили?

[Chertenok666]

Набрала код в делфи...не выводится матрица на форму

[ОДИНОЧЕСТВО В СЕТИ]

не выводится матрица на форму

а где вы в коде её туда выводите?