//PascalABC.Net 3.0, сборка 1064 var n:integer; i,d:byte; b:array[0..9] of boolean; fail:boolean; begin Write('Введите четырехзначное натуральное число: '); Read(n); for i:=0 to 9 do b[i]:=False; while (n>0) and (not fail) do begin d:=n mod 10; if b[d] then fail:=True else b[d]:=True; n:=n div 10 end; if fail then Writeln('В числе есть одинаковые цифры') else Writeln('В числе нет одинаковых цифр') end.
Тестовое решение: Введите четырехзначное натуральное число: 1263 В числе нет одинаковых цифр
Введите четырехзначное натуральное число: 1315 В числе есть одинаковые цифры
ответ: чтобы попасть на ваш сайт, пользователь должен ввести его доменное имя в адресную строку. общаясь друг с другом, компьютеры используют ip-адреса. ip-адрес имеет следующий вид: 123.457.69.043. если вы введете ip-адрес, привязанный к вашему доменному имени, вы также попадете на свой сайт.
объяснение: поскольку запомнить длинный ip-адрес довольно сложно, то для доступа к сайтам широко используются более простые и короткие доменные имена.
доменное имя состоит из двух частей: сначала указывается непосредственное название ресурса, а затем — домен верхнего уровня (tdl).
например, в доменном имени logaster.com, компонент .com и будет являться tld. выбирая url-адрес, вы увидите, что существует большое разнообразие доменов верхнего уровня. каждое расширение несет в себе определенные коннотации, поэтому важно сделать правильный выбор.
var
n:integer;
i,d:byte;
b:array[0..9] of boolean;
fail:boolean;
begin
Write('Введите четырехзначное натуральное число: ');
Read(n);
for i:=0 to 9 do b[i]:=False;
while (n>0) and (not fail) do begin
d:=n mod 10;
if b[d] then fail:=True else b[d]:=True;
n:=n div 10
end;
if fail then Writeln('В числе есть одинаковые цифры')
else Writeln('В числе нет одинаковых цифр')
end.
Тестовое решение:
Введите четырехзначное натуральное число: 1263
В числе нет одинаковых цифр
Введите четырехзначное натуральное число: 1315
В числе есть одинаковые цифры
ответ: чтобы попасть на ваш сайт, пользователь должен ввести его доменное имя в адресную строку. общаясь друг с другом, компьютеры используют ip-адреса. ip-адрес имеет следующий вид: 123.457.69.043. если вы введете ip-адрес, привязанный к вашему доменному имени, вы также попадете на свой сайт.
объяснение: поскольку запомнить длинный ip-адрес довольно сложно, то для доступа к сайтам широко используются более простые и короткие доменные имена.
доменное имя состоит из двух частей: сначала указывается непосредственное название ресурса, а затем — домен верхнего уровня (tdl).
например, в доменном имени logaster.com, компонент .com и будет являться tld. выбирая url-адрес, вы увидите, что существует большое разнообразие доменов верхнего уровня. каждое расширение несет в себе определенные коннотации, поэтому важно сделать правильный выбор.