Есть пятизначное число, которое при делении на 15 даёт в остатке 13, а при делении на 13 даёт в остатке 9. Найдите все такие числа
Ответ:
var n:integer;
begin
for n:=10000 to 99999 do
if (n mod 15 = 13) and (n mod 13 = 9) then writeln(n);
end.
Объяснение: