1:Это преследуется законом
2:Потому что не проверенные источники
3:Затем чтобы с тобой было приятно общатся
4:Чтобы заново не входить
Uses crt;
const n=5;
m=5;
var a:array[1..n,1..m] of integer;
i,b,j,k:integer;
begin
randomize;
for i:=1 to n do
for j:=1 to m do
begin
a[i,j]:=random(40)-20;
write(a[i,j]:3);
end;
writeln;
k:=1;
b:=20;
repeat
for i:=k to k do
for j:=1 to m do
if (a[i,j]<b) then b:=a[i,j];
writeln(b);
inc(k);
b:=20;
until k>n;
end.
1 символ = 1 байт = 8 бит
100*40*60 = 240000 байт = 1920000 бит
<span>для нахождения среднего арифметического необходимо сложить эти числа и разделить сумму на количество этих чисел
(2268+6416+628)/3=3104</span>