Нужно решить 2 по информатике: 1) дан массив b[1..10] составьте программу которая находит количество элементов, которые больше своего соседа слева 2) дан массив b[1..10] составьте программу которая находит количество пар элементов с четным значением

Вот решение первой : program sosed; uses crt; const n = 10; type  vec = array [1..n] of integer; var  a: vec;         i, col: integer; begin   clrscr;   randomize;   writeln('massiv a: ');   for i: =1 to n do         begin               a[i]: = 10+random (90);               write (a[i]: 4);         end;   writeln;   col: =0;   for i: =2 to n do     begin         if a[i]< a[i-1] then             col: =col+1;     end;   writeln;   if col< > 0 then  writeln('col =', col)                     else writeln('none! '); readln; end.

Эвм пятого поколения ставятся совершенно другие , нежели при разработки всех прежних эвм. если перед разработчиками эвм с i по iv поколений стояли такие , как увеличение производительности в области числовых расчётов, достижение большой ёмкости памяти, то основной разработчиков эвм v поколения является создание искусственного интеллекта машины (возможность делать логические выводы из представленных фактов), развитие "интеллектуализации" компьютеров - устранения барьера между человеком и компьютером. компьютер теперь используется и дома, это компьютерные игры, прослушивание высококачественной музыки, просмотр фильмов. уже сейчас компьютеры способны воспринимать информацию с рукописного или печатного текста, с бланков, с человеческого голоса, узнавать пользователя по голосу, осуществлять перевод с одного языка на другой. это позволяет общаться с компьютерами всем пользователям, даже тем, кто не имеет специальных знаний в этой области.