- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
function ... : Integer;
var
i:integer;
begin
Result := 0;
for i := 1 to ... do
if bla-bla then
inc(Result);
Result := Result;
end;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 1
+144.9
function ... : Integer;
var
i:integer;
begin
Result := 0;
for i := 1 to ... do
if bla-bla then
inc(Result);
Result := Result;
end;