ВТОРНИК, 15 Сен 2020 ответить на вопрос в тетради. Какие улучшения можно внести в конструкцию школьного стола, чтобы повысить его потребительские качества?

173

475

Посмотреть ответы 1

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

Kira1574

Информатика

4,5(64 оценок)

Const n = 3; m = 4; var a: array[1..n,1..m] of integer; i,j,imin,jmin: integer; begin randomize; imin: =1; jmin: =1; writeln('исходный массив: '); for i: = 1 to n do begin for j: = 1 to m do begin a[i,j]: =random(76)-30; if a[i,j] < a[imin,jmin] then begin imin: =i; jmin: =j end; write(a[i,j]: 3,' ') end; writeln; end; writeln('min = a[',imin,',',jmin,'] = ',a[imin,jmin]); end. исходный массив: -11 -3 -16 44 -1 -10 38 -20 33 -22 17 10 min = a[3,2] = -22