- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
for li:=LL-2 downto 1 do
begin
ag:=ml_(a[li], m_(gen(len(a[li]), 1, 1), a[li]) );
cp(
b[li],
ml_(
ml(
t(W[li]),
from2(b[li+1], li <> LL-2)
)
,
ag
)
);
end;
absolut 18.06.2014 06:58 # +1
Dummy00001 18.06.2014 18:50 # +1
даже в самых крутых стилях программирования, без проверки на первую/последнюю итерацию не обходится...
brutushafens 18.06.2014 23:13 # 0
brutushafens 19.06.2014 00:26 # +1