2)
позиционная 111 = сто одиннадцать
непозиционная III = 3 (римская) - т.е. единичку куда ни поставь - она везде единичка, в позиционных не так
Цикл вида for i:=a to b выполняется b-a+1раз.
В данном случае 4-0+1=5.
<u>Ответ:</u> 5 раз.
В эфиопии ученые обнаружили человека которому 160 тыс.лет. Они полагают,что примерно 200 лет назад появился человек разумный.
Function f(n:integer):boolean;
var m:set of 0..9;
begin
m:=[];
f:=true;
while n>0 do
begin
if (n mod 10) in m then f:=false;
m:=m+[n mod 10];
n:=n div 10;
end;
end;
begin
writeln(f(12321));
end.
Результат:
<span>False</span>