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

Question

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

Answer 1

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.

Comments

ну, нам так сказали)

---

а там говорить точное количество введенных чисел?

---

просто я циклом сделал, так как не знаю сколько всего будет чисел

---

ну, да... В начале нужно сказать чему равно n (количество чисел).

---

ну тогда подожди, сейчас исправлю))

---

заранее спасибо)

---

уже сделал)

---

напиши, пожалуйста)) если нетрудно.

---

спасибо!)))

---

агась)