Program q; var a:array[1..7,1..7] of integer; min7,sum1,odd,i,k:integer; avg5:real; begin; randomize; for i:=1 to 7 do begin; for k:=1 to 7 do begin; a[i,k]:=random(-10,10); if a[i,k] mod 2 = 1 then odd+=1; end; end; min7:=a[1,7]; for i:=1 to 7 do if a[7,i]<min7 then min7:=a[i,7]; for i:=1 to 7 do sum1+=a[i,1]; for i:=1 to 7 do avg5+=a[5,i]; avg5/=7; for i:=1 to 7 do a[1,i]:=1; write('Минимальный элемент в 7 столбце ', min7, ', сумма элементов первой строки ', sum1, ', кол-во нечётных чисел ', odd); end.
Рекомендуется использовать формулу мальтуса, изменения числа рыб n= k*n-q*n*n если за начальное количество рыб принять n0,то через год рыб в пруду будет n1=n0+k*n0-q*n0*n0,через два года n2=n1+k*n1-q*n1*n1 в таблице excel в ячейку a1 введите значение к=1,в ячейку b1 значение q=0,01,в ячейку с1 значение n0=100, в ячейку в2 формулу =c1+a1*c1-b1*c1*c1 (это количество рыб за 1 год) , в ячейку в3 формулу =b2+$a$1*b2-$b$1*b2*b2(количество рыб за 2 год) , скопируйте формулу с ячейки в3 до ячейки в11. изменяйте значение ячейки а1, например, поставьте значение 1,908, и получите 2000 рыб через 10 лет.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку