Решите пожалуйста задачу в паскаль.Найти все целые двузначные числа, сумма цифр в которых...

Question

Решите пожалуйста задачу в паскаль.
Найти все целые двузначные числа, сумма цифр в которых равна 8.

Answer 1

Var
  i : integer;
begin
  for i := 10 to 99 do
    if i mod 10 + i div 10 = 8 then
      writeln(i);
end.

Comments

Спасибо =*****

---

Всегда пожалуйста :)

---

Всегда это хорошо. а то мне еще нужно несколько задачек решить :ХХ