25.01.2010, 00:40
|
|
Reservists Of Antichat - Level 6
Регистрация: 04.02.2007
Сообщений: 1,152
С нами:
10139366
Репутация:
1502
|
|
хоть это и п*ец, но твой код можно переделать вот так
Код:
For I := FrList.Count -1 downto 0 do
begin
For j := 0 To OnLineFriend.Count -1 Do
begin
If FrList[i] = OnLineFriend[j] Then FrList.Delete(i);
end;
end;
__________________
Bedankt euch dafür bei euch selbst.
H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ
|
|
|