просчитайте количество целых чисель от L до R все цифры которых
Просчитайте количество целых чисель от L до R все числа которых различный
Задать свой вопрос2 ответа
Милена Иллютович
просчитайте количество целых чисель от L до R все числа которых различный
Код на ruby 2.2.3p173
def allDifferentNumbers?(n)
a = []
while n gt; 0 do
return false if a.include?(n % 10)
a lt;lt; n % 10
n = n / 10
end
return true
end
def zadanie(l, r)
k = 0
for i in l..r
k += 1 if allDifferentNumbers?(i)
end
return k
end
Образцы внедрения
p zadanie(11, 13)
Код на ruby 2.2.3p173
def allDifferentNumbers?(n)
a = []
while n gt; 0 do
return false if a.include?(n % 10)
a lt;lt; n % 10
n = n / 10
end
return true
end
def zadanie(l, r)
k = 0
for i in l..r
k += 1 if allDifferentNumbers?(i)
end
return k
end
Образцы внедрения
p zadanie(11, 13)
Симаченкова
Ульяна
//PascalABC.NET 3.2 сборка 1318
var
l, r, counter, i: integer;
function DifNum(a: integer): integer;
var se: set of integer;
i: integer;
begin
while a gt; 0 do
begin
if a mod 10 in se then
begin
DifNum := 0;
exit;
end
else include(se, a mod 10);
a := a div 10;
end;
DifNum := 1;
end;
begin
read(l, r);
for i := l to r do
counter += DifNum(i);
writeln(counter);
end.
//Альтернативное решение на Паскале
Var
l,r:integer;
begin
read(l,r);
writeln(range(l,r).where(x -gt; x.tostring.toarray.distinct.count=length(x.tostring)).Count);
end.
//Dev-C++ 5.11 (C)
include lt;stdio.hgt;
include lt;malloc.hgt;
int DifNum(int);
int main(void)
int l,r,counter=0;
scanf("%d %d",amp;l,amp;r);
for(int i=l;ilt;=r;i++)
counter+=DifNum(i);
printf("%d",counter);
return 0;
int DifNum(int a)
int k=1,*nums;
nums=(int*)malloc(k*sizeof(int));
nums[0]=-1;
while(agt;0)
for(int i=0;ilt;k;i++)
if(a%10==nums[i])
return 0;
k++;
nums=(int*)malloc(k*sizeof(int));
nums[k-1]=a%10;
a/=10;
free(nums);
return 1;
Пример ввода:
1 12
Пример вывода:
11
var
l, r, counter, i: integer;
function DifNum(a: integer): integer;
var se: set of integer;
i: integer;
begin
while a gt; 0 do
begin
if a mod 10 in se then
begin
DifNum := 0;
exit;
end
else include(se, a mod 10);
a := a div 10;
end;
DifNum := 1;
end;
begin
read(l, r);
for i := l to r do
counter += DifNum(i);
writeln(counter);
end.
//Альтернативное решение на Паскале
Var
l,r:integer;
begin
read(l,r);
writeln(range(l,r).where(x -gt; x.tostring.toarray.distinct.count=length(x.tostring)).Count);
end.
//Dev-C++ 5.11 (C)
include lt;stdio.hgt;
include lt;malloc.hgt;
int DifNum(int);
int main(void)
int l,r,counter=0;
scanf("%d %d",amp;l,amp;r);
for(int i=l;ilt;=r;i++)
counter+=DifNum(i);
printf("%d",counter);
return 0;
int DifNum(int a)
int k=1,*nums;
nums=(int*)malloc(k*sizeof(int));
nums[0]=-1;
while(agt;0)
for(int i=0;ilt;k;i++)
if(a%10==nums[i])
return 0;
k++;
nums=(int*)malloc(k*sizeof(int));
nums[k-1]=a%10;
a/=10;
free(nums);
return 1;
Пример ввода:
1 12
Пример вывода:
11
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
Облако тегов