program kk; uses crt; var a: array [1..5,1..5] of integer; i,j: integer; beginclrscr; randomize; for i: =1 to 5 dobeginfor j: =1 to 5 doa[i,j]: = random(90)+10; end; for i: =1 to 5 dobeginfor j: =1 to 5 do write(a[i,j],' '); writelnend; writeln; writeln; for i: =1 to 5 dobeginfor j: =1 to 5 dobegin if (a[i,j] > 0) and (a[i,j] mod 3 = 0) thenbeginwriteln(a[i,j],' [',i, ',',j,']'); end; end; end; readkey; end.
Ответ дал: Гость
роль:
1. появление новых средств, накопление информации на машиночитаемых носителях.
2. развитие средств связи, обеспечивающие доставку информации практически в любую точку, без ограничения времени и пространства.
3. возможность автоматической обработки информации с компьютеров по данным алгоритмам (сортировка, классификация, представление в нужной форме).
область применения: везде. в частной жизни каждого человека, на всех производствах, в любой работе где необходима работа с информацией.
Популярные вопросы