1* 10^4 + 2*10^3 + 7*10^2+ 5*10^1 +3*10^0
var
i,a,b:integer;
begin
randomize;
readln(a,b);
for i:=1 to 5 do
write(random(b-a+1)+a,' ');
end.
Пусть _ заменяет любую букву из набора К, А, Т и Е. Тогда все удовлетворяющие условию слова можно поделить на группы:
- РР_ (есть 4 слова такого вида, их можно получить, подставляя на место _ буквы из набора)
- Р_Р (4 слова)
- _РР (4 слова)
- РРР (одно слово)
Всего получается 4 + 4 + 4 + 1 = 13 слов.