это быстро и бесплатно
Оформите заказ сейчас и получите скидку 100 руб.!
Ознакомительный фрагмент работы:
ГОУ ВПО «Белгородский Государственный Университет»
Кафедра информатики и вычислительной техники.
Задание
по учебной практике
Выполнил: студент
группы 010504К
Волобуев М..С.
Проверил: Старовойтов А.С.
Белгород 2010
Глава 1.«Программное обеспечение ЭВМ»
Создание сносок в текстовых документах.
При создании научных работ, курсовых или дипломных (особенно по гуманитарным наукам) иногда бывает необходимо непосредственно в тексте указать точный источник цитаты. Для этого и в книге, и в электронном документе используют сноски. Они предназначены для пояснений, комментариев и ссылок на другие документы. При перестановке абзацев, содержащих сноски, соответствующим образом будут переставлены и сами сноски. Вы можете удалять сноски, перемещать их в документе – остальные будут автоматически перенумерованы.
В редакторе Word можно использовать обычные или концевые сноски. Обычные располагаются на той же странице, на которой находится помеченный сноской текст. Концевые сноски размещаются в конце документа.
Сноска состоит из двух связанных частей – знака сноски и текста сноски. Знак сноски ставится возле текста, к которому она относится; с него же начинается и текст сноски.
Создание сноски осуществляется командой Сноска меню Вставка.[1]
Для быстрого создания сноски с использованием автоматической нумерации и других значений параметров, принятых по умолчанию, установить курсор в том месте, где вставляется знак сноски, и нажать Alt+Ctrl+F для обычной сноски и Alt+Ctrl+E — для концевой.
Чтобы просмотреть и отредактировать текст сноски, следует выполнить команду Сноска меню Вид или сделать двойной щелчок мышью на ее знаке.
Чтобы переместить или скопировать сноску, нужно переместить или скопировать ее знак любым из приемов редактирования. При копировании знака сноски также копируется и ее текст. Если включена опция Авто, при необходимости автоматически перенумеровываются знаки сносок.
Чтобы удалить сноску, достаточно выделить ее знак и нажать клавишу Del.
В редакторе Word сноски нумеруются автоматически в соответствии с выбранной пользователем системой нумерации. Но в любом случае при вставке новой сноски либо удалении существующей происходит перенумерация оставшихся сносок.
Глава 2. «Программирование»
Сортировка методом Шелла
Соpтиpовка Шелла. Это еще одна модификация пyзыpьковой соp- тиpовки. Сyть ее состоит в том, что здесь выполняется сpавнение ключей, отстоящих один от дpyгого на некотоpом pасстоянии d. Ис- ходный pазмеp d обычно выбиpается соизмеpимым с половиной общего pазмеpа соpтиpyемой последовательности. Выполняется пyзыpьковая соpтиpовка с интеpвалом сpавнения d. Затем величина d yменьшается вдвое и вновь выполняется пyзыpьковая соpтиpовка, далее d yмень- шается еще вдвое и т.д. Последняя пyзыpьковая соpтиpовка выполня- ется пpи d=1. Качественный поpядок соpтиpовки Шелла остается O(N^2), сpеднее же число сpавнений, опpеделенное эмпиpическим пy- тем - log2(N)^2*N. Ускоpение достигается за счет того, что выяв- ленные "не на месте" элементы пpи d>1, быстpее "всплывают" на свои места.
Пpимеp иллюстpиpyет соpтиpовкy Шелла.
{===== Пpогpаммный пpимеp =====}{ Соpтиpовка Шелла }Procedure Sort( var a : seq);Var d, i, t : integer; k : boolean; { пpизнак пеpестановки }begin d:=N div 2; { начальное значение интеpвала } while d>0 dobegin{ цикл с yменьшением интеpвала до 1 } { пyзыpьковая соpтиpовка с интеpвалом d } k:=true;while k dobegin{ цикл, пока есть пеpестановки }k:=false; i:=1;for i:=1 to N-d dobegin{ сpавнение эл-тов на интеpвале d }if a[i]>a[i+d] thenbegin t:=a[i]; a[i]:=a[i+d]; a[i+d]:=t; { пеpестановка } k:=true; { пpизнакпеpестановки }end; { if ... }end; { for ... }end; { while k }d:=d div 2; { yменьшение интеpвала }end; { while d>0 }end;
Задача:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids; type TForm1 = class(TForm) StringGrid1: TStringGrid; Button1: TButton; Button2: TButton;procedure FormCreate(Sender: TObject);procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);private{ Private declarations }public{ Public declarations }end; var Form1: TForm1; m:array[1..10] of integer; const n=10; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject);var i:integer;begin StringGrid1.Cells[0,1]:='M';for i:=1 to n do StringGrid1.Cells[i,0]:=IntToStr(i);end; procedure TForm1.Button1Click(Sender: TObject);var i:integer;const n=10;begin Randomize;for i:=1 to n dobegin m[i]:=Random(100)-51; StringGrid1.Cells[i,1]:=IntToStr(m[i]);end;end; procedure TForm1.Button2Click(Sender: TObject);Var d, i, t : integer; k : boolean; { пpизнак пеpестановки }begin d:=N div 2; { начальное значение интеpвала } while d>0 dobegin{ цикл с yменьшением интеpвала до 1 } { пyзыpьковая соpтиpовка с интеpвалом d } k:=true;while k dobegin{ цикл, пока есть пеpестановки }k:=false; i:=1;for i:=1 to N-d dobegin{ сpавнение эл-тов на интеpвале d }if a[i]>a[i+d] thenbegin t:=a[i]; a[i]:=a[i+d]; a[i+d]:=t; { пеpестановка } k:=true; { пpизнакпеpестановки }end; { if ... }end; { for ... }end; { while k }d:=d div 2; { yменьшение интеpвала }end; { while d>0 } for i:=1 to n do StringGrid1.Cells[i,1]:=IntToStr(m[i]);end; end.[1] Текст сноски
Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников
Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.
Цены ниже, чем в агентствах и у конкурентов
Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит
Бесплатные доработки и консультации
Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки
Гарантируем возврат
Если работа вас не устроит – мы вернем 100% суммы заказа
Техподдержка 7 дней в неделю
Наши менеджеры всегда на связи и оперативно решат любую проблему
Строгий отбор экспертов
К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»
Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован
Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн
Выполнить 2 контрольные работы по Информационные технологии и сети в нефтегазовой отрасли. М-07765
Контрольная, Информационные технологии
Срок сдачи к 12 дек.
Архитектура и организация конфигурации памяти вычислительной системы
Лабораторная, Архитектура средств вычислительной техники
Срок сдачи к 12 дек.
Организации профилактики травматизма в спортивных секциях в общеобразовательной школе
Курсовая, профилактики травматизма, медицина
Срок сдачи к 5 дек.
краткая характеристика сбербанка анализ тарифов РКО
Отчет по практике, дистанционное банковское обслуживание
Срок сдачи к 5 дек.
Исследование методов получения случайных чисел с заданным законом распределения
Лабораторная, Моделирование, математика
Срок сдачи к 10 дек.
Проектирование заготовок, получаемых литьем в песчано-глинистые формы
Лабораторная, основы технологии машиностроения
Срок сдачи к 14 дек.
Вам необходимо выбрать модель медиастратегии
Другое, Медиапланирование, реклама, маркетинг
Срок сдачи к 7 дек.
Ответить на задания
Решение задач, Цифровизация процессов управления, информатика, программирование
Срок сдачи к 20 дек.
Написать реферат по Информационные технологии и сети в нефтегазовой отрасли. М-07764
Реферат, Информационные технологии
Срок сдачи к 11 дек.
Написать реферат по Информационные технологии и сети в нефтегазовой отрасли. М-07764
Реферат, Геология
Срок сдачи к 11 дек.
Разработка веб-информационной системы для автоматизации складских операций компании Hoff
Диплом, Логистические системы, логистика, информатика, программирование, теория автоматического управления
Срок сдачи к 1 мар.
Нужно решить задание по информатике и математическому анализу (скрин...
Решение задач, Информатика
Срок сдачи к 5 дек.
Заполните форму и узнайте цену на индивидуальную работу!