Помогите, пожалуйста, составить программу в ПАскаль абс и блок-схему: В заданной целочисленной квадратной матрице заменить нулями минимальные элементы каждой строки

Помогите, пожалуйста, составить программу в ПАскаль абс и блок-схему: В заданной целочисленной квадратной матрице заменить нулями минимальные элементы каждой строки
Гость
Ответ(ы) на вопрос:
Гость
//PascalABC.NET 3.2 сборка 1318 Const  n=3;  m=2; Var   ma:array[1..n,1..m] of integer;   i,j,min:integer; begin for i:=1 to n do begin min:=integer.MaxValue;   for j:=1 to m do     begin       readln(ma[i,j]);       if ma[i,j]
Не нашли ответ?
Ответить на вопрос
Похожие вопросы