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

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