1)изложите алгоритм 2)задумку 3) пояснительная записка : )( нужно все оень и развернуто, алгоритм- прямо по строчкам что ,как и зачем) var a: array[1..10, 1..10]of integer; i, j, min, max: integer; begin randomize(); min : = random(500); max : = min + random(500); write('[', min, ', ', max, ']'); for i : = 1 to 10 do begin writeln(); for j : = 1 to 10 do begin a[i, j] : = min + random(max - min); write(a[i, j]: 5); end; end; writeln(); for i : = 3 to 8 do begin writeln(); for j : = 3 to 8 do write(a[i, j]: 5); end; end.
Программа заполняет массив размером 10x10 случайными числами в диапазоне от 500 до 1000 ричем границы вычислаются в начале программы и больше не меняются из-за чего идёт ограничение на разброс чисел, не понятно задумка ли это или ошибка т.к нет текста задачи.
во второй части просто вывод части массива, в строку ..