Есть число ABC, выписать все трехзначные числа abc если b четное a=1-9 b=1-9 c=1-9

Question

Есть число ABC, выписать все трехзначные числа abc если b четное a=1-9 b=1-9 c=1-9

Answer 1

Var i:integer;

begin

for i:=100 to 999 do

if ((i mod 100 div 10)mod 2=0) and ((i mod 100 div 10)<>0)

 then writeln (i);

end.

Comments

Можешь обьяснить часть с если?

---

Тут проверяется является ли вторая цифра в трех знчном числе четной

---

Спасибо

---

А можно чтобы они когда выписывались еще и сложились

---

В вашем новом вопросе я это сделал

---

ок