Сказали что у меня не все пояснения к задаче, нужны пояснения к каждой строчке Program kursz5; uses crt; //Подключение модуля crt const n=10; const m=10; var //Описание переменных ...

Сказали что у меня не все пояснения к задаче, нужны пояснения к каждой строчке Program kursz5; uses crt; //Подключение модуля crt const n=10; const m=10; var //Описание переменных i,j,max,min:integer; a:array[1..n,1..m] of integer; //Ввод массива begin randomize; //Подключение датчика случайных чисел for i:=1 to n do //Ввод чисел для переменных массива for j:=1 to m do a[i,j]:=random(100); //Ввод случайных чисел max:= a[1,1]; min:= a[1,1]; for i:=1 to n do begin for j:=1 to m do begin if a[i,j] > max then max:= a[i,j]; //Вывод max элемента НЕ ПРАВИЛЬНО if a[i,j] < min then min:=a[i,j]; //Вывод min элемента write(a[i,j]:5); end; writeln; end; writeln(); writeln('max=',max,' min=',min); //Вывод max и min значений end.
Гость
Ответ(ы) на вопрос:
Гость
Program kursz5; //Название программы uses crt; //Подключение модуля crt const n=10; //Определение неизменяемых переменных const m=10; var //Описание переменных  i,j,max,min:integer; a:array[1..n,1..m] of integer; //(Ввод) Объявление массива begin randomize; //Подключение датчика случайных чисел for i:=1 to n do //Ввод чисел для переменных массива  for j:=1 to m do a[i,j]:=random(100); //Ввод случайных чисел max:= a[1,1]; //Присвоение к max элементах [1,1] min:= a[1,1]; //Присвоение к min элементах [1,1] for i:=1 to n do  //Будем делать пока i < n begin for j:=1 to m do //Будем делать пока i < m begin if a[i,j] > max then  // если элемент массива больше max будем делать что ниже max:= a[i,j]; //(Вывод max элемента НЕ ПРАВИЛЬНО) Здесь происходит присвоение к переменной max, Но никак не вывод if a[i,j] < min then  //если элемент массива меньше min будем делать следующее min:=a[i,j]; //(Вывод min элемента) Тоже самое, здесь присвоение к переменной min write(a[i,j]:5); - Здесь уже вывод end; writeln;  end; writeln();  writeln('max=',max,' min=',min); //Вывод max и min значений end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы