Решите задачу по информатике заранее по этапам. Язык Паскаль.

  var   a,b,c: array[1..100] of integer;     i,n,j,k: integer; begin randomize; j: =0; k: =0; readln(n); writeln('исходный массив: ');   for i: =1 to n do   begin     a[i]: =random(10);     writeln('a[',i,']=',a[i]);     end; for i: =1 to n do     if a[i]> 5.5       then         begin         j: =j+1;         b[j]: =a[i];       end;   for i: =1 to n do   if a[i]< =5.5   then      begin       k: =k+1;       c[k]: =a[i];     end; for i: =1 to j do   writeln('b[',i,']=', b[i]); for i: =1 to k do   writeln('c[',i,']=', c[i]); end.

Изобретения мобильного телефона 3 апреля 1973 года глава подразделения мобильной связи motorola мартин купер, прогуливаясь по центру манхеттена, решил позвонить по сотовому телефону. прохожие удивлялись и не понимали, что происходит: до появления коммерческой сотовой телефонии оставалось еще 10 лет. 6 марта 1983 года был выпущен первый в мире коммерческий портативный сотовый телефон. в этот день компания motorola представила аппарат dynatac 8000x - результат 15 лет разработок, на которые было потрачено более $100 млн.