Определить что распечатает следующая программа ну или ещё хоть что нибудь решите из фото❤️❤️

4) Там даже ошибка var a:[1..5, 1..5] of integer; Нужно var a: array [1..5, 1..5] of integer;B результате будет матрица: 1 0 0 0 00 1 0 0 00 0 1 0 00 0 0 1 00 0 0 0 1