Много баллов! Задано натуральные числа n и x. Вывести на экран таблицу размером n на n, где на главной диагонали стоит число x, а на остальных местах *.
Пример: n=4, x=3. Должно выйти так :
3 * * *
* 3 * *
* * 3 *
* * * 3
Язык Pascal

var i,j, m,n,x:integer;beginreadln(m,n,x);for j:=1 to n dobeginfor i:=1 to m doend;if m=n thenbeginwrite ('x ');writeln();end;elsebeginwrite('* ');writeln();end;end.

Тут у меня ошибка. Не могу найти

A[i,j]:10:2 - вывод матрицы которую ты записываешь 10 - это целое число, 2 - это числа после запятой

array [1..n, 1..m] - записывается массив для матрицы. Проще даже не знаю как написать

Вот в этом и проблема

Ввод матрицы в ручнуюConst n = 5; m = 5; {n-строка, m-столбец} Var A: array [1..n, 1..m] of real;     i, j: integer; Begin   for i := 1 to n do for j := 1 to m do     begin       Write('A[', i, ', ', j, '] = ');       ReadLn(A[i,j])     end;   WriteLn('Исходный массив:');   for i := 1 to n do     begin       for j := 1 to m do Write(A[i,j]:10:2);       WriteLn     end;   Writeln('Главная диагональ массива А:');   for i :=1 to n do Write(A[i, i]:10:2);   WriteLn;   ReadLn; END.