Question

Есть пятизначное число, которое при делении на 15 даёт в остатке 13, а при делении на 13 даёт в остатке 9. Найдите все такие числа

Answer 1

Ответ:

var n:integer;

begin

 for n:=10000 to 99999 do

   if (n mod 15 = 13) and (n mod 13 = 9) then writeln(n);

end.

Объяснение: