Пожалуйста!)) Не могу понять... С клавиатуры вводятся n чисел. Найти сумму первых трёх нечетных чисел. Очень вас прошу! Помогите, пожалуйста, с информатикой...)

Var numb,n,summa,k:integer;
begin
readln(n);
for k:= 1 to n do
 begin
readln(numb);
if numb mod 2 =1 then
summa:=summa+numb;
end;
writeln(summa);
end.