Есть ответ 👍

Дана целочисленная матрица размера 5 на 5. найти минимальный элемент

205
394
Посмотреть ответы 2

Ответы на вопрос:

kavaii29
4,5(13 оценок)

Program min_elem;   var a: array[1..5,1..5] of integer;         min, i, j: integer; begin     {ввод матрицы}     for i: =1 to 5 do       for j: =1 to 5 do    read(a[i]);     {решение }      min: =a[1, 1];         for i: =1 to 5 do           for j: =1 to 5 do            if a[i,j] < min then min: =a[i,j];           write('min=', min)end.

Program z1; var mas: array[1..6] of integer; beginmas[1]: =2; mas[2]: =5; mas[3]: =8; mas[4]: =3; mas[5]: =1; mas[6]: =9; writeln(mas[4],',',mas[5],',',mas[6],',',mas[1],',',mas[2],',',mas[3],','); end.

Популярно: Информатика