PascalABC.NET 3.4
begin
var s:=ReadlnInteger('n=').ToString; // ввели целым, стало строкой
var l1 := s.Length; // всего цифр
var l2 := s.Distinct.JoinIntoString('').Length; // разных цифр
if l1 = l2 then Writeln('Одинаковых цифр нет')
else Writeln('Одинаковые цифры есть')
end.
<span>Вложенный оператор применяется в тех случаях, когда для выполнения действия требуется соблюдение сразу нескольких условий, которые не могут быть указаны в одном условном выражении</span>
Наименьшим элементом на экране является пиксель
Два раза перелить полный трехлитровый кувшин в пятилитровый.
Пролитая вода и есть ваш литр.
N = 65536 =
I = 16 bit
K = 1024·768 = 786 432
V = I·K = 16·768 432 = 12294912bit = 1,5 MB