Строго говоря будующее развитие информатики видится в развитии ИИ, биоинформатике развитии алгоритмов эволюционной оптимизации и нейронных сетей. Сегодня всё больше и больше технологий перекладывается на интеграцию интерфейсов человека и вычислительной техники, так же рекомендательные системы обретают всё большее значение.
Перспективные наработки современности позволяют генерировать програмный код, мат. модели и прочее на основании самообучаемых систстем. Как следствие развитие информатики как науки по прежнему находится на зачаточных уровнях, технологически мы не всегда можем прогнозировать результаты работы созданных нами вычислительных комплексов и систем. Это например докзала недавняя победа DeepBlue в игре Го с мировым чемпионом.
Если под информатикой ты подразумеваешь именно информационные(компьютерные) технологии, то перспективы развития огромны. В данный момент компьютерные технологии прочно вошли в человеческий быт, они оповещают об изменениях погоды на Сатурне, и сбое сердечного ритма у стариков. На самом деле сформировать чёткий ответ о перспективах невозможно. Технологии быстро развиваются, используются абсолютно везде, начиная с медицины и заканчивая уборкой домов. Можно только прогнозировать более плотную интеграцию в человеческую жизнь. Возьмите любую науку - технология двигает её вперёд. Биология - более точные микроскопы и возможности манипулирования. История - спектральный анализ позволяет более глубоко и точно узнать количество лет. Мир зиждется нынче не на трех китах, а на информационной сети и транзисторах.
Const nx=30;var i,j,p,n:integer;A:array[1..nx,1..nx] of integer;d,Sn,min:real;begin p:=1;write('Введите размер матрицы');Read(n);for i:=1 to n do beginfor j:=1 to n do beginA[i,j]:=random(3)-2;write(A[i,j]:4);end;writeln;end;writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif i = j then begin if A[i,j]<> 0 then p:=p* A[i,j];write(A[i,j]:4);endelse write(' ':4);end;writeln;end;write('p =',p);writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif (i= n -j +1) then begin if A[i,j]<> 0 then p:=p* A[i,j];write(A[i,j]:4);endelse write(' ':4);end;writeln;end;write('p =',p);end.
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016 begin var n:=ReadInteger('Количество элементов массива '); var m:=ArrRandom(n,-50,50); m.Println(', '); var a:=0; var b:=0; var c:=0; for var i:=0 to n-1 do begin if m[i]>0 then a:=a+m[i]; if m[i]<m[b] then b:=i; if m[i] mod 5 = 0 then Inc(c) end; var w:=(b+1)+a/(c+1); WritelnFormat('A={0}, B={1}, C={2}, W={3}',a,b+1,c,w); Writeln('Принято, что элементы массива нумеруются от единицы') end.
Тестовое решение: Количество элементов массива 13 -43, -15, 18, -8, -13, -47, -36, 6, -16, 45, 33, 33, -24 A=135, B=6, C=2, W=51 Принято, что элементы массива нумеруются от единицы
Перспективные наработки современности позволяют генерировать програмный код, мат. модели и прочее на основании самообучаемых систстем. Как следствие развитие информатики как науки по прежнему находится на зачаточных уровнях, технологически мы не всегда можем прогнозировать результаты работы созданных нами вычислительных комплексов и систем. Это например докзала недавняя победа DeepBlue в игре Го с мировым чемпионом.