Скоро выйдет, ещё не много
<span>v=28800 бит\с
i=log(2) 16=4 бит - информационный объем пикселя
I= 800*</span>600<span>* 4= 1920000 бит- информационный объем картинки
t=I/v= 190000/28800=67 c</span>
Природа - как корабль в море. Но корабль без мотора и прусов. Она идёт так, как заведено по старинному обычаю, как неуправляемый корабль по морю. Поэтому так же, как мы не можем управлять кораблём без мотора, мы не можем управлять природой - это дано лишь Богу.
Кулме досына келер басына это значит если будешь смеется на друга то с тобой тоже это случиться на таком основании
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ReadArrReal('Вводите:', ReadInteger('Количество чисел?'));
var imax := a.IndexMax;
Writeln('Первое максимальное число ', a[imax],
' имеет номер ', imax + 1)
end.
<h2>Пример</h2><h3>Количество чисел? 5</h3><h3>Вводите: 14 2.17 15.2 8 15.2</h3><h3>Первое максимальное число 15.2 имеет номер 3</h3>