Основные положения теории информации

Рассмотрение основных понятий информатики. Исследование свойств информации, данных и знаний. Алгоритмизация функций калькулятора и шифратора. Программная реализация посредством Turbo Pascal и Microsoft Visual Basic. Изучения листингов программных кодов.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 31.05.2016
Размер файла 773,0 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Размещено на http://www.allbest.ru/

ПРИДНЕСТРОВСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

им. Т.Г. ШЕВЧЕНКО

Рыбницкий филиал

Направление «Педагогическое образование»

Профиль «Информатика»

Доп. профиль «Иностранный язык»

Кафедра информатики и программной инженерии

КУРСОВАЯ РАБОТА

по дисциплине: «ТЕОРЕТИЧЕСКИЕ ОСНОВЫ ИНФОРМАТИКИ»

на тему:

«Основные положения теории информации»

Студентки

II курса

Варзар Юнии Вячеславовны

Научный руководитель:

доцент Козак Людмила Ярославовна

Рыбница, 2016

СОДЕРЖАНИЕ

  • ВВЕДЕНИЕ
  • I. ОСНОВНЫЕ ПОЛОЖЕНИЯ ТЕОРИИ ИНФОРМАЦИИ
  • 1.1 Данные, информация, знания
  • 1.2 Понятие информации
  • 1.3 Свойства информации
  • II. РЕАЛИЗАЦИЯ И ТЕСТИРОВАНИЕ ПРОГРАММНЫХ ПРОДУКТОВ, ОПИСАНИЕ РЕЗУЛЬТАТОВ
  • 2.1 Краткое описание программных продуктов
  • 2.2 Программные продукты
  • ЗАКЛЮЧЕНИЕ
  • ИСПОЛЬЗОВАННАЯ ЛИТЕРАТУРА
  • ПРИЛОЖЕНИЕ

ВВЕДЕНИЕ

Понятие информации является одним из фундаментальных в современной науке вообще и базовым для информатики. Информацию наряду с веществом и энергией рассматривают в качестве важнейшей сущности мира, в котором мы живем. Однако, если задаться целью формально определить понятие "информация", то сделать это будет чрезвычайно сложно.

В простейшем бытовом понимании с термином "информация" обычно ассоциируются некоторые сведения, данные, знания и т.п. Информация передается в виде сообщений, определяющих форму и представление передаваемой информации. Примерами сообщений являются музыкальное произведение; телепередача; команды регулировщика на перекрестке; текст, распечатанный на принтере; данные, полученные в результате работы составленной вами программы и т.д. При этом предполагается, что имеются "источник информации" и "получатель информации".

Сообщение от источника к получателю передается посредством какой-нибудь среды, являющейся в таком случае "каналом связи". Так, при передаче речевого сообщения в качестве такого канала связи можно рассматривать воздух, в котором распространяются звуковые волны, а в случае передачи письменного сообщения (например, текста, распечатанного на принтере) каналом сообщения можно считать лист бумаги, на котором напечатан текст.

Объект курсовой работы - основные положения теории информации.

Предмет курсовой работы - программы на языке Turbo Pascal, Microsoft Visual Basic реализующие некоторые задачи из общих положений теории информации.

Целью данной курсовой работы является нахождение программ для реализации выбранных задач теории информации.

Задачи:

1. Изучить общие положения теории информации.

2. Найти и протестировать программы, реализующие выбранные задачи из теории информации.

3. Изучить алгоритмы программ и применить их на практике.

Актуальность исследования определяется тем, что создание программ, реализующих задачи из разных разделов информации - это одно из популярных и интересных направлений в теоретической информатике. Оно позволяет более детально изучить языки программирования, их функции и помочь разработчику решить заданные ему задачи.

I. ОСНОВНЫЕ ПОЛОЖЕНИЯ ТЕОРИИ ИНФОРМАЦИИ

1.1 Данные, информация, знания

Данные [data, information] - сведения, факты, показатели, выраженные как в числовой, так и любой другой форме.

Указанный в скобках англоязычный эквивалент термина показывает, что он весьма часто рассматривается как синоним термина "информация". Так, словосочетание "data system" и производные от него могут соответствовать одному из совсем не однозначных, хотя и связанных между собой понятий - "система данных" и "информационная система". Аналогичное явление прослеживается при русскоязычном использовании этого термина. Например, в одном из изданий "Словаря терминов по информатике" данные трактуются, как "Информация, представляющая собой сведения..", а в ГОСТ 15971-84, как "Информация, представленная на материальных носителях".

С целью смыслового разделения понятий "информация" и "данные" Ассоциация стандартов Франции (АФНОР) дает следующее определение: "Данные - факт, понятие или инструкции, представленные в условной форме, удобной для пересылки, интерпретации и обработки человеком или автоматизированными средствами".

Согласно другого важного для понимания этого термина определения: "Данные - некоторый факт, то на чем основан вывод или любая интеллектуальная система". Компонентами данных являются цифры и символы естественного языка или их кодированное представление в виде строки двоичных битов.

Бит [bit от англ . binary digit] - простое двоичное число (цифра или символ), принимающее значения 1 или 0 и служащее для записи и хранения данных в ЭВМ.

Бит является минимальной двоичной единицей измерения энтропии и количества информации в ЭВМ, соответствующей одному двоичному разряду. Энтропия сообщения, выраженная в битах, определяется средним числом символов, необходимых для записи этого сообщения. Определенное количество бит составляет размер других единиц - двоичных слов, в т.ч. - байта [ byte], килобайта [ kilobyte ], мегабайта [ megabyte ] и т.д.

Байт [byte ] - двоичное слово, способное записывать и хранить в памяти ЭВМ один буквенно-цифровой или другой символ данных. Каждый символ записывается в виде набора двоичных цифр (битов) при помощи определенного кода, например, ASCII . Количество бит в байте определяет его разрядность, которая может составлять 8, 16, 32 и т.д. Соответственно байт называют 8-разрядным, 16-разрядным и т.д. Один 8-разрядный байт может определять 256 разных значений, например, десятичных чисел от 0 до 256. Увеличение разрядности ведет к соответствующему увеличению числа возможных вариантов комбинаций, кодируемых одним байтом. Например, 16-разрядным - до 65536 или 216 , 32-разрядным - до 232 и т.д.

Килобайт, Кбайт [kilobyte ] - единица измерения ёмкости памяти или длины записи, равная 1024 байтам. Часто под килобайтом понимается также величина, равная 103 байт.

Мегабайт, Мбайт [megabyte ] - единица измерения ёмкости памяти или длины записи, равная 1024 килобайтам. Часто под мегабайтом понимается также величина, равная 103 килобайт или 106 байт.

Гигабайт, Гбайт [gigabyte ] - единица измерения ёмкости памяти или длины записи, равная 1024 мегабайтам. Часто под гигабайтом понимается также величина, равная 103 мегабайт, 106 килобайт или 109 байт.

1.2 Понятие информации

[Information от лат. Informatio - разъяснение, осведомление]

Данный термин и отражаемое им понятие являются сегодня одними из самых распространённых. Сказанное относится к их использованию, как на бытовом, так и профессиональном уровнях.

Существует множество различных определений этого понятия, например, такие:

· "Информация - содержание какого-либо сообщения, сведения о чём-либо, рассматриваемые в аспекте их передачи в пространстве и времени…";

· "Информация - сведения, подлежащие передаче";

· "Информация - это значение, вкладываемое человеком в данные на основании известных соглашений, используемых для их представления";

· "Информация - содержание, значение данных, которое видят в них люди. Обычно данные состоят из фактов, которые ставятся "информацией" в определённом контексте и понятны людям" .

Следует упомянуть здесь также классическое определение К.Шеннона, в соответствии с которым информация - это то, что сокращает степень неопределённости (у Шеннона - энтропии) у её адресата о каком-либо объекте (в т.ч. явлении, передаваемом сигнале и т.п.). Другими словами, по Шеннону информация это то, что увеличивает степень знания её адресатом интересующих его объектов окружающего мира. В указанном контексте количество информации можно даже рассчитать, например, по увеличению вероятности успешного решения поставленной задачи.

С чем же связано различное представление понятия "Информация" разными его пользователями, включая профессионалов?

Во-первых, его сложной и неоднозначной сущностью, которая к тому же имеет тенденцию достаточно быстро изменяться в ходе научно-технического прогресса. К примеру, в 1992 г. в журнале НТИ в статье одного уважаемого автора достаточно убедительно доказывался тезис о том, что информация отнюдь не всегда повышает вероятность успешного решения некоторых прикладных задач.

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

Признаки информации можно сформулировать следующим образом: "Информация это сведения или данные, объективно отражающие различные стороны и элементы окружающего мира и деятельности человека, на определенном этапе развития общества, представляющие для него какой-либо интерес, и материализованные в форме удобной для использования, передачи, хранения и/или обработки (преобразования) человеком или автоматизированными средствами".

Если на бытовом уровне смешение понятий "данные" и "информация" вполне допустимо, то для профессионалов это может привести к серьезным последствиям,

Чтобы стать информацией, данные должны правильно отражать объекты описания, в противном случае приходится иметь дело с "дезинформацией" (англоязычные эквиваленты: false information, misleading information). Сама по себе "правильность отражения действительности" в соответствии с теорией познания всегда носит условный характер, поскольку связана с уровнем развития знаний на данном этапе развития общества или отдельных его социальных групп и индивидуумов. Так, состав и точность данных, которыми владеют или которые необходимы различным организациям и лицам об одном и том же объекте, будут существенно различаться в зависимости от образовательного, возрастного, социального статусов субъекта информирования а также целей их использования (например, для "повышения общей эрудиции" или для решения научных, технических, производственных, коммерческих и др. задач). В указанном плане данные, которые для одного субъекта будут представляться вполне точными, для другого - могут оказаться грубой "дезинформацией".

Чтобы стать информацией, данные должны представлять для субъекта информирования "определенный интерес" и "новизну". Последнее означает, что они должны быть для него связаны с необходимостью решения каких-либо практических или других задач и сокращать "степень неопределенности" об объекте "интереса". В указанном плане информация помимо того, что она адресно "прибавляет знания" об интересующем объекте, должна доставляться своевременно. К примеру, сообщение о том, что "Сегодня в городе проливной дождь, гололед", полученное после того, как человек успел выйти из дома и промокнуть - информацией не является, как не является информацией и сообщение о погоде, например, в Москве, если субъект там не живет. Для субъекта эти данные являются тем, что в информатике принято называть "информационным шумом". Однако для кого-то в зоне действия средств массовой информации (кто еще не вышел на улицу или живет в упомянутых местах) эти же сведения - информация.

"Информационным шумом" являются также сообщения и данные, не представляющие для субъекта информирования предмета новизны.

Приведенные примеры, носящие откровенно бытовой характер, могут быть заменены другими из любой сферы деятельности человека. Смысл их от этого не изменится: данные, переданные "не по назначению", не своевременно или не представляющие новизну, - являются "информационным шумом".

Понятие "информационный шум" может быть также распространено на данные, "не удобные" для "использования, передачи, хранения и/или обработки", поскольку и в этом случае они приводят к бесполезным, а возможно и вредным затратам материальных, временных и других ресурсов.

Подводя итог сказанному, можно существенно сократить определение понятия информации: "Информация это данные, необходимые или полезные тому, кому они передаются".

1.3 Свойства информации

Как и всякий объект, информация обладает свойствами. Характерной отличительной особенность информации от других объектов природы и общества, является дуализм: на свойства информации влияют как свойства исходных данных, составляющих ее содержательную часть, так и свойства методов, фиксирующих эту информации. С точки зрения информатики наиболее важными представляются следующие общие качественные свойства: объективность, достоверность, полнота, точность, актуальность, полезность, ценность, своевременность, понятность, доступность, краткость и пр.

1. Объективность информации. Объективный - существующий вне и независимо от человеческого сознания. Информация - это отражение внешнего объективного мира. Информация объективна, если она не зависит от методов ее фиксации, чьего-либо мнения, суждения. Пример. Сообщение "На улице тепло" несет субъективную информацию, а сообщение "На улице 22°С" - объективную, но с точностью, зависящей от погрешности средства измерения. Объективную информацию можно получить с помощью исправных датчиков, измерительных приборов. Отражаясь в сознании конкретного человека, информация перестает быть объективной, так как, преобразовывается (в большей или меньшей степени) в зависимости от

2. Достоверность информации. Информация достоверна, если она отражает истинное положение дел. Объективная информация всегда достоверна, но достоверная информация может быть как объективной, так и субъективной. Достоверная информация помогает принять нам правильное решение. Недостоверной информация может быть по следующим причинам:

1. Преднамеренное искажение (дезинформация) или непреднамеренное искажение субъективного свойства.

2. Искажение в результате воздействия помех ("испорченный телефон") и недостаточно точных средств ее фиксации.

3. Полнота информации. Информацию можно назвать полной, если ее достаточно для понимания и принятия решений. Неполная информация может привести к ошибочному выводу или решению.

4. Точность информации определяется степенью ее близости к реальному состоянию объекта, процесса, явления и т. п.

5. Актуальность информации - важность для настоящего времени, злободневность, насущность. Только вовремя полученная информация может быть полезна.

6. Полезность (ценность) информации. Полезность может быть оценена применительно к нуждам конкретных ее потребителей и оценивается по тем задачам, которые можно решить с ее помощью.

Самая ценная информация - объективная, достоверная, полная, и актуальная. При этом следует учитывать, что и необъективная, недостоверная информация (например, художественная литература), имеет большую значимость для человека. Социальная (общественная) информация обладает еще и дополнительными свойствами:

1. Имеет семантический (смысловой) характер, т. е. понятийный, так как именно в понятиях обобщаются наиболее существенные признаки предметов, процессов и явлений окружающего мира.

2. Имеет языковую природу (кроме некоторых видов эстетической информации, например изобразительного искусства). Одно и то же содержание может быть выражено на разных естественных (разговорных) языках, записано в виде математических формул и т. д.

С течением времени количество информации растет, информация накапливается, происходит ее систематизация, оценка и обобщение. Это свойство назвали ростом и кумулированием информации. (Кумуляция - от лат; cumulatio - увеличение, скопление).

Старение информации заключается в уменьшении ее ценности с течением времени. Старит информацию не само время, а появление новой информации, которая уточняет, дополняет или отвергает полностью или частично более раннюю. Научно-техническая информация стареет быстрее, эстетическая (произведения искусства) - медленнее.

Логичность, компактность, удобная форма представления облегчает понимание и усвоение информации.

II. РЕАЛИЗАЦИЯ И ТЕСТИРОВАНИЕ ПРОГРАММНЫХ ПРОДУКТОВ, ОПИСАНИЕ РЕЗУЛЬТАТОВ

2.1 Краткое описание программных продуктов

Для представления теории информации на ЭВМ были выбраны такие программы общего пользования как: Калькулятор, Шифратор, а так же представлена программа выведения графической информации на языке Turbo Pascal. Калькулятор представлен в двух средах программирования, таких как Turbo Pascal и Microsoft Visual Basic. Разработка данной программы представлены в двух средах программирования в целях выявления положительных и отрицательных сторон создания и ее работы в разных средах программирования. Шифратор представлен в такой среде программирования как Turbo Pascal. В состав программы входят функции, реализующие вывод результатов на экран. Входные данные - коды нажимаемых клавиш, т.е. введенные пользователем числа. Выходные данные - полученные результаты программ.

При подготовке программ были выполнены следующие задачи:

1. Написание функций вода данных.

2. Написание функций вывода результатов.

3. Листинг программных продуктов.

Листинг программных продуктов на языке Turbo Pascal представлен непосредственно в соответствующих пунктах данной главы, листинг программы, представленной в среде Microsoft Visual Basic представлен в Приложении 1 по причине объема кода программного продукта.

2.2 Программные продукты

2.2.1 Калькулятор

В современном мире производится огромное количество калькуляторов, которые различаются между собой не только размерами, но и выполняемыми функциями. Калькуляторы можно разделить на следующие виды:

Простые калькуляторы:

Простые калькуляторы выполняют обычные арифметические расчеты (сложение, вычитание, деление и умножение) и, как правило, несколько дополнительных функций, таких как расчет процентов и извлечение из квадратного корня.

Бухгалтерские калькуляторы:

Как следует из названия этого типа калькуляторов, они предназначены для использования бухгалтерами и кассирами. В целом же основная их функция - это профессиональные расчеты с денежными суммами.

Инженерные калькуляторы:

Более сложный тип калькуляторов, разработанный для различных по сложности инженерных и научных расчетов. Такие калькуляторы способны делать расчеты с приоритетами операций и скобками, иногда позволяют делать расчеты с дробями, делают вычисления элементарных функций, а также поддерживают множество других расчетов .

Финансовые калькуляторы:

В целом, это один из подвидов инженерных калькуляторов, который предназначен для финансовых расчетов, таких как расчет аннуитета, дисконта, размер выплат по кредиту, приведенного потока и подобное.

Программируемые калькуляторы:

Программируемые калькуляторы по их возможностям можно назвать сложными инженерными калькуляторами. Они способны выполнять те же функции, а также дополнительно делать повторные сложные вычисления, выполнять создаваемые пользователями программы. Такие калькуляторы имеют более 10 регистров памяти, зачастую имеют интерфейсы для подключения к внешним устройствам, таким как компьютер. Также оснащены внешней памятью, исполнительными устройствами и аппаратными датчиками. Наиболее функциональные программируемые калькуляторы можно даже отнести к простым портативным компьютерам, но их основное отличие от последних заключается в узкой специализации выполняемых действий.

Графические калькуляторы:

Все графические калькуляторы относятся к программируемым, но их отличает наличие графического экрана. Такие калькуляторы способны поддерживать команды, отображающие графики функций, а также могут выводить на экран рисунки.

В данной курсовой работе на языках Turbo Pascal и Microsoft Visual Basic реализован "простой" калькулятор, выполняющий простые арифметические операции.

Код программы "Калькулятор" на языке Turbo Pascal.

program Calc;

uses CRT;

var a, b, r: real;

c: char;

ok: boolean;

begin

clrscr;

repeat

ok:=true;

writeln('Введите первое число.');

readln(a);

writeln('Введите второе число.');

readln(b);

writeln('Введите действие: "+" - сложение, "-" - вычитание, "*" - умножение, "/" - деление.');

c:=readkey;

case c of

'+': r:=a+b;

'-': r:=a-b;

'*': r:=a*b;

'/': r:=a/b;

else ok:=false;

end;

if ok then writeln(r:0:5);

writeln('"Q" - выход, любая другая клавиша - возврат в калькулятор.');

c:=readkey;

until (c='q') or (c='Q');

end.

Рис. 1."Простой калькулятор на языке T.P. "

Рис. 2."Ввод первого числа "

Рис. 3. "Ввод второго числа"

Рис. 4. "Ввод действия"

Рис. 5. "Вывод результата"

Программа "Калькулятор" на языке Microsoft Visual Basic.

Рис. 6. " Простой калькулятор в среде Microsoft Visual Basic"

Рис. 7. "Вычисления калькулятора"

Сравнительный анализ программы Калькулятор на языках Turbo Pascal и Microsoft Visual Basic.

При открытии программы на языке Microsoft Visual Basic сразу появляется окно калькулятора, в среде Turbo Pascal нужно работать непосредственно с числами в поле ввода данного языка программирования. Можно сделать вывод, что программа на языке Microsoft VB более удобна в использовании. калькулятор шифратор pascal basic

В ходе отладки (тестирования) найденных и изученных программ были выявлены следующие минусы:

1. Программы разработаны только для решения простых арифметических операций.

2. Программа на языке Turbo Pascal может зацикливаться при неверном введении числовых данных.

Плюсы:

1. Алфавит, на котором написаны программы, понятен пользователю.

2. Программы выполняют все простые арифметические операции.

2.2.2 Шифратор

Одними из очень важных элементов цифровой техники, а особенно в компьютерах и системах управления являются шифраторы и дешифраторы. Таким образом, шифратор (кодер), это электронное устройство, которое преобразует код одной системы счисления в код другой системы, либо шифрует текст по заданному в программном продукте алгоритму или методу.

Для реализации шифратора в данной курсовой работе был выбран такой язык программирования как Turbo Pascal. Была выбрана задача, которая основывается на шифровании текста. Требуется зашифровать текст переписав его наоборот.

program shifrator;

var s:string;

i,wn,we:byte;

begin

write('vvedite stroku : ');

readln(s);

wn:=1;

write('obratnaya stroka : ');

for i:=1 to length(s) do begin

if s[i]=' ' then begin

for we:=i-1 downto wn do write(s[we]);

wn:=i+1;

write(' ');

end;

end;

for we:=i downto wn do write(s[we]);

readln;

end.

Рис. 8. "Код программы Шифратор"

Рис. 9. "Ввод строки"

Рис. 10. "Вывод обратной строки"

2.2.3 Графическая информация

Под графической информацией понимается вся совокупность информации, которая нанесена на самые различные носители - бумагу, пленку, кальку, картон, холст, стекло, стену и так далее. В определенной степени графической информацией можно считать и объективную реальность, на которую направлен объектив фотоаппарата или цифровой камеры. Для реализации чтения графической информации была выбрана следующая задача: "Требуется вывести количество цветов в палитре в графическом режиме".

Uses Graph;

Var Driver, Mode : Integer;

S: String;

Begin

Driver:=Detect;

InitGraph(Driver, Mode, '');

If GraphResult<0 Then Halt(1);

Str(GetPaletteSize, S);

OutTextXY(GetMaxX div 2, GetMaxY div 2, S);

ReadLn;

CloseGraph;

End.

Рис. 11. "Код программы Uses Graph "

Достоинства Turbo Pascal:

1. Удобная среда разработки, включающая функциональный отладчик, доступный в любой момент

2. Контекстная справочная система, по которой можно изучать язык без обращения к сторонним источникам.

3. Высокая скорость компиляции, высокая скорость выполнения откомпилированных программ.

Достоинства Excel(VBA):

1. Высокая скорость создания приложений с графическим интерфейсом для MS Windows.

2. Простой синтаксис, позволяющий очень быстро освоить язык.

3. Защита от ошибок, связанных с применением указателей и доступом к памяти. Этот аспект делает Visual Basic приложения более стабильными, но также является объектом критики.

ЗАКЛЮЧЕНИЕ

Стремление зафиксировать, сохранить надолго свое восприятие информации было всегда свойственно человеку. Мозг человека хранит множество информации, и использует для хранения ее свои способы. Человек всегда стремился иметь возможность поделиться своей информацией с другими людьми и найти надежные средства для ее передачи и долговременного хранения. Для этого в настоящее время изобретено множество способов хранения информации на внешних (относительно мозга человека) носителях и ее передачи на огромные расстояния.

Особым видом информации в настоящее время можно считать информацию, представленную в глобальной сети Интернет. Здесь используются особые приемы хранения, обработки, поиска и передачи распределенной информации больших объемов и особые способы работы с различными видами информации. Постоянно совершенствуется программное обеспечение, обеспечивающее коллективную работу с информацией всех видов.

В процессе разработки данных программных продуктов, поставленные цели были достигнуты.

Были выполнены следующие задачи:

1. Изучены общие положения теории информации.

2. Найдены и протестированы программы, реализующие выбранные задачи для их реализации на разных языках программирования.

3. Изучены алгоритмы программ.

В ходе курсовой работы были изучены некоторые аспекты программирования на языке Turbo Pascal, Excel(VBA). При оформлении курсовой работы были получены навыки оформления программной документации в соответствии с Единой Системой Программной Документации, а также большой практический опыт работы в Turbo Pascal7.0, Matlab6.5, MO Excel, MicrosoftWord 97. Теоретические сведения были закреплены практическими занятиями.

ИСПОЛЬЗОВАННАЯ ЛИТЕРАТУРА

1) Информатика. Энциклопедический словарь для начинающих. / Под ред. Поспелова Д.А., М.: Педагогика-Пресс, 1994. - 352 с.;

2) Казиев В.М. Информатика (в 3-х частях)., Нальчик, 1997. - 324 с.;

3) Колин, К. Информационная глобализация общества и гуманитарная революция / К. Колин // Alma Mater. - 2002. - № 8. - С. 32-34.;

4) Колмогоров А.Н. Теория информации и теория алгоритмов. - М.: Наука, 1987., 303 с.;

5) Кузнецов В.А., Ялунина Г.В. Основы метрологии - М.: Издательство стандартов, 1995 - 280 с.

6) Мазур М. Качественная теория информации., М.: Мир, 1974. - 240 с.;

7) Меняев, М.Ф. Информатика и основы программирования / М.Ф. Меняев. - М.: Омега-Л, 2007. - 458 с.;

8) Острейковский, В.А., Полякова, И.В. Информатика. Теория и практика / В.А. Острейковский, И.В. Полякова. - М.: Оникс, 2008. - 608 с.;

9) Радкевич Я.М., Лактионов Б.И. Метрология, стандартизация и взаимозаменяемость. - М.: Издательство Государственного горного университета, 1996 - 212 с.

10) Румянцева, Е.Л., Слюсарь, В.В. Информационные технологии / Е.Л. Румянцева, В.В. Слюсарь., М.: Инфра-М, 2007. - 256 с.;

11) Сергеев А.Г. Метрология - М.: Логос, 2005 г. - 272 с.

12) Степанов, А.Н. Информатика / А.Н. Степанов. ? СПб.: Питер, 2006. - 684 с..

ПРИЛОЖЕНИЕ

Листинг программы "Шифратор" на языке Microsoft Visual Basic.

Option Explicit

' Инициализация

Dim a, b

Dim OperationIndex As Integer

Dim memory

Dim vntFirst

Dim vntSecond

Dim vntResult

Dim IsInput As Boolean

Dim EndInput As Boolean

Dim drob As Boolean

' Запуск Калькулятора

Sub Calculator()

Load UserForm.Calculator

Show UserForm

End Sub

Private Sub UserForm_Initialize()

memory = 0

Call cmdClear_Click

End Sub

Private Sub cmdClear_Click()

' Очистка всех переменных

drob = False

txtNumber.Text = "0"

IsInput = False

EndInput = False

OperationIndex = -1

vntFirst = Empty

vntSecond = Empty

vntResult = Empty

End Sub

Private Sub cmdCE_Click()

If vntFirst = Empty Then

Call cmdClear_Click

Else

vntSecond = Empty

IsInput = False

EndInput = False

drob = False

With txtNumber

.Text = "0"

End With

End If

End Sub

Private Sub cmdMC_Click()

lblM.Visible = False

memory = 0

End Sub

Private Sub cmdM_plus_Click()

lblM.Visible = True

If vntFirst <> Empty Then ' есть первое число

If IsInput = True Then ' есть второе число

If OperationIndex <> 0 Then cmdOperation 0 ' если последняя операция не "=" то сосчитать

End If

End If

memory = memory + CDbl(txtNumber.Text)

EndInput = True

End Sub

Private Sub cmdM_minus_Click()

lblM.Visible = True

If vntFirst <> Empty Then ' есть первое число

If IsInput = True Then ' есть второе число

If OperationIndex <> 0 Then cmdOperation 0 ' если последняя операция не "=" то сосчитать

End If

End If

memory = memory - CDbl(txtNumber.Text)

EndInput = True

End Sub

Private Sub cmdMR_Click()

If lblM.Visible = True Then

EndInput = False

With txtNumber

IsInput = False

.Text = "0"

cmdNumber memory

End With

EndInput = True

End If

End Sub

Private Sub cmdDelete_Click()

If IsInput = True Then

With txtNumber

If .Text <> "0" Then

a = CDbl(.Text)

b = Len(.Text) - 1

a = Left(a, b)

If InStr(a, ",") = 0 Then drob = False

If b = 0 Then a = "0"

.Text = CStr(a)

End If

End With

End If

End Sub

' Кнопки цифровые

Private Sub cmd00_Click() ' Нажатие кнопки "00"

cmdNumber 0

cmdNumber 0

End Sub

Private Sub cmd0_Click() ' Нажатие кнопки "0"

cmdNumber 0

End Sub

Private Sub cmd1_Click() ' Нажатие кнопки "1"

cmdNumber 1

End Sub

Private Sub cmd2_Click() ' Нажатие кнопки "2"

cmdNumber 2

End Sub

Private Sub cmd3_Click() ' Нажатие кнопки "3"

cmdNumber 3

End Sub

Private Sub cmd4_Click() ' Нажатие кнопки "4"

cmdNumber 4

End Sub

Private Sub cmd5_Click() ' Нажатие кнопки "5"

cmdNumber 5

End Sub

Private Sub cmd6_Click() ' Нажатие кнопки "6"

cmdNumber 6

End Sub

Private Sub cmd7_Click() ' Нажатие кнопки "7"

cmdNumber 7

End Sub

Private Sub cmd8_Click() ' Нажатие кнопки "8"

cmdNumber 8

End Sub

Private Sub cmd9_Click() ' Нажатие кнопки "9"

cmdNumber 9

End Sub

Private Sub cmdZnak_Click() ' Нажатие кнопки "+/-"

With txtNumber

a = CDbl(.Text)

a = a * (-1)

.Text = CStr(a)

End With

If IsInput = False Then ' Если вводится первая цифра второго числа после включения команды

If vntFirst <> Empty Then vntFirst = CStr(a) ' то результат (в первом числе) меняет знак

End If

End Sub

Private Sub cmdDrob_Click() ' Нажатие кнопки ","

If EndInput = False Then

If drob = False Then

drob = True

With txtNumber

' Если вводится первая цифра числа

If IsInput = False Then

IsInput = True

.Text = "0,"

End If

' Если последней операцией было "="

If OperationIndex = 0 Then

IsInput = True

.Text = "0,"

vntFirst = Empty

OperationIndex = -1

End If

' Обработка

If .Text <> "0," Then .Text = .Text & ","

End With

End If

End If

End Sub

Sub cmdNumber(Index)

If EndInput = False Then

With txtNumber

' Если вводится первая цифра числа

If IsInput = False Then

IsInput = True

.Text = "0"

End If

' Если последней операцией было "="

If OperationIndex = 0 Then

IsInput = True

.Text = "0"

vntFirst = Empty

OperationIndex = -1

End If

' Обработка выбраной цифры

If .Text <> "0" Then

.Text = .Text & Index

Else

.Text = Index

End If

End With

End If

End Sub

' Кнопки операций

Private Sub cmdRavno_Click() ' Нажатие кнопки "="

If cmdRavno.Caption = "=" Then

cmdOperation 0

cmdRavno.Caption = "OK"

Else

cmdRavno.Caption = "="

ActiveCell.Value = txtNumber.Text

Unload Me

End If

End Sub

Private Sub cmdPlus_Click() ' Нажатие кнопки "+"

cmdOperation 1

End Sub

Private Sub cmdMinus_Click() ' Нажатие кнопки "-"

cmdOperation 2

End Sub

Private Sub cmdUmnozenie_Click() ' Нажатие кнопки "*"

cmdOperation 3

End Sub

Private Sub cmdDelenie_Click() ' Нажатие кнопки "/"

cmdOperation 4

End Sub

Sub cmdOperation(Index As Integer)

EndInput = False

If IsInput = True Then

' Включение обработки ошибок

On Error GoTo errorlabel

With txtNumber

' Если введено только первое число

If vntFirst = Empty Then

vntFirst = CDbl(.Text)

OperationIndex = Index

IsInput = False

Else

' Если введены оба числа

vntSecond = CDbl(.Text)

Select Case OperationIndex

Case 1

vntResult = vntFirst + vntSecond

Case 2

vntResult = vntFirst - vntSecond

Case 3

vntResult = vntFirst * vntSecond

Case 4

If vntSecond <> 0 Then

vntResult = vntFirst / vntSecond

Else

' Проверка деления на ноль

vntResult = MsgBox("Деление на ноль", vbOKOnly + vbCritical, "Ошибка")

vntResult = 0

End If

End Select

.Text = CStr(vntResult)

vntFirst = vntResult

' Очистка лишних данных

vntSecond = Empty

vntResult = Empty

IsInput = False

OperationIndex = Index

End If

End With

Else

' Если два раза подряд выбираются операции

If OperationIndex = 0 Then

If Index > 0 Then

OperationIndex = Index

IsInput = False

Else

Beep ' сигнал если второй раз нажато "="

End If

Else

Beep ' сигнал если второй раз нажато "+", "-", "*", "/"

End If

End If

drob = False

Exit Sub

' Обработка ошибки

errorlabel:

vntResult = "Превышение диапазона"

vntResult = MsgBox(vntResult, vbOKOnly + vbCritical, "Ошибка")

Call cmdClear_Click

End Sub

Размещено на Allbest.ru

...

Подобные документы

  • Программирование и структура программы на языке Turbo Pascal и MS Visual C++6.0. Вычисление площади круга. Реализация программы в системе Turbo Pascal и MS VISUAL C++6.0 для Windows. Структура окна ТРW. Сохранение текста программы в файле на диске.

    лабораторная работа [3,7 M], добавлен 22.03.2012

  • Язык программирования Visual Basic: краткая история возникновения, значение и общая характеристика. Изучение основных свойств Visual Basic, синтаксис языка. Обзор ключевых операторов Visual Basic, пользовательские процедуры и функции данного языка.

    контрольная работа [36,4 K], добавлен 23.07.2014

  • Характеристика вычислительной системы и инструментов разработки. Программирование на языке Pascal в среде Turbo Pascal и на языке Object Pascal в среде Delphi. Использование процедур, функций, массивов, бинарного поиска. Создание базы данных в виде файла.

    отчет по практике [2,1 M], добавлен 02.05.2014

  • Этапы подготовки и решения задач на компьютере. Способы предоставления алгоритмов. Простые типы данных и их обработка. Основы работы с графикой и графическими операторами в Visual Basic. Организация линейной программы. Процедуры и функции в языке Паскаль.

    дипломная работа [1,9 M], добавлен 25.10.2015

  • Разработка программы, создающей и управляющей базой данных, ее реализация на языке Turbo Pascal. Организация алгоритма программы. Вывод информации и возможность добавления информации в базу данных. Поиск информации в базе данных по заданному значению.

    курсовая работа [26,7 K], добавлен 19.06.2010

  • Рождение и развитие Basic. Краткое описание Visual Basic for Applications. Новые возможности Visual Basic 5.0. Пример взаимодействия Excel и Visual Basic. Программирование табличных функций. Встраивание, применение функций. Формы, средства управления OLE.

    реферат [20,7 K], добавлен 11.03.2010

  • Написание тестирующей программы для проверки знаний учащихся с помощью языка программирования Visual Basic for Applications (VBA), встроенного в пакет Microsoft Office. Общие сведения о программе, условия ее выполнения, настройка, проверка, выполнение.

    контрольная работа [25,2 K], добавлен 07.06.2010

  • Программный проект Баз данных средствами Visual Basic 6.0. Проектирование структуры таблицы базы данных Visual Basic 6.0. Заполнение созданных таблиц БД исходными данными. Создание пользовательского меню. Вид формы и свойства элементов управления.

    курсовая работа [3,0 M], добавлен 19.06.2010

  • Изучение требований и реализации пользовательского интерфейса в среде Turbo Pascal. Разработка текстового, графического режимов работы дисплеев. Рассмотрение численных методов решения трансцендентных уравнений, их алгоритмизации и программирования.

    шпаргалка [776,8 K], добавлен 07.05.2010

  • Структура и основные элементы языка Turbo Pascal. Алгоритм составления простейших программ на Turbo Pascal. Применение условного оператора и сильноветвящихся алгоритмов. Циклы с предусловием и постусловием, сочетание циклических и условных операторов.

    реферат [64,0 K], добавлен 20.03.2016

  • Общие понятия реляционного похода к базам данных. Разработка программы для автоматизации функций руководителя салона сотовой связи. Детализация бизнес-процессов. Интерфейс для работы пользователя. Тестирование разработанной информационной системы.

    курсовая работа [2,2 M], добавлен 26.06.2012

  • Разработка алгоритма поставленной задачи по обработке числовой информации в среде Turbo Pascal 7.0 с базовым языком программирования Pascal, отладка программы, реализующей разработанный алгоритм. Описание структуры программы, ее вспомогательных процедур.

    курсовая работа [668,0 K], добавлен 25.02.2010

  • Разработка программ на языке Turbo Pascal на основе использования массивов данных. Особенности хранения данных, способы объявления переменных, действия над элементами массивов, их ввод и вывод. Практическое применение одномерных и многомерных массивов.

    методичка [17,8 K], добавлен 25.11.2010

  • При помощи Turbo Pascal достаточно не просто создать программу, которая бы демонстрировала работу с базами данных. Для этого существует огромное количество специализированных программ. Основа и сущность формирования базы данных при помощи Turbo Pascal.

    курсовая работа [479,7 K], добавлен 04.07.2008

  • Понятие объектно-ориентированного программирования, характеристика используемых языков. Практическая разработка средств объектно-ориентированного программирования в задачах защиты информации: программная реализация на языке С++, а также Turbo Pascal.

    курсовая работа [275,9 K], добавлен 22.12.2011

  • Рабочая среда Visual Basic (VB) и ее основные компоненты. Ввод и вывод данных в VB. Объявление переменных и констант в программе. Создание и работа с процедурами и функциями, их виды. Организация ветвления в VB. Использование циклов в программировании.

    практическая работа [502,5 K], добавлен 26.10.2013

  • Сравнительная характеристика средств обучения программированию в среде Visual Basic. Задачи проектируемых автоматизированных программных систем. Комплекс технических средств. Математическое и программное обеспечение. Язык программирования Visual Basic.

    дипломная работа [64,1 K], добавлен 17.05.2007

  • Разработка программного продукта с помощью языка программирования Visual Basic. Описание интерфейса пользователя и возможностей программы. Исходный код основных модулей. Программа, демонстрирующая основные возможности диаграмм и среды Visual Basic.

    контрольная работа [989,9 K], добавлен 29.03.2011

  • Принцип программного управления искусственной (инженерной) системы, предназначенной для восприятия, хранения, обработки и передачи информации. Характеристика языков программирования Basic и Pascal. Управление базами данных и обеспечение локальных сетей.

    контрольная работа [40,5 K], добавлен 22.04.2011

  • Общее понятие архивации. Особенности программ архиваторов. Основные методы сжатия информации. Методические основы изучения темы "Архивация данных и сжатие информации" на уроках информатики в базовом курсе. Разработка блока уроков по сжатию информации.

    курсовая работа [3,0 M], добавлен 03.06.2012

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.