//PascalABC.NET 3.1 сборка 1219
begin
var a := ArrRandomInteger(10, -900, 900);
a.Println;
Writeln('Max = ', a.Max);
Writeln('Min = ', a.Min);
end.
Занесем в диапазон ячеек (А1:С3) Тогда формула =МИН(A1:C2)+$C2 будет находить минимальное значение из диапазона A1:C2 и прибавлять к минимальному значению число, находящееся в С2
Если данную формулу скопировать в ячейку D2, то получим формулу
<span>=МИН(A2:C3)+$C3, которая будет искать минимальное значение в А2:С3 и прибавит к полученному минимуму значение из С3</span>
P=23*0.1=2.3
k=0+1=1
until 2.3 <0 ===> true
p=2.3*0.1=0.23
k=1+1
until 0.23 <0 ===> false
ципл перестанет выполнятся и тогда получается что лн выполнился 2 раза