МУ эк инф к сам раб

10

-для основного текста: выравнивание – по ширине; гарнитура шрифта – Times New Roman; размер шрифта – 14; отступ абзаца – 1,27 см; междустрочный интервал – 1,5 строки; интервалы перед и после абзаца – 0 пт (рис. 1);

-для заголовков: гарнитура шрифта – Times New Roman; размер шрифта – 16; начертание – полужирный (рис. 2); выравнивание –

по левому краю;

-для таблиц: выравнивание – по левому краю содержимого и заголовка; самой таблицы – по центру;

-для рисунка: выравнивание – по центру.

При подготовке реферата в MS Word использовать методические указания [14].

Рисунок 1 – Диалоговое окно Абзац

При подготовке реферата надо соблюдать следующие правила:

–при вводе текста ставить один пробел между словами;

–перед знаками препинания пробел не ставят, а ставят после знака препинания;

–основной текст должен иметь один формат;

–для заголовков использовать один стиль оформления;

–после заголовка точку не ставят.

5. По материалам реферата подготовить презентацию средствами MS PowerPoint. Презентация должна включать не менее 10 слай-

11

дов и соответствовать указанной в пункте 4 структуре реферата. Необходимо использовать таблицы, графики, организационные диаграммы, рисунки, различные схемы цветового оформления, управление переходами к различным слайдам, гиперссылки. При подготовке презентации использовать методические указания [7].

Рисунок 2 – Диалоговое окно Шрифт

2.1.1. Темы рефератов

Таблица 6 – Варианты задания

	Номер	Тема реферата	Номер	Тема реферата
	варианта		варианта
	1.	Архитектура ЭВМ	12.	Выбор персонального компьютера
	2.	Безопасность работы на	13.	Графические средства табличного про-
		ПЭВМ		цессора MS Excel
	3.	Защитные средства в опе-	14.	Интернет в практической деятельности
		рационных системах		экономиста

				12
4.	Информационные ресурсы		15.		Использование стандартных функций MS
	глобальной сети Интернет				Excel в профессиональной деятельности
					экономиста
5.	Компьютерные	вирусы:	16.		Лебедев С.А. и его вклад в развитие оте-
	классификация	и обеспе-			чественных электронно-вычислительных
	чение защиты от компью-				машин
	терных вирусов
6.	Компьютерные	преступ-	17.		История создания ЭВМ
	ления в сфере экономики
7.	Специализированные па-		18.		Периферийное оборудование персональ-
	кеты программ	финансо-			ных компьютеров
	во-экономического назна-
	чения
8.	Персональные	компьюте-	19.		Поколения ЭВМ и их отличительные
	ры: состояние и тенденции				признаки
	развития
9.	Проблемы работы в усло-		20.		Совместное использование программных
	виях локальной сети				компонентов MS Office
10.	Современные технологии		21.		Состав и основные блоки и устройства
	разработки программ				ПЭВМ
11.	Экономические	информа-	22.		Электронная почта
	ционные системы: обзор,
	сферы применения

2.1.2. Контрольные вопросы 1

Тема 1. Введение в информатику

1.Информатизация общества: социально-экономический аспект.

2.Понятие информации. Виды информации. Измерение инфор-

мации.

3.Экономическая информация, ее особенности, виды и структу-

ра.

4.Процедуры преобразования информации и их характеристика.

5.Понятие информационных технологий. Особенности информационных технологий на современном этапе.

Тема 2. Технические средства обработки информации

1.Принципиальная логическая структура ЭВМ. Функциональное назначение устройств.

2.Современная классификация компьютеров.

3.Структура и основные блоки ПЭВМ.

13

4.Процессоры. Микропроцессоры: назначение и основные функциональные характеристики.

5.Запоминающие устройства ЭВМ. Общая характеристика уст-

ройств.

Тема 3. Инструментарий и технологии подготовки текстовых документов

1.Общие требования стандартов к оформлению текстовых доку-

ментов.

2.Назначение и основные возможности процессора MS Word.

3.Общая схема вставки в документ MS Word объектов (рисунков, таблиц, надписей, автофигур и т.п.). Изменение свойств объектов.

4.Стили и их свойства. Технология применения стилей при подготовке документов MS Word.

5.Назначение функции žСлияние¤ процессора MS Word и технология ее применения.

Тема 4. Технология создания презентаций

1.Назначение и основные возможности MS PowerPoint.

2.Технология создания слайдов презентаций.

3.Анимация объектов слайдов презентаций.

4.Озвучивание презентаций.

5.Управление презентацией.

Тема 5. Компьютерные сети и Интернет

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

2.Основные элементы локальных вычислительных сетей и их назначение.

3.Глобальная сеть Интернет. Услуги и их характеристика. Выбор провайдера.

4.Глобальная сеть Интернет: структура, адреса, поиск информа-

ции.

5.Использование электронной почты.

14

Тема 6. Основы защиты информации и информационной безопасности компьютерных систем

1.Основные законодательные документы РФ, отражающие вопросы информационной безопасности.

2.Организационные меры, технические, программные и криптографические средства обеспечения безопасности информации.

3.Компьютерные преступления и правовые нормы защиты информации.

4.Компьютерные вирусы и средства борьбы с ними.

5.Меры обеспечения безопасности информации при работе на ПК в автономном режиме.

6.Правовое обеспечение защиты информации и программных продуктов.

2.2. Задание 2

Решить задачу на обработку данных пользовательского типа. Варианты задания приведены в разделе 2.2.3. Номер варианта равен номеру логина.

2.2.1. Основные понятия. Пользовательский тип данных

VBA позволяет создавать структуру разнотипных данных, обрабатываемых как единое целое – пользовательский тип (аналог типа записи Pascal и структуры C). Пользователь определяет произвольную структуру данных в процедуре как новый тип данных, при этом используется синтаксис:

Type <имя>

<имя поля> as <тип> <имя поля> as <тип>

. . .

End Type.

Пользовательский тип данных всегда определяется на уровне модуля, то есть перед первым Sub …

Пусть на рабочем листе задан список вида: наименование товара, цена, количество.

Определим структуру данных:

	15
Type Tovar	’поле для ввода наименования
Name as String * 20
Zena as Single	’товара из двадцати символов
	’поле для ввода цены, используем
’вещественный тип данных с одинарной точностью
Kol as Byte	’поле для ввода количества товара – это
	’целое число в диапазоне от 0 до 255

End Type.

После определения типа для ввода данных необходимо описать переменную этого типа в процедуре:

Sub программа1() Dim A as Tovar

. . .

End Sub.

Для обращения к конкретному элементу структуры данных (полю) надо записать:

A.Name = "хлеб"

A.Zena = 1.25

A.Kol = 20,

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

Dim B(10) as Tovar,

то обращение к i-му элементу будет:

B(i).Name = "молоко" B(i).Zena = 10.2 B(i).Kol = 60.

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

With <имя переменной>

.<имя поля> = <выражение>

.<имя поля> = <выражение>

. . .

End With.

Например,

With A

.Name = "хлеб"

.Zena = 1.25

.Kol = 20

16

End With.

Если используем массив:

With B(i)

.Name = "хлеб"

.Zena = 1.25

.Kol = 20 End With.

2.2.2. Примеры выполнения контрольного задания

Пример 1. На рабочем листе задан список вида:

№	Наименование товара	Цена, руб.	Количество, кг
1	Бананы	45,50	500
2	Творог	36,90	300
3	Сметана	56,80	150
4	…	…	…

Необходимо выбрать товары, наименование которых начинается на букву "б", подсчитать их количество и стоимость.

Решение.

Type Tovar ’на уровне модуля определим ’пользовательский тип данных с именем Tovar

Name as String * 20 Zena as Single

Kol as Byte
St as Single
End Type
Sub Задача1()	’описываем динамический массив для
Dim A() as Tovar
Dim n as Integer	’хранения списка
	’количество записей списка
Dim i as Integer	’на рабочем листе
	’номер строки на рабочем листе
Dim j as Integer	’номер элемента массива
Dim SKol as Integer	’количество товаров,
Dim SSt as Single	’ начинающихся на букву “б”
	’стоимость товаров,

	17
	’ начинающихся на букву “б”
Sheets("Лист5").Select
n = 1	’подсчет количества записей на рабочем листе
Do While Cells(n, 1) <> ""		’пока не встретится
’пустая строка, счетчик заполненных строк n увеличиваем на 1
n = n + 1
Loop	’количество записей n = n – две строки
n = n – 2
ReDim A(n)	’( заголовок и пустая строка списка)
	’определяем размерность динамического массива
j = 1	’обнуление переменных, используемых для
SKol = 0
SSt = 0	’накопления значений показателей результата
For i = 2 to n +1		’в цикле с рабочего листа
A(j).Name = Cells(i, 1
A(j).Zena = Cells(i, 2)		’считываем данные
A(j).Kol = Cells(i, 3)		’и записываем в массив
A(j).St = A(j).Zena * A(j).Kol		’подсчитываем
	’ стоимость каждого товара

If LCase (Mid(A(j).Name, 1, 1)) = "б" Then

’все первые буквы переводим в нижний регистр с помощью ’функции LCase. Функция Mid выделяет первую букву слова, ’проверка: наименование товара начинается на букву “б”?

SKol = SKol + 1		’если на букву “б”, то увеличиваем
SSt = SSt + A(j).St		’счетчик товаров на 1
		’накапливаем стоимость
End if		’таких товаров
j = j + 1	’увеличиваем номер элемента массива на единицу
	’переходим к анализу следующего товара

Next i

MsgBox "количество товара на букву ’б’ равно" & SKol MsgBox "стоимость товара на букву ’б’ равна" & SSt

’выводим результат

End Sub.

Пример 2. Путем ввода с клавиатуры сформировать список вида: товар, цена, поступило, продано. Подсчитать стоимость проданных и

18

оставшихся товаров, наименование которых начинается на букву "Д" или "д".

Решение.

Type список	’определяем пользовательский тип
товар as String	’с именем “список”
цена as Single
поступило as Single
продано as Single
End Type
Sub задача2()	’описываем массив для хранения
Dim a() as список
Dim i as Byte	’данных типа “список”
Dim n as Byte	’описываем переменные
Dim k as Byte
Dim p as Single
Dim r as Single
Sheets("Лист8").Select	’очистка активного рабочего листа
Cells.Clear

Cells(1, 1) = "Самостоятельная работа"

Cells(2, 1)="Выполнил(а) студент(ка) ФИО группы …" n=Val(InputBox("Введите количество наименований"))

ReDim a(n)				’вводим размерность массива a()
Cells(3,	1)	= "Исходные данные: n = " & n
p=0			’обнуление переменной, накапливающей стоимость
r = 0				’проданных товаров
			’обнуление переменной, накапливающей стоимость
Cells(4,	1)	= "товар"		’оставшихся товаров
				’вывод заголовка списка
Cells(4,	2)	= "цена"		’на рабочий лист
Cells(4,	3)	= "поступило"
Cells(4,	4)	= "продано"
k=0	to n		’заполнение массива данными типа ¦список§
For i = 1

a(i).товар = InputBox("введите наименование товара")

a(i).цена = Val(InputBox("введите цену")) a(i).поступило = Val(InputBox("введите количество

поступивших товаров"))

19

a(i).продано = Val(InputBox("введите количество

проданных товаров"))			’вывод введенных даных
Cells(i + 4, 1)		= a(i).товар
Cells(i + 4, 2)		= a(i).цена	’ на рабочий лист
Cells(i + 4, 3)		= a(i).поступило
Cells(i + 4, 4)		= a(i).продано	1) Like "Д" or
If	Mid(Cells(i + 4, 1), 1,

Mid(Cells(i + 4, 1), 1, 1) Like "д" Then

’проверка: наименование товара на букву “Д” или “д”? k = k + 1

Cells(k+4, 6) = Cells(i + 4, 1)

’подсчет результирующих показателей p = p + Cells(i + 4, 4) * Cells(i + 4, 2)

r = r + (Cells(i + 4, 3) - Cells(i + 4, 4)) * Cells(i + 4, 2)

End if Next i

Cells(n+5, 1) = "стоимость проданных товаров" & p Cells(n+6, 1) = "стоимость оставшихся товаров" & r

’вывод результата

End Sub

2.2.3. Варианты заданий

Номер варианта равен номеру логина.

1.Дана следующая информация о студентах: фамилия, имя, отчество, пол, возраст, курс; в фамилии, имени и отчестве не более 12 букв; пол указывается буквой žм¤ или žж¤; возраст – от 16 до 35 лет; курс – 1…5. Написать программу, которая вводит эту информацию и печатает:

а) процент мужчин и женщин; б) список студентов 2-го курса, возраст которых 19-20 лет.

2.В наборе данных содержится информация об итогах зимней сессии. Сведения о каждом студенте (всего 30) заданы в виде: фамилия, номер группы, оценка 1, оценка 2, оценка 3; в фамилии не более 12 букв, номер группы из 101…116, оценка – это 2, 3, 4, 5; экзамены: математика, физика, информатика. Написать программу, которая вводит эту информацию и печатает следующие данные: