Компьютеры, программирование

  • 9281. Создание программного модуля, позволяющего сохранить данные аварийного буфера на верхнем уровне и представить их в табличной и графической форме
    Дипломная работа пополнение в коллекции 27.08.2012

    ТипыОтечественныеЗарубежныеПрофессиональныеНетSAS, BMDPУниверсальныеSTADIA, OlympSTATGRAPHICS, SPSS STATISTICA, S-PLUSСпециализированныеMesosaur, DataScope, Класс-Мастер, Эвриста, САНИБольшое многообразие

    • Выбор пакета для обработки данных зависит от характера решаемых задач, объема обрабатываемого материала, квалификации пользователей, имеющегося оборудования и т.д.
    • Для пользователей, имеющих дело со сверхбольшими объемами данных или узкоспециализированными методами анализа, пока нет альтернативы профессиональным западным пакетам. Среди них самыми широкими возможностями обладает SAS. Для создания собственной системы обработки данных можно обратиться к библиотеке IMSL, содержащей сотни тщательно и квалифицированно составленных статистических подпрограмм.
    • Несколько меньшими возможностями обладают универсальные пакеты. Вместе с тем, их стоимость значительно ниже, чем профессиональных. При приобретении такого пакета не мешает, однако, лишний раз убедиться, что он содержит требуемые методы обработки.
    • Все универсальные пакеты имеют много пересечений по составу статистических процедур. Кроме того, современные версии программ обладают, как правило, модульной структурой, что позволяет существенно экономить средства. Windows-интерфейс последних версий пакетов во многом унифицирует взаимодействие пользователя с аналитическими, графическими и системными процедурами. Основные отличия кроются, главным образом, в цене. Кроме того, по-разному организован диалог. Здесь в лучшую сторону отличается STATGRAPHICS Plus for Windows [1].
    • Среди методов обработки данных выделяют три основные группы. Первая предназначена для получения и представления общих (описательных) характеристик числовых данных. Методы второй группы ориентированы на сравнение двух и более выборок чисел. И наконец, методы третьей группы нацелены на выявление и отражение взаимосвязей в данных.
    • С указанными задачами приходится сталкиваться в процессе работы многим людям (особенно руководителям, бизнесменам, экономистам и т.п.) при принятии решений, оценке результатов предпринятых действий, контроле, планировании и прогнозировании. Методы решения таких задач универсальны.
    • Так как различные универсальные пакеты имеют множество пересечений, то на примере STATGRAPHICS покажем основные возможности универсальных пакетов по обработке статистических данных [1].
    • Статистический графический пакет STATGRAPHICS, разработанный американской корпорацией Manugistics для IBM-совместимых компьютеров, по признанию многих авторитетных журналов (Infoworld, Software Digest и др.) является на сегодняшний день одной из наиболее эффективных систем статистического анализа данных. Столь высокую оценку STATGRAPHICS заслужил главным образом благодаря удачному соединению научных методов обработки разнотипных данных с современной интерактивной графикой. Этот альянс подкреплен широкими возможностями взаимодействия с другими программными продуктами (электронными таблицами, базами данных) и периферийными устройствами. Дружественный интерфейс и тщательно отшлифованная документация способствуют быстрому освоению пакета как специалистами в области математической статистики, так и представителями других сфер деятельности (бизнеса, производства, экономики, медицины, химии, биологии, психологии и др.).
    • В DOS-версию пакета включено более 250 процедур обработки данных по следующим разделам математической статистики [1]:
    • · Анализ вариаций (дисперсионный анализ)
    • · Анализ временных рядов
    • · Дескриптивная (описательная) статистика
    • · Контроль качества
    • · Непараметрический анализ
    • · Планирование эксперимента
    • · Подбор распределений
    • · Прогнозирование
    • · Разведочный анализ
    • · Регрессионный анализ
    • В России STATGRAPHICS хорошо известен; давно и интенсивно применяется. Пользователи пакета знакомы в основном с его ранними версиями, имевшими свободное распространение. В последующих версиях возможности STATGRAPHICS существенно расширены. Так, например, усовершенствованы многие процедуры, повышены скорость и объем обрабатываемых данных, введена экспертная консультационная система StatAdvisor, фактически представляющая собой интеллектуальную экспертную систему интерпретации результатов статистического анализа, аккумулирующую знания высококвалифицированных специалистов в этой тонкой и многогранной предметной области.
    • В 1994 году выпускается версия STATGRAPHICS для работы в среде Windows.
    • По сравнению с DOS-версией статистические процедуры более продвинуты и по-иному сгруппированы, а весь пакет в целом имеет модульную структуру [1].
    • Рассмотрим отечественную разработку - ЭЛЕКТРОННАЯ СИСТЕМА СТАТИСТИЧЕСКОГО АНАЛИЗА И ПРОГНОЗИРОВАНИЯ ОЛИМП [3].
    • Пакет ОЛИМП, разработанный фирмой НеоСофт, предназначен для автоматизации обработки данных статистическими методами. Данный пакет реализован в расчете на самых разнообразных пользователей - от новичков до экспертов в области статистики. В настоящее время ОЛИМП является одним из лучших отечественных пакетов в области статистического анализа и прогнозирования данных.
    • С помощью программы решен ряд сложных задач анализа данных в самых разных областях - исследование факторов ценообразования и прогноз инфляции на рынке недвижимости, ввод и обработка данных социологического исследования по состоянию и перспективам жилищного строительства, определение норм расхода материалов в капитальном строительстве, измерение факторов экологической обстановки, обработка результатов психологического тестирования в условиях сильной мультиколлинеарности исходных данных и ряд других задач. Программа успешно используется в учебном процессе для подготовки студентов по курсам математической статистики и прогнозирования в ряде вузов страны [3].
    • В состав программного комплекса, помимо основной программы, входят также:
    • электронная таблица MNCALC;
    • программа подготовки и ввода анкет ПСИ;
    • утилита выборочного экспорта данных из формата DBF;
  • 9282. Создание программного обеспечения для небольшого супермаркета
    Дипломная работа пополнение в коллекции 13.12.2011

    По характеру своей деятельности супермаркет - организация, целью которой является продажа населению продуктов и прочих товаров широкого потребления с целью получения прибыли. В связи с этим естественным представляется отведение большинства реализуемых АСУ функций соответствующей подсистеме.)Генерация списков товаров, присутствующих на складах; эта функция необходима для быстрого определения товаров, закончившийся запас которых на витринах может быть оперативно пополнен без необходимости заказа новых партий товара поставщику;)Генерация списков товаров, отсутствующих на складах, для оформления поставщику соответствующего заказа;)Генерация списков товаров, имеющихся в наличии на складах и на витринах, срок годности которых истек; эта функция необходима для списания соответствующих товаров и оформления поставщику новых заказов на эти товары; при этом стоимость списанных товаров засчитывается в чистый убыток супермаркета;)Смена цен товаров в БД при изменении последних;)Автоматизированное начисление наценок на товары в соответствии с текущим экономическим положением супермаркета;)Занесение в товарную БД наименований товаров, отсутствовавших в ней ранее, при поступлении соответствующих товаров от поставщика с последующим назначением этим товарам уникальных идентификационных номеров и цен, определяемых поставщиком; увеличение числа товарных единиц при поступлении от поставщика товаров, присутствовавших в БД;)Сверка идентификационных номеров товаров при покупке последних пользователем супермаркета, автоматическое определение цен товаров по этим номерам и уменьшение числа соответствующих единиц товара в БД в соответствии с размером сделанной пользователем покупки. При этом стоимость купленных товаров записывается в чистую прибыль супермаркета.

  • 9283. Создание программного обеспечения электронного учебника
    Дипломная работа пополнение в коллекции 02.11.2010

    Достоинства электронного учебника:

    1. Повышается производительность труда преподавателя.
    2. Работа с электронными учебниками активизирует самостоятельное мышление студентов.
    3. Индивидуальный темп обучения. Под этим подразумевается не только «индивидуализация» по времени, так как обучение при классно-урочной системе подчинено жестким временным рамкам, но и вариантность развернутости учебного материала, учет типа памяти, темперамента и мышления учащегося.
    4. Режим электронных конференций позволяет эффективно производить чтение проблемных лекций.
    5. Электронный учебник восприимчив к новой информации, оперативно можно вводить нововведения, связанные с реформированием общественно-политической, экономической жизнью.
    6. Обеспечение каждого студента несколькими альтернативными учебниками по каждому курсу, включая зарубежные источники.
    7. Существенное повышение эффективности обучения за счет использования информационных технологий.
    8. Осуществление широкого контроля учебной деятельности, в том числе и самостоятельной работы обучающихся.
    9. Приобщение к использованию современных информационных технологий как обучающихся, так и преподавателей.
    10. Использование мультимедийных возможностей, позволяющее сделать содержание более наглядным, понятным.
    11. Возможность снабдить учебный материал динамическими рисунками, использование которых позволяет студенту экспериментировать, рассматривать изучаемое явление с разных сторон.
    12. Возможность моделировать.
    13. Возможность быстро и эффективно тестировать или как-нибудь иначе проверять знания студентов.
    14. Возможность организовывать самостоятельную работу студентов, давать подсказки, справки и многое другое.
    15. Использование гипертекстовых ссылок, позволяющее мгновенно отыскать нужное понятие, в считанные доли секунды «перелистать» многие страницы изучаемого текста.
    16. Пожалуй, одно из самых главных достоинств возможность организовывать виртуальную лабораторную работу, которую по тем или иным причинам невозможно провести в реальной обстановке.
  • 9284. Создание программных продуктов для обработки экспериментальных данных. Идентификация параметров
    Дипломная работа пополнение в коллекции 20.05.2011

    Разработка программного интерфейса осуществляется на принципах объектно-ориентированного подхода, реализованного в VB применительно к приложениям, выполняемым под управлением Windows. Для таких приложений характерным является существование на экране в любой момент времени множества объектов: окон, кнопок, меню, текстовых и диалоговых окон и т.п. Для каждого объекта на экране существует ряд возможных событий. Каждое событие проявляется в определенных действиях (откликах программы). Эти действия можно разделить на две группы. Первая является следствием свойств объекта. Вторая группы действий (отклика) полностью определяется программистом.

  • 9285. Создание программных продуктов для решения задач
    Информация пополнение в коллекции 12.01.2009

    Большинство компьютеров в рамках всего мира работают под управлением операционной системы Windows корпорации Microsoft. Каждый пользователь хотя бы раз в жизни работал с приложениями Word, Excel или Access. Практические задачи иногда требуют обмена данными между прило-жениями; пусть, например, имеется база данных, нужно сделать запрос к ней, а затем математическую обработку результатов запроса, которую, можно выполнить только с использованием Excel; здесь следует передать резуль-таты запроса в приложение Excel и для этого нужно использовать язык про-граммирования.

  • 9286. Создание программы Tweaker
    Дипломная работа пополнение в коллекции 10.10.2011

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

  • 9287. Создание программы авторизации пользователя с помощью пароля
    Контрольная работа пополнение в коллекции 18.10.2009

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

  • 9288. Создание программы для вычисления площади геометрических фигур в среде Visual Basic
    Курсовой проект пополнение в коллекции 16.07.2012

    Здесь создается объект s, принадлежащий классу String, и объект i, принадлежащий классу Integer. Переменные s и i - это объекты (как модели сущностей "строка" и "целое число"), а типы данных String и Integer - классы, к которым данные объекты относятся. Эти классы определяют диапазон возможных состояний объекта и его поведение. Внутреннее состояние объекта, относящегося к классу Integer, характеризуется целым числом; объект же, относящийся к классу String, характеризуется символьной строкой. То же можно сказать и о поведении: принадлежность двух объектов классу Integer дает возможность их складывать, вычитать, перемножать и делить; принадлежность классу String не гарантирует, что можно производить арифметические действия, зато определяет операцию конкатенации ("приписывания" одной строки в конец другой), которая не работает в случае объектов класса Integer.

  • 9289. Создание программы для определения вершин пирамиды с выпуклым основанием по данным точкам
    Курсовой проект пополнение в коллекции 26.02.2011

    1) Function Vypuklost(var P:P_descriptor;mno:mnoj;n:byte):boolean;;

    1. Назначение: Проверяет многоугольник на выпуклость, путем перебора n точек из множества mno ,формированием их в векторы и последующим векторным перемножением . Возвращает значение истины, если при все N точках знак векторного умножения сохраняется, иначе -ложь;
    2. Входные параметры: P,mno,n;
    3. Выходные параметры: P.
    4. Возврат : Q
  • 9290. Создание программы для проверки знаний cотрудников ОАО "Ростелеком"
    Курсовой проект пополнение в коллекции 16.06.2012

    Рассмотрим основные общие процедуры:TLogin.BitBtn1Click(Sender: TObject) - процедура входа в программу тестированияTForm1.NextClick(Sender: TObject);- процедура начала тестирования и перехода к следующему вопросуTForm1.JournalClick(Sender: TObject);- процедура перехода к журналу уже проходивших тестированиеTForm1.TeorMaterClick(Sender: TObject);- процедура перехода к теоретическому материалуTForm1.CancelClick(Sender: TObject);- процедура выхода из тестаTOtchett.ClearClick(Sender: TObject);- процедура отчистки данных о проходивших тестированиеTSpravkaa.BitBtn1Click(Sender: TObject);- процедура получения справки по выбранной темеCryptFile(const fileName: String); StdCall;-.процедура зашифровки файла с ответамиDeCryptFile(const fileName: String); StdCall;-.процедура расшифровки файла с ответамиTForm1.Quest(1-30)(); - процедуры в которых хранятся вопросыTform1.schet();- процедура проверки количества правильных ответовtform1.zapis(); - процедура записи ответов в текстовый файлTLogin.Edit2KeyPress(Sender: TObject; var Key: Char); - процедура обработки исключительной ситуацииTestBegin(); - процедура начала тестированияTekVopros(); - процедура смены вопросов и считывания ответаresultat(); - процедура вывода результатов тестированияOzenka(); - процедура обработки ответов данных на тест и вычисление оценки по 5ти бальной шкалеFormClose(Sender: TObject; var Action: TCloseAction); - процедура завершения тестирования и закрытия программыBitBtn1Click(Sender: TObject); - процедура выдачи справки по выбранной теме

  • 9291. Создание программы для решения нелинейных уравнений
    Контрольная работа пополнение в коллекции 23.06.2012

    Будем искать корень функции f(x). Выберем две начальные точки C1(x1;y1) и C2(x2;y2) и проведем через них прямую. Она пересечет ось абсцисс в точке (x3;0). Теперь найдем значение функции с абсциссой x3. Временно будем считать x3 корнем на отрезке [x1;x2]. Пусть точка C3 имеет абсциссу x3 и лежит на графике. Теперь вместо точек C1 и C2 мы возьмём точку C3 и точку C2. Теперь с этими двумя точками проделаем ту же операцию и так далее, то есть будем получать две точки Cn + 1 и Cn и повторять операцию с ними. Отрезок, соединяющий последние 2 точки, пересекает ось абсцисс в точке, значение абсциссы которой можно приближённо считать корнем. Эти действия нужно повторять до тех пор, пока не получим значение корня с нужным приближением.

  • 9292. Создание программы для составления расписания в школе
    Дипломная работа пополнение в коллекции 18.01.2012

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

  • 9293. Создание программы интеллектуального преобразователя сигнала
    Дипломная работа пополнение в коллекции 11.01.2012

    Целью данной курсовой работы является создание программы на языке ассемблера, интеллектуального преобразователя сигнала, основанного на следующей системе правил:

  • 9294. Создание программы на языке Delphi
    Курсовой проект пополнение в коллекции 18.09.2010

     

    1. unit Unit1;
    2. interface
    3. uses
    4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    5. Dialogs, StdCtrls;
    6. type
    7. TForm1 = class(TForm)
    8. Edit1: TEdit;
    9. Label1: TLabel;
    10. Button1: TButton;
    11. RadioButton1: TRadioButton;
    12. RadioButton2: TRadioButton;
    13. RadioButton3: TRadioButton;
    14. RadioButton4: TRadioButton;
    15. procedure FormCreate(Sender: TObject);
    16. procedure Button1Click(Sender: TObject);
    17. { Private declarations }
    18. public
    19. { Public declarations }
    20. end;
    21. var
    22. Form1: TForm1;
    23. QNomber:integer;
    24. ball:real;
    25. implementation
    26. {$R *.dfm}
    27. procedure TForm1.FormCreate(Sender: TObject);
    28. begin
    29. Label1.Caption:='Введите свое Имя и Фамилию';
    30. Edit1.Text:='';
    31. RadioButton1.Visible:=False;
    32. RadioButton2.Visible:=False;
    33. RadioButton3.Visible:=False;
    34. RadioButton4.Visible:=False;
    35. Button1.Caption:='Начать';
    36. QNomber:=0;
    37. ball:=0;
    38. end;
    39. procedure TForm1.Button1Click(Sender: TObject);
    40. var
    41. QCheck:Boolean;
    42. rezball:real;
    43. rezint:integer;
    44. begin
    45. QCheck:=False;
    46. f (RadioButton1.Checked=True)or(RadioButton2.Checked=True)or(RadioButton3.Checked=True)or(RadioButton4.Checked=True)then QCheck:=True;
    47. case QNomber of
    48. 0:begin
    49. Label1.Caption:='Перечень пунктов главного меню содержит:';
    50. Edit1.Visible:=False;
    51. RadioButton1.Visible:=True;
    52. RadioButton1.Caption:='Испкавление, Редактирование, Компиляция';
    53. RadioButton2.Visible:=True;
    54. RadioButton2.Caption:='Рендеринг, Превью, Правка';
    55. RadioButton3.Visible:=True;
    56. RadioButton3.Caption:='Файл, Правка, Вставка';
    57. RadioButton4.Visible:=True;
    58. RadioButton4.Caption:='Отсчет, Компиляция, Рендеринг';
    59. Button1.Caption:='Следующий вопрос';
    60. inc(QNomber);
    61. end;
    62. 1:if QCheck=True then begin
    63. if RadioButton3.Checked=True then ball:=ball+1;
    64. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    65. Label1.Caption:='Меню "Файл" содержит пункты:';
    66. RadioButton1.Caption:='Создать, Открыть, Сохранить';
    67. RadioButton2.Caption:='Вырезать, Вставить, Заменить';
    68. RadioButton3.Caption:='Начать показ, Смена слайдов';
    69. RadioButton4.Caption:='Шрифт, Оформление слайда, Разметка слайда';
    70. inc(QNomber);
    71. end;
    72. 2:if QCheck=True then begin
    73. if RadioButton1.Checked=True then ball:=ball+1;
    74. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    75. Label1.Caption:='Меню "Показ слайдов" содержит пункты:';
    76. RadioButton1.Caption:='Создать, Открыть, Сохранить';
    77. RadioButton2.Caption:='Вырезать, Вставить, Заменить';
    78. RadioButton3.Caption:='Начать показ, Смена слайдов';
    79. RadioButton4.Caption:='Шрифт, Оформление слайда, Разметка слайда';
    80. inc(QNomber);
    81. end;
    82. 3:if QCheck=True then begin
    83. if RadioButton3.Checked=True then ball:=ball+1;
    84. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    85. Label1.Caption:='Меню "Правка" содержит пункты:';
    86. RadioButton1.Caption:='Создать, Открыть, Сохранить';
    87. RadioButton2.Caption:='Вырезать, Вставить, Заменить';
    88. RadioButton3.Caption:='Начать показ, Смена слайдов';
    89. RadioButton4.Caption:='Шрифт, Оформление слайда, Разметка слайда';
    90. inc(QNomber);
    91. end;
    92. 4:if QCheck=True then begin
    93. if RadioButton2.Checked=True then ball:=ball+1;
    94. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    95. Label1.Caption:='Меню "Формат" содержит пункты:';
    96. RadioButton1.Caption:='Создать, Открыть, Сохранить';
    97. RadioButton2.Caption:='Вырезать, Вставить, Заменить';
    98. RadioButton3.Caption:='Начать показ, Смена слайдов';
    99. RadioButton4.Caption:='Шрифт, Оформление слайда, Разметка слайда';
    100. inc(QNomber);
    101. end;
    102. 5:if QCheck=True then begin
    103. if RadioButton4.Checked=True then ball:=ball+1;
    104. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    105. Label1.Caption:='Панель "Рисование" содержит:';
    106. RadioButton1.Caption:='Возможность добавления рисунка';
    107. RadioButton2.Caption:='Добавление обьекта WordArt';
    108. RadioButton3.Caption:='Объекты рисования фигур, линий и стрелок';
    109. RadioButton4.Caption:='Возможность изменения толщины линий таблиц и границ';
    110. inc(QNomber);
    111. end;
    112. 6:if QCheck=True then begin
    113. if RadioButton3.Checked=True then ball:=ball+1;
    114. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    115. Label1.Caption:='Панель "Таблицы и границы" содержит:';
    116. RadioButton1.Caption:='Возможность добавления рисунка';
    117. RadioButton2.Caption:='Добавление обьекта WordArt';
    118. RadioButton3.Caption:='Объекты рисования фигур, линий и стрелок';
    119. RadioButton4.Caption:='Возможность изменения толщины линий таблиц и границ';
    120. inc(QNomber);
    121. end;
    122. 7:if QCheck=True then begin
    123. if RadioButton4.Checked=True then ball:=ball+1;
    124. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    125. Label1.Caption:='Панель "WordArt" содержит:';
    126. RadioButton1.Caption:='Возможность добавления рисунка';
    127. RadioButton2.Caption:='Добавление обьекта WordArt';
    128. RadioButton3.Caption:='Объекты рисования фигур, линий и стрелок';
    129. RadioButton4.Caption:='Возможность изменения толщины линий таблиц и границ';
    130. inc(QNomber);
    131. end;
    132. 8:if QCheck=True then begin
    133. if RadioButton2.Checked=True then ball:=ball+1;
    134. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    135. Label1.Caption:='Панель "Настройка изоюражения" содержит:';
    136. RadioButton1.Caption:='Возможность добавления рисунка';
    137. RadioButton2.Caption:='Добавление обьекта WordArt';
    138. RadioButton3.Caption:='Объекты рисования фигур, линий и стрелок';
    139. RadioButton4.Caption:='Возможность изменения толщины линий таблиц и границ';
    140. inc(QNomber);
    141. end;
    142. 9:if QCheck=True then begin
    143. if RadioButton1.Checked=True then ball:=ball+1;
    144. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    145. Label1.Caption:='Панель "Форматирование" содержит:';
    146. RadioButton1.Caption:='Настройки шрифта, расположение текста и т.д.';
    147. RadioButton2.Caption:='Возможность навигации по стандартным пуктам меню такие как "Файл"';
    148. RadioButton3.Caption:='Возможность быстрого сознания и сохранения презентации';
    149. RadioButton4.Caption:='Возможность добавления примечаний и рецензетов';
    150. inc(QNomber);
    151. end;
    152. 10:if QCheck=True then begin
    153. if RadioButton1.Checked=True then ball:=ball+1;
    154. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    155. Label1.Caption:='Панель "Строка меню" содержит:';
    156. RadioButton1.Caption:='Настройки шрифта, расположение текста и т.д.';
    157. RadioButton2.Caption:='Возможность навигации по стандартным пуктам меню такие как "Файл"';
    158. RadioButton3.Caption:='Возможность быстрого сознания и сохранения презентации';
    159. RadioButton4.Caption:='Возможность добавления примечаний и рецензетов';
    160. inc(QNomber);
    161. end;
    162. 11:if QCheck=True then begin
    163. if RadioButton2.Checked=True then ball:=ball+1;
    164. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    165. Label1.Caption:='Панель "Стандартная" содержит:';
    166. RadioButton1.Caption:='Настройки шрифта, расположение текста и т.д.';
    167. RadioButton2.Caption:='Возможность навигации по стандартным пуктам меню такие как "Файл"';
    168. RadioButton3.Caption:='Возможность быстрого сознания и сохранения презентации';
    169. RadioButton4.Caption:='Возможность добавления примечаний и рецензетов';
    170. inc(QNomber);
    171. end;
    172. 12:if QCheck=True then begin
    173. if RadioButton3.Checked=True then ball:=ball+1;
    174. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    175. Label1.Caption:='Панель "Рецензирование" содержит:';
    176. RadioButton1.Caption:='Настройки шрифта, расположение текста и т.д.';
    177. RadioButton2.Caption:='Возможность навигации по стандартным пуктам меню такие как "Файл"';
    178. RadioButton3.Caption:='Возможность быстрого сознания и сохранения презентации';
    179. RadioButton4.Caption:='Возможность добавления примечаний и рецензетов';
    180. inc(QNomber);
    181. end;
    182. 13:if QCheck=True then begin
    183. if RadioButton4.Checked=True then ball:=ball+1;
    184. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    185. Label1.Caption:='Панель "Справка" содержит:';
    186. RadioButton1.Caption:='Справку MS PowerPoint, информацию о программе';
    187. RadioButton2.Caption:='Возможность различного взаиморасположения окон';
    188. RadioButton3.Caption:='Проверку орфографии';
    189. RadioButton4.Caption:='Возможность создания нового слайда, дублирования слайда';
    190. inc(QNomber);
    191. end;
    192. 14:if QCheck=True then begin
    193. if RadioButton1.Checked=True then ball:=ball+1;
    194. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    195. Label1.Caption:='Панель "Окно" содержит:';
    196. RadioButton1.Caption:='Справку MS PowerPoint, информацию о программе';
    197. RadioButton2.Caption:='Возможность различного взаиморасположения окон';
    198. RadioButton3.Caption:='Проверку орфографии';
    199. RadioButton4.Caption:='Возможность создания нового слайда, дублирования слайда';
    200. inc(QNomber);
    201. end;
    202. 15:if QCheck=True then begin
    203. if RadioButton2.Checked=True then ball:=ball+1;
    204. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    205. Label1.Caption:='Панель "Сервис" содержит:';
    206. RadioButton1.Caption:='Справку MS PowerPoint, информацию о программе';
    207. RadioButton2.Caption:='Возможность различного взаиморасположения окон';
    208. RadioButton3.Caption:='Проверку орфографии';
    209. RadioButton4.Caption:='Возможность создания нового слайда, дублирования слайда';
    210. inc(QNomber);
    211. end;
    212. 16:if QCheck=True then begin
    213. if RadioButton3.Checked=True then ball:=ball+1;
    214. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    215. Label1.Caption:='Панель "Вставка" содержит:';
    216. RadioButton1.Caption:='Справку MS PowerPoint, информацию о программе';
    217. RadioButton2.Caption:='Возможность различного взаиморасположения окон';
    218. RadioButton3.Caption:='Проверку орфографии';
    219. RadioButton4.Caption:='Возможность создания нового слайда, дублирования слайда';
    220. inc(QNomber);
    221. end;
    222. 17:if QCheck=True then begin
    223. if RadioButton4.Checked=True then ball:=ball+1;
    224. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    225. Label1.Caption:='В каком формате сохраняются презентации';
    226. RadioButton1.Caption:='*.avi';
    227. RadioButton2.Caption:='*.txt';
    228. RadioButton3.Caption:='*.ppt';
    229. RadioButton4.Caption:='*.doc';
    230. inc(QNomber);
    231. end;
    232. 18:if QCheck=True then begin
    233. if RadioButton3.Checked=True then ball:=ball+1;
    234. rezball:=ball/18*12;
    235. rezball:=rezball;
    236. RadioButton1.Checked:=False;RadioButton2.Checked:=False;RadioButton3.Checked:=False;RadioButton4.Checked:=False;
    237. Label1.Caption:='Вы ответили правильно на '+FloatToStr(ball)+' вопросов. Ваш балл '+FloatToStr(rezball);
    238. RadioButton1.Visible:=False;
    239. RadioButton2.Visible:=False;
    240. RadioButton3.Visible:=False;
    241. RadioButton4.Visible:=False;
    242. inc(QNomber);
    243. end;
    244. end;
    245. end;
    246. end.
  • 9295. Создание программы на языке Delphi 7.0
    Курсовой проект пополнение в коллекции 17.09.2010

     

    1. unit Unit1;
    2. interface
    3. uses
    4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    5. Dialogs, StdCtrls;
    6. type
    7. TForm1 = class(TForm)
    8. Button1: TButton;
    9. Button2: TButton;
    10. OpenDialog1: TOpenDialog;
    11. SaveDialog1: TSaveDialog;
    12. Button3: TButton;
    13. Label1: TLabel;
    14. Label2: TLabel;
    15. Label3: TLabel;
    16. Label4: TLabel;
    17. Button4: TButton;
    18. procedure Button1Click(Sender: TObject);
    19. procedure Button2Click(Sender: TObject);
    20. procedure FormCreate(Sender: TObject);
    21. procedure Button3Click(Sender: TObject);
    22. procedure Button4Click(Sender: TObject);
    23. private
    24. { Private declarations }
    25. public
    26. { Public declarations }
    27. end;
    28. var
    29. Form1: TForm1;
    30. OFName,SFName:String;
    31. implementation
    32. {$R *.dfm}
    33. procedure TForm1.Button1Click(Sender: TObject);
    34. begin
    35. if OpenDialog1.Execute then
    36. OFName:=OpenDialog1.FileName;
    37. if OFName<>'' then begin
    38. Button1.Enabled:=False;
    39. Button2.Visible:=True;
    40. Label1.Caption:='Путь к файлу для проверки: '+OFName;
    41. Label2.Visible:=True;
    42. Label2.Caption:='Нажмите на кнопку "Сохранить" и выберите файл для хранения результатов проверки';
    43. end;
    44. end;
    45. procedure TForm1.Button2Click(Sender: TObject);
    46. var
    47. b:boolean;
    48. begin
    49. b:=false;
    50. if SaveDialog1.Execute then
    51. SFName:=SaveDialog1.FileName;
    52. if Pos('.txt',SFName)=0 then SFName:=SFName+'.txt';
    53. if SFName=OFName then
    54. ShowMessage('Выберите другой файл для сохранения результата')
    55. else
    56. b:=true;
    57. if (SFName<>'') and (b) then begin
    58. Button2.Enabled:=False;
    59. Label2.Caption:='Путь к результирующему файлу: '+SFName;
    60. Button3.Visible:=True;
    61. Label3.Visible:=True;
    62. Label3.Caption:='Для начала проверки нажмите на кнопку "Проверить"';
    63. end;
    64. end;
    65. procedure TForm1.FormCreate(Sender: TObject);
    66. begin
    67. Button2.Visible:=False;
    68. Label2.Visible:=False;
    69. Button3.Visible:=False;
    70. Label3.Visible:=False;
    71. Button4.Visible:=False;
    72. Label4.Visible:=False;
    73. Label1.Caption:='Нажмите на кнопку "Открыть" и выберите файл для проверки';
    74. end;
    75. procedure TForm1.Button3Click(Sender: TObject);
    76. var
    77. FO,FS:TextFile;
    78. i,j,count:integer;
    79. str,strslovo,tmpstr:String;
    80. ZnCh,UpCh:set of Char;
    81. answ:Word;
    82. begin
    83. count:=0;
    84. ZnCh:=['.',',','!','?'];
    85. UpCh:=['A'..'Z','А'..'Я'];
    86. AssignFile(FO,OFName);
    87. AssignFile(FS,SFName);
    88. {$I-}
    89. Reset(FO);
    90. {$I+}
    91. if IOResult<>0 then begin
    92. ShowMessage('Произошли проблемы с открытием файла. Программа будет завершена');
    93. Exit;
    94. end
    95. else begin
    96. Rewrite(FS);
    97. while not Eof(FO) do begin
    98. Readln(FO,str);
    99. strslovo:='';
    100. for i:=1 to Length(str) do begin
    101. if (str[i] in ZnCh) or (str[i]=' ') then begin
    102. for j:=1 to Length(strslovo) do begin
    103. if strslovo[j] in UpCh then begin
    104. answ:=MessageDlg('В слове "'+strslovo+'" найдена заглавная буква "'+strslovo[j]+'". Заменить ее на малую?',mtInformation,[mbYes,mbNo],0);
    105. if answ=mrYes then begin
    106. tmpstr:=strslovo[j];
    107. tmpstr:=AnsiLowerCase(tmpstr);
    108. Delete(strslovo,j,1);
    109. Insert(tmpstr,strslovo,j);
    110. inc(count);
    111. end;
    112. end;
    113. end;
    114. Write(FS,strslovo+str[i]);
    115. strslovo:='';
    116. end
    117. else
    118. strslovo:=strslovo+str[i];
    119. end;
    120. Writeln(FS,'');
    121. end;
    122. CloseFile(FO);
    123. CloseFile(FS);
    124. Label3.Caption:='Проверка файла завершена. Исправлено '+IntToStr(count)+' заглавных букв.';
    125. Button3.Enabled:=False;
    126. Button4.Visible:=True;
    127. Label4.Visible:=True;
    128. end;
    129. end;
    130. procedure TForm1.Button4Click(Sender: TObject);
    131. begin
    132. OFName:='';
    133. SFName:='';
    134. Button1.Enabled:=True;
    135. Button2.Visible:=False;
    136. Button2.Enabled:=True;
    137. Button3.Visible:=False;
    138. Button3.Enabled:=True;
    139. Button4.Visible:=False;
    140. Label2.Visible:=False;
    141. Label3.Visible:=False;
    142. Label4.Visible:=False;
    143. Label1.Caption:='Нажмите на кнопку "Открыть" и выберите файл для проверки';
    144. end;
    145. end.
  • 9296. Создание программы обмена текстовыми сообщениями через локальную сеть
    Дипломная работа пополнение в коллекции 18.12.2011

    Перед передачей текстовых сообщений необходимо настроить обязательные параметры: вначале программы пользователю предлагают создать свой сервер либо быть клиентом (подключиться к уже созданному серверу в сети), далее необходимо ввести индивидуальное имя пользователя, IP-адрес и номер порта подключения. После выполнения настроек всех параметров программы в поле окна текстовых сообщений вводим нужную нам текстовую информацию и отправляем всем пользователем чата (отправка осуществляется по типу клиент0=>сервер=>клиент1 =>клиент2=>клиент n). Окно чата сообщений будет отображать всю переписку текстовыми сообщениями всех клиентов, находящихся на данном сервере. Весь архив сообщений можно узнать путём нажатия на кнопку открыть логи, где содержится история всей переписки пользователя. В данном архиве должна содержаться информация о имени получателя (отправителя) сообщений, непосредственно само сообщение и время и дата отправление (получения) сообщения.

  • 9297. Создание программы с использованием программного продукта Turbo Assembler
    Информация пополнение в коллекции 26.02.2010

     

    1. Методические указания к лабораторному практикуму /В.П. Кулюкин. Екатеринбург: изд. ИПК УГТУ, 2004. - 40с.
    2. Лабораторный практикум по дисциплине "Системное программное обеспечение" / Уфимск. гос. авиац. техн. ун-т. Сост.: О.Д. Лянцев. - Уфа, 2008. - 57 с.
    3. Калашников О.А. Ассемблер? Это просто! Учимся программировать. СПб.: БХВ-Петербург, 2006. - 384 с.: ил.
    4. Абель П. Ассемблер. Язык и программирование для IBM PC / Пер. с англ. - К.: Век+, М.: ЭНТРОП, 2005. - 736 с.
  • 9298. Создание программы табуляции функций
    Курсовой проект пополнение в коллекции 26.01.2010

     

    1. Архангельский, А.Я. Программирование в С++ Builder 6. [Текст] / А.Я.Архангельский. М.: Бином, 2003. С. 1154.
    2. Ахо, А.. Построение и анализ вычислительных алгоритмов [Электронный ресурс] / А. Ахо, Дж. Хопкрофт, Дж.. Ульман. М.: Мир. 1999. С. 143.
    3. Бронштейн, И.Н. Справочник по математике для инженеров и учащихся втузов [Текст] / И.Н.Бронштейн, К.А.Семендяев. М.: Наука, 2007. 708 с.
    4. Кремер, Н.Ш. Высшая математика для экономистов: учебник для студентов вузов. [Текст] / Н.Ш.Кремер, 3-е издание М.:ЮНИТИ-ДАНА, 2006. C. 412.
    5. Калиткин, Н.Н. Численные методы. [Электронный ресурс] / Н.Н. Калиткин. М.: Питер, 2001. С. 504.
    6. Павловская, Т.А. Программирование на языке высокого уровня. [Текст] / Т.А. Павловская. М.: Питер, 2003. С. 461.
    7. Семакин, И.Г. Основы программирования. [Текст] / И.Г.Семакин, А.П.Шестаков. М.: Мир, 2006. C. 346.
    8. Табуляция функций [Электронный ресурс] Режим доступа: http://programmer.zp.ua/index.php
  • 9299. Создание программы электронного учета успеваемости студентов с дальнейшим выводом ее в Интернет
    Курсовой проект пополнение в коллекции 09.12.2008

    Рассмотрев все достоинства и недостатки языков web-програм-мирования Zope и php мы остановили свой выбор на Php. Синтаксис PHP очень похож на синтаксис C или Perl. Люди, знакомые с программированием, очень быстро смогут начать писать программы на PHP. В этом языке нет строгой типизации данных и нет необходимости в действиях по выделению памяти. Программы, написанные на PHP, читаются достаточно легко. В отличие от Perl-программ PHP-код легко зрительно прочитать и понять. В дополнение к своей бесплатности (MySQL требует приобретения лицензии при использовании ее в коммерческих целях) связка PHP-MySQL является кросс-платформенной. Это значит, что вы можете, работая в Windows, разрабатывать приложения, предназначенные для работы под Unix. Кроме того, PHP может работать как внешний CGI-процесс, либо как обычный интерпретатор скриптов, либо как модуль, подключаемый к web-серверу Apache или IIS. И наконец, так как данный продукт разрабатывается совместными усилиями, существует огромное количество документации и списков рассылки, к которым можно обратиться в случае возникновения каких-либо вопросов. Найденные ошибки исправляются достаточно быстро, ваши предложения и замечания всегда выслушают, рассмотрят, и если они окажутся ценными - реализуют в новой версии.

  • 9300. Создание программы, осуществляющей распознавание жестов мыши и выполняющей ассоциированные с ними действия
    Дипломная работа пополнение в коллекции 19.05.2011

    Общий алгоритм решения задачи:

    1. определить, какой смысл вкладывается в компоненты входного вектора х; входной вектор должен содержать всю информацию, необходимую для получения ответа;
    2. выбрать выходной вектор у таким образом, чтобы его компоненты содержали полный ответ поставленной задачи;
    3. выбрать вид нелинейности в нейронах (функции активации), при этом желательно учесть специфику задачи, т.к. удачный выбор сократит время обучения;
    4. выбрать число слоев и нейронов в слое;
    5. задать диапазон изменения входов, выходов, весов и пороговых уровней, учитывая множество значений выбранной функции активации;
    6. присвоить начальные значения весовым коэффициентам и пороговым уровням и дополнительным параметрам (например, крутизне функции активации, если она будет настраиваться при обучении); начальные значения не должны быть большими, чтобы нейроны не оказались в насыщении (на горизонтальном участке функции активации), иначе обучение будет очень медленным; также они не должны быть и слишком малыми, чтобы выходы большей части нейронов не были равны нулю, иначе обучение также замедлится;
    7. провести обучение, т.е. подобрать параметры сети так, чтобы задача решалась наилучшим образом; по окончании обучения сеть готова решить задачи того типа, которым она обучена;
    8. подать на вход сети условия задачи в виде вектора x, рассчитать выходной вектор y, который и даст формализованное решение задачи.