<h2>Код</h2>
#include <bits/stdc++.h>
using namespace std;
int main() {
int n, m;
cin >> n >> m;
double a[n][m];
for (int i = 0; i < n; ++i)
for (int j = 0; j < m; ++j)
cin >> a[i][j];
int mxi = 0, mxj = 0;
for (int i = 0; i < n; ++i) {
int mnj = 0;
for (int j = 1; j < m; ++j)
if (a[i][j] < a[i][mnj]) mnj = j;
if (a[i][mnj] > a[mxi][mxj]) {
mxi = i;
mxj = mnj;
}
}
cout << (mxi + 1) << " " << (mxj + 1) << endl;
return 0;
}
<h2>Тест</h2><h3>Ввод:</h3>
4 5
1 2 3 4 5
0 1 2 3 4
0 0 0 0 -1
16 32 28 17 100
<h3>Вывод:</h3>
4 1
<h3>Пояснение:</h3>
Минимальные элементы в каждой строке: <em>1(1;1), 0(2;1), -1(3;5), 16(4;1)</em>
Максимальным среди них является число 16, которое имеет координаты 4 1 (1-индексация).
5A316 = 3·160+10·161+5·162
= 3·1+10·16+5·256 = 3+160+1280 = 144310
0hex
=
0dec
=
0oct
0
0
0
0
1hex
=
1dec
=
1oct
0
0
0
1
2hex
=
2dec
=
2oct
0
0
1
0
3hex
=
3dec
=
3oct
0
0
1
1
4hex
=
4dec
=
4oct
0
1
0
0
5hex
=
5dec
=
5oct
0
1
0
1
6hex
=
6dec
=
6oct
0
1
1
0
7hex
=
7dec
=
7oct
0
1
1
1
8hex
=
8dec
=
10oct
1
0
0
0
9hex
=
9dec
=
11oct
1
0
0
1
Ahex
=
10dec
=
12oct
1
0
1
0
Bhex
=
11dec
=
13oct
1
0
1
1
Chex
=
12dec
=
14oct
1
1
0
0
Dhex
=
13dec
=
15oct
1
1
0
1
Ehex
=
14dec
=
16oct
1
1
1
0
Fhex
=
15dec
=
17oct
1
1
1
1
Program exp;var mas:array [1..10] of integer; i:integer;begin for i:=1 to 10 do begin mas[i]:=Random(3); if (mas[i])=1 then Writeln(i) end;end.
Для начала переведём Гбайты в Мбайты
1)320 Гбайт = 320 * 1024 Мбайт = 327680 Мбайт
Теперь найдем количество дисков, необходимых для копирования 327680 Мбайт
2)327680 / 700 = примерно 468.114, т.е. необходимо 469 дисков
Найдем вес 469 дисков
3)469 * 15 = 7035 грамм = 7.035 кг
<span>Ответ: 7.035 кг</span>
1. ((x-1)/sqr(y)-1/x)/(1/y+1/(x+1))
2.
program Schet;
var x,y:real;
begin
write('Введите значение X: ');
readln(x);
if (x+100>0) then begin
y:=(sqr(x)+4)/sqrt(x+100);
writeln('Y = ',y) end
else writeln('При данном значении X выражение не может быть рассчитано!')
end.
3.
program Func;
var x,y:real;
begin
write('Введите значение X: ');
readln(x);
if x<=0 then y:=4*x else
y:=(sqr(x)+1)/2;
writeln('Y = ',y)
end.
4.
program interval;
var s,x:real;
begin
x:=0;
repeat
s:=2*x*x+1;
writeln('при X = ',x:5:2,' S = ',s:6:2);
x:=x+0.5
until x>10
end.
Все программы написаны на языке ABC Pascal и проверены на функциональность