Есть много разных способов решения этой задачи. Например:
var n:integer; b:boolean; m:set of 0..9;
begin
write('n='); readln(n);
m:=[];
b:=false;
while (n>0) and not b do
if n mod 10 in m then b:=true else begin m:=m+[n mod 10]; n:=n div 10; end;
if b then writeln('В записи введенного числа есть одинаковые цифры')
else writeln('В записи введенного числа нет одинаковых цифр');
end.
Пример:
n=123432
В записи введенного числа есть одинаковые цифры
- истина, если хотя бы одно из утверждений
есть истинным
если
- ложь, то гарантированно, что и
и
также ложные утверждения
утверждение
- ложь, тогда
утверждение
- ложь, и также утверждение
- ложь, и тогда
утверждение
- истина, и также утверждение
- истина
значит у Маши может быть не меньше 4 конфет, и в месте с тем, их меньше чем 7, т.е.:
т.е. у Маши или 4, или 5, или 6 конфет
Ответ: 4, 5, 6
Аааа, почему никто не знает...или просто ленивые, сижу над этим заданием и ничего не понимаю)
Ответ:
I=100б, k=20- количество символов. i=100/20=5
Мощность алфавита N=2*i = 10
Объяснение:
Залить в 7 3 +
-ртг89лаблдл
