Begin readln(a,b); For i:=10 to 99 do if (i mod 10 + i div 10=a) and (i mod b=0) then writeln(i); end.
П.с. используй поиск я уже решал такие задания.
Var допиши сама