
28.11.2009, 16:16
|
Местный
|
|
Регистрация: 29.10.2009
Сообщения: 446
Репутация: 271
|
|
Очень простая задача)
Код:
function GetOddCount(const a:Array of Integer):Integer;
var
i:Integer;
begin
Result:=0;
if (Length(a) > 0) then
for i:=Low(a) to High(a) do
if (a[i] mod 2) = 1 then
Inc(Result);
end;
Admin: Пользуемся тегами!
|