Var a:array[1..20,1..20] of integer;i,j,n:integer;beginreadln(n);for i:=1 to n dofor j:=1 to n doread(a[i,j]);
for i:=1 to n dofor j:=1 to n doif a[i,j] mod n =0 then a[i,j]:=a[i,j] div n;
for i:=1 to n do beginfor j:=1 to n dowrite(a[i,j],' ');writeln;end;end.
Ответ: 3
решение:
рассмотрим столбец б. Подставим и посчитаем числа.
получается соответственно: 12 (2*6); 6(5+1); 4(5-1). Из этого следует, что половина этой диаграммы будет равна 12 (т.к. самое большое число.) Из 12 вычетаем 6 и 4. 12-6-4=2
чтобы получилось 2, число 6 из таблицы нужно разделить на 3. Следовательно, ответ 3.
<font color="red">... (текст)...</font>
1) 1,357е+5 меньше, чем 1357е+1
2)137,12е+5 больше, чем 1,3711е+7
3)153,79е-3 больше, чем 1,5379