Double A[3][4];
int i,j;
double min;
for(i = 0; i < 3; i++)
for(j=0;j<4;j++)
cin>>A[i][j];
min=A[0][0];
for(i = 0; i < 3; i++)
for(j=0;j<4;j++)
if(A[i][j] < min) {min=A[i][j];}
cout<<min;
Не забывай про лучший ответ.
// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
begin
var a:=ArrRandom(ReadInteger('n='),-99,99);
a.Println;
a.SortedDescending.Println;
end.
<u><em>Тестовое решение</em></u>
n= 17
-38 37 -82 54 62 -28 33 37 -61 63 -66 63 -81 -63 3 38 12
63 63 62 54 38 37 37 33 12 3 -28 -38 -61 -63 -66 -81 -82
Ответ:
<em>у</em><em>д</em><em>а</em><em>л</em><em>и</em><em>т</em><em>ь</em>
Объяснение:
<em>н</em><em>а</em><em>з</em><em>н</em><em>а</em><em>ч</em><em>е</em><em>н</em><em>и</em><em>е</em><em> </em><em>клавишы</em><em> </em><em>D</em><em>e</em><em>l</em><em>e</em><em>t</em><em>e</em><em>:</em><em> </em><em>э</em><em>т</em><em>о</em><em> </em><em>озн</em><em>а</em><em>чает</em><em> </em><em>у</em><em>д</em><em>а</em><em>л</em><em>и</em><em>т</em><em>ь</em><em> </em><em>с</em><em> </em><em>а</em><em>н</em><em>г</em><em>л</em><em>и</em><em>й</em><em>с</em><em>к</em><em>о</em><em>г</em><em>о</em><em> </em><em>п</em><em>е</em><em>р</em><em>е</em><em>в</em><em>о</em><em>д</em><em>а</em><em>.</em>
Они почти одинаковы только современый телефон, ну он легче и удобнее
Var b,c:integer;
a: array [1..20] of integer; {объявляем массив}
begin
randomize; {говорим что будем использовать в теле программы рандомные числа}
for b:=1 to 15 do begin {жи есть цикл программы который заполняет наш массив от первой ячейки (b) до 15 ячейки }
a[b]:=random(1000); {присваиваем элементам массива рандомные значения}
write(a[b]); {выводим эти значения}
writeln(' <== ',a[b]*2); {рядом выводим точно такой же массив с такими же числами, только умноженными на 2 , а стрелочка для красоты }
end;
<span>end.
надеюсь что так можно? ;D
</span>