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.

Answer 2

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

Answer 3

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