На странице должно быть 30 строк по 60 символов в каждой. определить информационный объем 1 страницы и сколько листов бумаги потребуется для распечатки текстового файла размером 50 кбайт

Если 1 символ равен 1 байту, то: 1) информационный объем одной страницы:   30  *  60 =  1800 байт 2)  (50  *  1024)  /  (30  *  60)  =  28.4. значит, понадобится 29 листов

Информатизация – это производное от слова информация. информатизация – это процесс получения, использования, хранения, передачи информации. на протяжении хх века сменялось множество способов обмена информацией. если в xix веке носителем информации была бумага, а средством передачи была почтовая служба, то в хх веке информация стала передаваться гораздо быстрее с телеграфа, в голосовой форме обмениваться информацией можно по телефону, радио и телевидение призваны только для получения человеком информации. в наши дни есть огромное количество способов передачи информации, причем в любой форме. телефонные линии до сих пор остаются самым удобным средством передачи информации, но теперь ими обслуживаются не только телефоны, но и самое большое достижение процесса информатизации – internet, содержащий большую часть информации со всей планеты. сейчас информатизация не мыслима без компьютера, так как он изначально создавался как средство обработки информации и только теперь он стал выполнять множество других функций: хранение, преобразование, создание и обмен информацией. но прежде чем принять привычную сейчас форму компьютер претерпел три революции. первая компьютерная революция свершилась в конце 50-х годов; ее суть можно описать двумя словами: компьютеры появились. изобретены они были не менее чем за десять лет до этого, но именно в то время начали выпускаться серийные машины, эти машины перестали быть объектом исследований для ученых и диковинкой для всех остальных. через полтора десятилетия после этого ни одна крупная организация не могла себе позволить обходиться без вычислительного центра. если тогда заходила речь о компьютере, сразу же представлялись заполненные стойками машинные залы, в которых напряженно думают люди в белых халатах. и тут свершилась вторая революция. практически одновременно несколько фирм обнаружили, что развитие техники достигло такого уровня, когда вокруг компьютера не обязательно воздвигать вычислительный центр, а сам он стал небольшим. это были первые мини-эвм. но прошло еще десять с небольшим лет, и наступила третья революция – в конце 70-х возникли персональные компьютеры. за короткое время, пройдя путь от настольного калькулятора до полноценной небольшой машины, пк заняли свои места на рабочих столах индивидуальных пользователей. компьютер – это самое популярное средство для обработки, хранения и передачи информации и по сей день, но так как в наши дни информации становится все больше, то и компьютеры претерпевают значительные изменения. для удобства пользователей стали выпускаться, переносные и карманные компьютеры, подключенные к информационной сети internet, чтобы пользователь мог получить необходимую информацию в любом месте, в удобное для него время. но так как потоки информации только увеличиваются то для ее создания, обработки, хранения и передачи необходимо разрабатывать все новые и новые средства и приспособления. существует множество компаний и корпораций, специализирующихся на разработках программного обеспечения, операционных систем, усовершенствовании и разработке новых более совершенных компьютеров, приспособлений для ввода и вывода информации, аксессуаров для удобства обращения с компьютером и ускорения обработки информации.

Программа находит наибольшее отрицательное число из n чисел, так как рандом состоит из положительных и отр. чисел, не стал писать else. код кривой, но рабочий : ) program asd; uses crt; var a: array[1..100]of integer; i,n,max: integer; begin clrscr; writeln('vvedite kol-vo chisel: '); readln(n); for i: =1 to n do begin a[i]: =random(20)-10; write(' ',a[i]); end; max: =a[1]; for i: =2 to n do begin if (a[i]< 0) then begin if (a[i]< max) then max: =a[i] end; end; writeln; writeln('maksimalnoe chislo pri a[i]< 0 = ',max); end.