Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

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  ричем границы вычислаются в начале программы и больше не меняются из-за чего идёт ограничение на разброс чисел, не понятно задумка ли это или ошибка т.к нет текста задачи.

во второй части просто вывод части массива, в строку ..