Компьютер наконец-то приобретёт элементы интеллектуальности.
Общение с ним максимально будет приближено к человеческому языку.
Виртуальность приобретёт реальные черты, предметы станут ощутимыми, окружение станет объёмным и будет полностью соответствовать человеческим органам чувств.
Но никогда искусственный интеллект не превзойдёт человека.
Любая биологическая клетка неизмеримо более сложна, чем самый заумный компьютер.
Метод обработки информации у будущих компьютеров, как и в природе, станет аналоговым, а не как сейчас, цифровым.
В природе цифровых процессов не существует, а только аналоговые.
поровоз вроде!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
В предыдущем вопросе я написала решение.
program z;
var a,b,c,d,e,x,g,h:integer;
begin
write('Введите пятизначное число');
read(x);
a:= x mod 10;
b:= x mod 100;
b:= b div 10;
c:= x mod 1000;
c:= c div 100;
d:= x mod 10000;
d:= d div 1000;
e:= x mod 100000;
e:= e div 10000;
if a mod 2=0 then h:=a
else g:=a;
if b mod 2=0 then h:=h+b
else g:=g+b;
if c mod 2=0 then h:=h+c
else g:=g+c;
if d mod 2=0 then h:=h+d
else g:=g+d;
if e mod 2=0 then h:=h+e
else g:=g+e;
writeln(' Сумма нечётных цифр равна ', g);
write(' Сумма чётных цифр равна ', h);
<span>end.</span>
Сумма двух элементов a[1] и a[4] для данного массива равна 22
Program znania;
Var
k:integer;
begin
read(k);
if (k=3) or (k=5) or (k=6) or (k>7) then writeln('YES') else writeln ('NO');
End.
Надеюсь что правильно. Удачи!
:)
:)