Question

Среди двузначных чисел найти те, которые делятся на число q, а сумма тех цифр равна n ( 0

Answer 1

var i, q, n : integer;
begin
  read(q, n);
  for i:=10 to 99 do
    if ((i mod q = 0) and (i div 10 + i mod 10 = n)) then
      write(i, ' ');
end.

Answer 2

Хотя, сейчас ещё упрощу. Минуту

Answer 3

Всё - теперь, надеюсь, достаточно просто.

Answer 4

спасибо. сможете еще помочь?

Answer 5

Смогу.

Answer 6

Вычислить 1-1/2+1/3...1/9999-1/10000 последовательно слева направо вычисляются 1+1/3+...1/9999 и 1/2+1/4+...1/10000, затем второе значение вычитается из
первого. Паскаль!!!