Это очень опасно для цивилизации на данном этапе её развития.
Объяснение:
Искусственный интеллект не может не признать, что человечество методично уничтожает планету Земля.
Поэтому, логично предположить, что, при известных возможностях и полномочиях он попытается как минимум ограничить деятельность людей, а как максимум - избавиться от них.
Основная опасность искусственного интеллекта - в его незашоренности и ясности мышления. Он сразу поймет, кто есть кто.
В научной фантастике эта опасность уже обсуждалась множество раз, и не думайте, что Илон Маск - глупец, раз он заявлял, что опасается развития искусственного интеллекта.
При разработке такого интеллекта обязательной предосторожностью должно быть исключение доступа его к интернету, внешним носителям и силовым цепям, что, по-моему мнению, невозможно.
program raf105;
var a:array[1..3] of integer;
abc,i:integer;
begin
write('Введите число меньше тысячи: ');
readln(abc);
a[1]:=1000;
a[2]:=1000;
a[3]:=1000;
while abc<>0 do
begin
i:= i+1;
a[i]:= abc mod 10;
abc:= (abc-a[i]) div 10;
end;
if (a[1]<>a[2]) and (a[1]<>a[3]) and (a[1]<>1000)
then abc:= abc+1;
if (a[2]<>a[1]) and (a[2]<>a[3]) and (a[2]<>1000)
then abc:= abc+1;
if (a[3]<>a[1]) and (a[3]<>a[2]) and (a[3]<>1000)
then abc:= abc+1;
if abc=3 then abc:= abc-1;
writeln('Количество разных цифр: ',abc+1);
end.
Программа написана на языке PascalABC.NET
