Даны два натуральных числа m и n. Проверить, есть ли в записи числа m цифры, одинаковые с цифрами в записи числа n. (программа Паскаль)

uses crt;
var m,n:integer;
    mm,mn:set of byte;
begin
clrscr;
repeat
writeln('Введите 2 натуральных числа до 9999');
readln(m,n);
until(m>0)and(m<10000)and(n>0)and(n<10000);
mm:=[];
while m>0 do
 begin
  mm:=mm+[m mod 10];
  m:=m div 10
 end;
mn:=[];
while n>0 do
 begin
  mn:=mn+[n mod 10];
  n:=n div 10
 end;
if mm*mn<>[] then write('В этих числах есть одинаковые цифры')
else write('В этих числах нет одинаковых цифр');
readln
end.

Сигизмунд I «После смерти Ивана 111 великий князь литовский Сигизмунд Ягеллон, избранный польским королем, заключил союз с Крымским ханством направленный против России».
Максимилиан I «В 1514 г. Василий III принял в Москве посла императора Священной Римской империи Максимилиана I Георга Шнитценпаумера. В результате этого визита был заключен договор о «любви, братстве и дружбе». Россия и Священная Римская империя обязались оказывать друг другу вооруженную помощь в случае войны с польским королем и великим князем литовским Сигизмундом I».
Бабур «В 1532 г. ко двору Василия ill прибыло посольство из Индии: основатель империи Великих Моголов Бабур предлагал установить торговые и дипломатические отношения между странами».

Внешняя политика России в первой трети XVI в.

Европейское направление

Важнейшие события	Даты	Итоги
Русско-литовская война	1500-1503 гг.	России отошли Чернигов,
		Брянск,     Гомель,
		Новгород-Северский
Новая  война  между	1507-1508 гг.	Литва  признала  все
Россией и Великим княж.		прежние   завоевания
Литовским		Московского княж.
Война России и Литвы	1512-1522 гг.	Россия    получила
		смоленские   земли,
		Василий l!l отказался от
		Киева,  Полоцка  и
		Витебска.
Русско-ливонская война	1501-1503 гг.	Перемирие с Ливонией
Заключение 3-х союзных	1493-1516 гг.	Дания - союзник России
договоров с Данией

Юго-восточное направление

Важнейшие события	Даты	Итоги
Набег крымских татар на 1521 г. Москву		Поражение России
Прибытие посольства из Индии	1532 г.	Установление  мирных отношений
Походы русского войска на Казань	1506,1524, 1530 гг.	Неудачный штурм города
Переговоры России с Османской империей	1498-1499 гг.	Установление  мирных отношений