Контрольная работа по "Информатика"

Автор работы: Пользователь скрыл имя, 15 Марта 2016 в 18:56, контрольная работа

Описание работы

Разработать алгоритм и написать программу на языке Turbo Pascal.
Задана матрица (двумерный массив) A размером N x М, состоящая из действительных элементов. Числа M и N вводятся с клавиатуры. Для задания исходной матрицы предусмотреть ввод с клавиатуры или ввод с помощью датчика случайных чисел. Где это необходимо ввести квадратную матрицу. Во всех вариантах вывести исходную матрицу в общепринятом виде и необходимые результаты работы программы.
Найти, сколько отрицательных элементов содержит данная матрица в каждой строке. Заменить все отрицательные элементы на 0. Вывести на экран число отрицательных элементов по каждой строке и полученную матрицу.
Матрица квадратная.

Содержание работы

Задание №1……………………………………………………………………………….4
Задание №2……………………………………………………………………………….10
Задание №3……………………………………………………………………………….18
Задание №4……………………………………………………………………………….24
Задание №5……………………………………………………………………………….30
Список литературы………………………

Файлы: 1 файл

Вариант №5.doc

— 1.08 Мб (Скачать файл)

 

 

 

Построить диаграмму, отображающую долю каждого адреса в общей сумме задолженностей на начало и конец месяца.

 

Адрес

На начало

месяца

На конец

месяца

Общая

задолженность

г. Орел, ул. Пушкина, 4

21,75р.

493,14р.

514,89р.

г. Орел, ул. Гагарина, 8

12,10р.

838,48р.

850,58р.

г. Орел, ул. Матвеева, 1

0

127,40р.

127,40р.

г. Орел, ул. Гайдара, 3

5,30р.

313,71р.

319,01р.

Итого

39,15р.

1 772,73р.

1 811,88р.


 

 

На круговой диаграмме видно, что больше всего сумма общая сумма задолженности на начало и конец месяца у фирмы, расположенной по ул. Гагарина, 8 (47% от общей суммы задолженностей на начало и конец месяца или 850,58р.), а самая маленькая – у фирмы по адресу ул. Матвеева, 1 (7% от общей суммы задолженностей на начало и конец месяца или 127,40р.).

Общая сумма задолженности на начало и конец равна 1811,88р.

 

 

Задание №3

 

Вычислить значение функций и начертить их графики в Excel в одной системе координат:

x Î [-π; π] с шагом 0,1 и

 

Листинг выполнения задачи в MS Excel.

 

x

f(x)

g(x)

-3,14

9,85801

2,02529

-3,04

9,14018

1,41425

-2,94

8,44337

1,01628

-2,84

7,76856

0,75196

-2,74

7,11672

0,57328

-2,64

6,48878

0,45065

-2,54

5,88564

0,36557

-2,44

5,30817

0,3063

-2,34

4,75714

0,26535

-2,24

4,23328

0,23793

-2,14

3,73727

0,22111

-2,04

3,26967

0,21324

-1,94

2,83098

0,21377

-1,84

2,42162

0,22311

-1,74

2,04188

0,24285

-1,64

1,69199

0,27613

-1,54

1,37207

0,32832

-1,44

1,08214

0,40811

-1,34

0,82212

0,52856

-1,24

0,59182

0,70618

-1,14

0,39097

0,95204

-1,04

0,2192

1,24522

-0,94

0,07604

1,50326

-0,84

-0,039

1,62281

-0,74

-0,1267

1,58645

-0,64

-0,1876

1,46498

-0,54

-0,2225

1,32896

-0,44

-0,2323

1,21191

-0,34

-0,2179

1,12235

-0,24

-0,1801

1,05928

-0,14

-0,1199

1,01979

-0,04

-0,0384

1,0016

0,06

0,86574

1,00361

0,16

0,58241

1,02593

0,26

0,23895

1,06991

0,36

-0,1393

1,13805

0,46

-0,5209

1,23318

0,56

-0,8726

1,35523

0,66

-1,1646

1,49217

0,76

-1,3753

1,6033

0,86

-1,4936

1,61258

0,96

-1,5213

1,46005

1,06

-1,4722

1,18585

1,16

-1,3698

0,89764

1,26

-1,2433

0,66533

1,36

-1,1232

0,50044

1,46

-1,036

0,38938

1,56

-1,0003

0,316

1,66

-1,0235

0,26817

1,76

-1,1008

0,23795

1,86

-1,2158

0,22048

1,96

-1,3434

0,21298

2,06

-1,4537

0,21414

2,16

-1,5165

0,22372

2,26

-1,5069

0,24249

2,36

-1,4088

0,27233

2,46

-1,2176

0,3165

2,56

-0,9416

0,38022

2,66

-0,6004

0,4717

2,76

-0,2226

0,60378

2,86

0,1592

0,79676

2,96

0,5126

1,0832

3,06

0,8106

1,51611

3,16

1,03546

2,18349


 

 

 

 

 

 

 

 

 

График функции  f(x)

 

 

В формульном виде:

 

x

f(x)

-3,14

=ЕСЛИ(A2<=0;SIN(A2)+A2^2;(COS(2*A2))^2-2*SIN(A2))

-3,04

=ЕСЛИ(A3<=0;SIN(A3)+A3^2;(COS(2*A3))^2-2*SIN(A3))

-2,94

=ЕСЛИ(A4<=0;SIN(A4)+A4^2;(COS(2*A4))^2-2*SIN(A4))

-2,84

=ЕСЛИ(A5<=0;SIN(A5)+A5^2;(COS(2*A5))^2-2*SIN(A5))

-2,74

=ЕСЛИ(A6<=0;SIN(A6)+A6^2;(COS(2*A6))^2-2*SIN(A6))

-2,64

=ЕСЛИ(A7<=0;SIN(A7)+A7^2;(COS(2*A7))^2-2*SIN(A7))

-2,54

=ЕСЛИ(A8<=0;SIN(A8)+A8^2;(COS(2*A8))^2-2*SIN(A8))

-2,44

=ЕСЛИ(A9<=0;SIN(A9)+A9^2;(COS(2*A9))^2-2*SIN(A9))

-2,34

=ЕСЛИ(A10<=0;SIN(A10)+A10^2;(COS(2*A10))^2-2*SIN(A10))

-2,24

=ЕСЛИ(A11<=0;SIN(A11)+A11^2;(COS(2*A11))^2-2*SIN(A11))

-2,14

=ЕСЛИ(A12<=0;SIN(A12)+A12^2;(COS(2*A12))^2-2*SIN(A12))

-2,04

=ЕСЛИ(A13<=0;SIN(A13)+A13^2;(COS(2*A13))^2-2*SIN(A13))

-1,94

=ЕСЛИ(A14<=0;SIN(A14)+A14^2;(COS(2*A14))^2-2*SIN(A14))

-1,84

=ЕСЛИ(A15<=0;SIN(A15)+A15^2;(COS(2*A15))^2-2*SIN(A15))

-1,74

=ЕСЛИ(A16<=0;SIN(A16)+A16^2;(COS(2*A16))^2-2*SIN(A16))

-1,64

=ЕСЛИ(A17<=0;SIN(A17)+A17^2;(COS(2*A17))^2-2*SIN(A17))

-1,54

=ЕСЛИ(A18<=0;SIN(A18)+A18^2;(COS(2*A18))^2-2*SIN(A18))

-1,44

=ЕСЛИ(A19<=0;SIN(A19)+A19^2;(COS(2*A19))^2-2*SIN(A19))

-1,34

=ЕСЛИ(A20<=0;SIN(A20)+A20^2;(COS(2*A20))^2-2*SIN(A20))

-1,24

=ЕСЛИ(A21<=0;SIN(A21)+A21^2;(COS(2*A21))^2-2*SIN(A21))

-1,14

=ЕСЛИ(A22<=0;SIN(A22)+A22^2;(COS(2*A22))^2-2*SIN(A22))

-1,04

=ЕСЛИ(A23<=0;SIN(A23)+A23^2;(COS(2*A23))^2-2*SIN(A23))

-0,94

=ЕСЛИ(A24<=0;SIN(A24)+A24^2;(COS(2*A24))^2-2*SIN(A24))

-0,84

=ЕСЛИ(A25<=0;SIN(A25)+A25^2;(COS(2*A25))^2-2*SIN(A25))

-0,74

=ЕСЛИ(A26<=0;SIN(A26)+A26^2;(COS(2*A26))^2-2*SIN(A26))

-0,64

=ЕСЛИ(A27<=0;SIN(A27)+A27^2;(COS(2*A27))^2-2*SIN(A27))

-0,54

=ЕСЛИ(A28<=0;SIN(A28)+A28^2;(COS(2*A28))^2-2*SIN(A28))

-0,44

=ЕСЛИ(A29<=0;SIN(A29)+A29^2;(COS(2*A29))^2-2*SIN(A29))

-0,34

=ЕСЛИ(A30<=0;SIN(A30)+A30^2;(COS(2*A30))^2-2*SIN(A30))

-0,24

=ЕСЛИ(A31<=0;SIN(A31)+A31^2;(COS(2*A31))^2-2*SIN(A31))

-0,14

=ЕСЛИ(A32<=0;SIN(A32)+A32^2;(COS(2*A32))^2-2*SIN(A32))

-0,04

=ЕСЛИ(A33<=0;SIN(A33)+A33^2;(COS(2*A33))^2-2*SIN(A33))

0,06

=ЕСЛИ(A34<=0;SIN(A34)+A34^2;(COS(2*A34))^2-2*SIN(A34))

0,16

=ЕСЛИ(A35<=0;SIN(A35)+A35^2;(COS(2*A35))^2-2*SIN(A35))

0,26

=ЕСЛИ(A36<=0;SIN(A36)+A36^2;(COS(2*A36))^2-2*SIN(A36))

0,36

=ЕСЛИ(A37<=0;SIN(A37)+A37^2;(COS(2*A37))^2-2*SIN(A37))

0,46

=ЕСЛИ(A38<=0;SIN(A38)+A38^2;(COS(2*A38))^2-2*SIN(A38))

0,56

=ЕСЛИ(A39<=0;SIN(A39)+A39^2;(COS(2*A39))^2-2*SIN(A39))

0,66

=ЕСЛИ(A40<=0;SIN(A40)+A40^2;(COS(2*A40))^2-2*SIN(A40))

0,76

=ЕСЛИ(A41<=0;SIN(A41)+A41^2;(COS(2*A41))^2-2*SIN(A41))

0,86

=ЕСЛИ(A42<=0;SIN(A42)+A42^2;(COS(2*A42))^2-2*SIN(A42))

0,96

=ЕСЛИ(A43<=0;SIN(A43)+A43^2;(COS(2*A43))^2-2*SIN(A43))

1,06

=ЕСЛИ(A44<=0;SIN(A44)+A44^2;(COS(2*A44))^2-2*SIN(A44))

1,16

=ЕСЛИ(A45<=0;SIN(A45)+A45^2;(COS(2*A45))^2-2*SIN(A45))

1,26

=ЕСЛИ(A46<=0;SIN(A46)+A46^2;(COS(2*A46))^2-2*SIN(A46))

1,36

=ЕСЛИ(A47<=0;SIN(A47)+A47^2;(COS(2*A47))^2-2*SIN(A47))

1,46

=ЕСЛИ(A48<=0;SIN(A48)+A48^2;(COS(2*A48))^2-2*SIN(A48))

1,56

=ЕСЛИ(A49<=0;SIN(A49)+A49^2;(COS(2*A49))^2-2*SIN(A49))

1,66

=ЕСЛИ(A50<=0;SIN(A50)+A50^2;(COS(2*A50))^2-2*SIN(A50))

1,76

=ЕСЛИ(A51<=0;SIN(A51)+A51^2;(COS(2*A51))^2-2*SIN(A51))

1,86

=ЕСЛИ(A52<=0;SIN(A52)+A52^2;(COS(2*A52))^2-2*SIN(A52))

1,96

=ЕСЛИ(A53<=0;SIN(A53)+A53^2;(COS(2*A53))^2-2*SIN(A53))

2,06

=ЕСЛИ(A54<=0;SIN(A54)+A54^2;(COS(2*A54))^2-2*SIN(A54))

2,16

=ЕСЛИ(A55<=0;SIN(A55)+A55^2;(COS(2*A55))^2-2*SIN(A55))

2,26

=ЕСЛИ(A56<=0;SIN(A56)+A56^2;(COS(2*A56))^2-2*SIN(A56))

2,36

=ЕСЛИ(A57<=0;SIN(A57)+A57^2;(COS(2*A57))^2-2*SIN(A57))

2,46

=ЕСЛИ(A58<=0;SIN(A58)+A58^2;(COS(2*A58))^2-2*SIN(A58))

2,56

=ЕСЛИ(A59<=0;SIN(A59)+A59^2;(COS(2*A59))^2-2*SIN(A59))

2,66

=ЕСЛИ(A60<=0;SIN(A60)+A60^2;(COS(2*A60))^2-2*SIN(A60))

2,76

=ЕСЛИ(A61<=0;SIN(A61)+A61^2;(COS(2*A61))^2-2*SIN(A61))

2,86

=ЕСЛИ(A62<=0;SIN(A62)+A62^2;(COS(2*A62))^2-2*SIN(A62))

2,96

=ЕСЛИ(A63<=0;SIN(A63)+A63^2;(COS(2*A63))^2-2*SIN(A63))

3,06

=ЕСЛИ(A64<=0;SIN(A64)+A64^2;(COS(2*A64))^2-2*SIN(A64))

3,16

=ЕСЛИ(A65<=0;SIN(A65)+A65^2;(COS(2*A65))^2-2*SIN(A65))

g(x)

=(EXP(A2^2))/((A2^8)+1)

=(EXP(A3^2))/((A3^8)+1)

=(EXP(A4^2))/((A4^8)+1)

=(EXP(A5^2))/((A5^8)+1)

=(EXP(A6^2))/((A6^8)+1)

=(EXP(A7^2))/((A7^8)+1)

=(EXP(A8^2))/((A8^8)+1)

=(EXP(A9^2))/((A9^8)+1)

=(EXP(A10^2))/((A10^8)+1)

=(EXP(A11^2))/((A11^8)+1)

=(EXP(A12^2))/((A12^8)+1)

=(EXP(A13^2))/((A13^8)+1)

=(EXP(A14^2))/((A14^8)+1)

=(EXP(A15^2))/((A15^8)+1)

=(EXP(A16^2))/((A16^8)+1)

=(EXP(A17^2))/((A17^8)+1)

=(EXP(A18^2))/((A18^8)+1)

=(EXP(A19^2))/((A19^8)+1)

=(EXP(A20^2))/((A20^8)+1)

=(EXP(A21^2))/((A21^8)+1)

=(EXP(A22^2))/((A22^8)+1)

=(EXP(A23^2))/((A23^8)+1)

=(EXP(A24^2))/((A24^8)+1)

=(EXP(A25^2))/((A25^8)+1)

=(EXP(A26^2))/((A26^8)+1)

=(EXP(A27^2))/((A27^8)+1)

=(EXP(A28^2))/((A28^8)+1)

=(EXP(A29^2))/((A29^8)+1)

=(EXP(A30^2))/((A30^8)+1)

=(EXP(A31^2))/((A31^8)+1)

=(EXP(A32^2))/((A32^8)+1)

=(EXP(A33^2))/((A33^8)+1)

=(EXP(A34^2))/((A34^8)+1)

=(EXP(A35^2))/((A35^8)+1)

=(EXP(A36^2))/((A36^8)+1)

=(EXP(A37^2))/((A37^8)+1)

=(EXP(A38^2))/((A38^8)+1)

=(EXP(A39^2))/((A39^8)+1)

=(EXP(A40^2))/((A40^8)+1)

=(EXP(A41^2))/((A41^8)+1)

=(EXP(A42^2))/((A42^8)+1)

=(EXP(A43^2))/((A43^8)+1)

=(EXP(A44^2))/((A44^8)+1)

=(EXP(A45^2))/((A45^8)+1)

=(EXP(A46^2))/((A46^8)+1)

=(EXP(A47^2))/((A47^8)+1)

=(EXP(A48^2))/((A48^8)+1)

=(EXP(A49^2))/((A49^8)+1)

=(EXP(A50^2))/((A50^8)+1)

=(EXP(A51^2))/((A51^8)+1)

=(EXP(A52^2))/((A52^8)+1)

=(EXP(A53^2))/((A53^8)+1)

=(EXP(A54^2))/((A54^8)+1)

=(EXP(A55^2))/((A55^8)+1)

=(EXP(A56^2))/((A56^8)+1)

=(EXP(A57^2))/((A57^8)+1)

=(EXP(A58^2))/((A58^8)+1)

=(EXP(A59^2))/((A59^8)+1)

=(EXP(A60^2))/((A60^8)+1)

=(EXP(A61^2))/((A61^8)+1)

=(EXP(A62^2))/((A62^8)+1)

=(EXP(A63^2))/((A63^8)+1)

=(EXP(A64^2))/((A64^8)+1)

=(EXP(A65^2))/((A65^8)+1)


 

 

 

Задание №4

 

Составить двухтабличную БД и обработать данные в ней посредством выборки и сортировки; создать запросы и отчеты.

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

2. Создать схему данных. Ввести в таблицы от 10 до 20 записей.

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

4. Создать не менее трех запросов с использованием языка SQL.

5. Произвести сортировку записей в соответствии с вариантом. Сортировка выполняется для таблиц, содержащих результаты запросов.

6. Составить отчет в соответствии с вариантом. Создаваемый отчет, исходя из особенностей конкретной БД, обязательно должен удовлетворять следующим требованиям:

- составляться по двум связанным  таблицам;

- иметь итоговые значения по  группам и по отчету в целом;

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

Тема для составления БД – Аптека – Лекарства.

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

Критерий для запросов выборок – с логическим И, связывающим единственной значение в текстовом поле с интервалом значений в числовом поле.

Сортировка данных – по возрастанию в текстовом поле и убыванию в числовом поле.

При составлении отчета тип группировки – по полю.

Вид итога – количество.

Таблица «Аптека»

Аптека

Производитель

Директор

Адрес

Телефон

Авангард

Иванов И.И.

ул. Гогоря 37

9092285487

Айболит

Бологов А.А.

ул. Садовского 9-25

9606514606

Берлин-Хеми

Клюков В.Н.

пер. Трамвайный

9606510574

Лекарь

Петров П.П.

ул. Ленина 38а

9606485178

Люми

Демичев В.В.

пл. Мира, 25

9036373433

Нижфарм

Соколов С.И.

ул. Комсомольская 250

9051693798

Сантефарм

Сидоров А.Н.

ул. Герцена 10

9606481803

Формаком

Киричек А.В.

ул. Лесная 3а

9606422352

Формацевт

Катунин А.И.

ул. Матвеева 7

9092270604

Эвалар

Алиева А. И.

ул. Циолковского 15

9058562647


 

Ключевое поле – производитель, т.к. это поле не повторяется.

Таблица «Лекарства»

Лекарства

Название

Изготовитель

Срок годности (мес)

Хранение (°С)

Цена

Аскофен

Авангард

6

0

10.00р.

Аспирин

Авангард

10

-5

5.00р.

Аспирин

Лекарь

10

10

5.00р.

Аспирин

Формацевт

10

-5

5.00р.

Биттнер

Авангард

12

-5

85.00р.

Биттнер

Айболит

6

10

250.00р.

Биттнер

Берлин-Хеми

6

0

280.00р.

Биттнер

Лекарь

12

10

100.00р.

Биттнер

Сантефарм

9

15

90.00р.

Валедол

Авангард

9

-5

26.00р.

Валедол

Лекарь

8

-5

56.00р.

Валедол

Сантефарм

12

0

56.00р.

Валедол

Формаком

10

0

20.00р.

Витамины

Авангард

6

-5

15.00р.

Витамины

Лекарь

12

15

99.00р.

Витамины

Сантефарм

9

0

85.00р.

Витамины

Формаком

6

0

100.00р.

Гепатромбин

Авангард

6

-15

10.00р.

Гепатромбин

Лекарь

5

-5

10.00р.

Гепатромбин

Сантефарм

20

-10

10.00р.

Гепатромбин

Формацевт

5

0

12.00р.

Капсикам

Авангард

12

-5

105.00р.

Капсикам

Люми

5

5

60.00р.

Капсикам

Нижфарм

5

5

50.00р.

Капсикам

Сантефарм

6

10

105.00р.

Капсикам

Формаком

5

5

65.00р.

Промагсан

Айболит

12

0

220.00р.

Промагсан

Сантефарм

6

0

20.00р.

Ревит

Авангард

9

0

10.00р.

Ревит

Эвалар

10

0

200.00р.

Селена ВЭЛ

Авангард

3

-5

23.00р.

Селена ВЭЛ

Формаком

10

10

35.00р.

Селена ВЭЛ

Эвалар

3

-10

27.00р.

Ульфавит

Авангард

9

-5

68.00р.

Ульфавит

Айболит

6

0

196.00р.

Ульфавит

Берлин-Хеми

12

-5

215.00р.


 

Ключевое поле – совокупность полей «Название» и «Изготовитель» эта совокупность не повторяется и может однозначно характеризовать запись в таблице.

 

Схема данных

 

Запрос на выборку

Условие: изготовитель лекарства «Авангард», срок годности 12-25 мес.

Запрос в режиме конструктора

 

Результат

Запрос1

Название

Срок годности (мес)

Хранение (°С)

Производитель

Абилифай

14

3

Восток

Баклофен

14

-7

Восток

Гексавит

14

0

Восток

Дексазон

22

-2

Восток

Лазолван

20

-2

Восток

Левомицетин

12

-15

Восток


 

Отчет выполняется по результатам Запроса.

Лекарства

Название Срок годности  Хранение (°С) Производитель

Абилифай

14 3 Восток

Итоги для 'Название' =  Абилифай (1 запись)

Кол-во                                         14

Баклофен

14 -7 Восток

Итоги для 'Название' =  Баклофен (1 запись)

Кол-во                                                      14

Гексавит

14 0 Восток

Итоги для 'Название' =  Гексавит (1 запись)

Кол-во                                        14

Дексазон

22 -2 Восток

Итоги для 'Название' =  Дексазон (1 запись)

Кол-во                                         22

Лазолван

20 -2 Восток

Итоги для 'Название' =  Лазолван (1 запись)

Кол-во                                        20

Левомицетин

12 -15 Восток

Итоги для 'Название' =  Левомицетин (1 запись)

Кол-во                                        12

ИТОГО 96

30 апреля 2010 г. Страница 1 из 1

 

 

Запросы на языке SQL

 

ЗапросSQL1: Лекарства с температурой хранения от 0 до -5 °С

 

SELECT Лекарства.Название, Лекарства.Изготовитель, Лекарства.[Срок годности (мес)], Лекарства.[Хранение (°С)]

Информация о работе Контрольная работа по "Информатика"