Разработка алгоритма и написание программы на языке Turbo Pascal

Автор работы: Пользователь скрыл имя, 12 Октября 2014 в 22:06, курсовая работа

Краткое описание

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

Содержание

Задание №1 4
Задание №2 11
Задание №3 18
Задание №4 22
Задание №5 37
Список литературы 47

Вложенные файлы: 1 файл

Готовая курсовая.docx

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

 

 

 

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

Запрос 3 - Режим SQL

SELECT Факультет.[Название  факультета], Кафедра.[Название кафедры], Кафедра.[год основания]

FROM Факультет INNER JOIN Кафедра ON Факультет.[Код факультета]=Кафедра.[Код  факультета]

WHERE (((Кафедра.[год основания])<2000));

Запрос 3 – Режим конструктора

 

 

 

 

 

Запрос 3 – Результат

 

Запрос3

Название факультета

Название кафедры

год основания

Финансово-экономический

Государственное управление и финансы

1993

Юридический

Теория и история государства и права

1995

Учебно-научно-исследовательский

Информационные системы

1998

Учебно-научно-исследовательский

Приборостроение, метрология и сертификация

1984

Гуманитарный

Философия и история

1966

Естественно-научный

Высшая математика

1983

Естественно-научный

Химия

1999

Институт транспорта

Подъёмно-транспортные, строительные идорожные машины

1995

Пищевой биотехнологии и товароведения

Технология и товароведение продуктов питания

1996

Физической культуры и спорта

Физическая культура

1964


 

 

 

Запрос 4 - Режим SQL

SELECT Факультет.[Название  факультета], Факультет.[Количество  студентов], Факультет.[Количество кафедр], Кафедра.[Название кафедры]

FROM Факультет INNER JOIN Кафедра ON Факультет.[Код факультета]=Кафедра.[Код  факультета]

WHERE (((Факультет.[Количество  кафедр])=5));

Запрос 4 – Режим конструктора

 

 

 

 

 

 

 

 

 

          Запрос 4 – Результат

Запрос4

Название факультета

Количество студентов

Количество кафедр

Название кафедры

Юридический

1543

5

Теория и история государства и права

Юридический

1543

5

Уголовное право и процесс

Гуманитарный

1567

5

Философия и история

Гуманитарный

1567

5

Русский язык и педагогика

Естественно-научный

1072

5

Высшая математика

Естественно-научный

1072

5

Химия

Архитектурно-строительный

1342

5

Архитектура

Архитектурно-строительный

1342

5

Городское строительство и хозяйство


 

 

 

Запрос 5 - Режим SQL

SELECT Факультет.[Название  факультета], Факультет.[Количество  кафедр], Кафедра.[Название кафедры], Кафедра.[зав кафедры], Кафедра.[год  основания]

FROM Факультет INNER JOIN Кафедра ON Факультет.[Код факультета]=Кафедра.[Код  факультета]

WHERE (((Кафедра.[год основания])>1995));

Запрос 5 – Режим конструктора

 

 

 

 

 

 

Запрос 5 – Результат

Запрос5

Название факультета

Количество кафедр

Название кафедры

зав кафедры

год основания

Финансово-экономический

7

Бухгалтерский учёт и налогообложение

Попова Л.В.

2000

Юридический

5

Уголовное право и процесс

Назаренко Г.В.

2008

Учебно-научно-исследовательский

3

Информационные системы

Константинов И.С.

1998

Гуманитарный

5

Русский язык и педагогика

Бобыёв Б.Г.

2002

Новых технологий и автоматизации

6

Динамика и прочность машин

Малинин В.Г.

2004

Новых технологий и автоматизации

6

Теоретическая и прикладная механика

Ешутник Д.Н.

2004

Естественно-научный

5

Химия

Куценко С.А.

1999

Институт транспорта

2

Сервис и ремонт машин

Андреев Г.П.

2001

Архитектурно-строительный

5

Архитектура

Колесникова Т.Н.

2004

Архитектурно-строительный

5

Городское строительство и хозяйство

Никулин А.И.

2004

Пищевой биотехнологии и товароведения

3

Технология и товароведение продуктов питания

Иванова Т.Н.

1996

Пищевой биотехнологии и товароведения

3

Технология и организация питания, гостиничного хозяйства и туризма

Артёмова Е.Н.

2002

Физической культуры и спорта

2

Туризм, рекреация и спорт

Макеева В.С.

2005


 

 

 

Отчет

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

Факультет

Название факультета Количество  Название кафедры зав кафедры

Архитектурно-

1342

Городское строительство и хозяйство Никулин А.И.

Архитектура Колесникова Т.Н.

Гуманитарный

1567

Философия и история Аронов Д.В.

Русский язык и педагогика Бобыёв Б.Г.

Естественно-научный

1072

Высшая математика Гордон В.А.

Химия Куценко С.А.

Институт транспорта

908

Сервис и ремонт машин Андреев Г.П.

Подъёмно-транспортные, строительные  Ушаков Л.С.

Новых технологий и

600

Теоретическая и прикладная механика Ешутник Д.Н.

Динамика и прочность машин Малинин В.Г.

Пищевой

1209

Технология и товароведение продуктов питания Иванова Т.Н.

Технология и организация питания, гостиничного Артёмова Е.Н.

Учебно-научно-

1289

Приборостроение, метрология и сертификация Подмастерьев К.В

Информационные системы Константинов И.С.

Физической культуры

700

Туризм, рекреация и спорт Макеева В.С.

Физическая культура Котьков Н.Н.

Финансово-

1243

Государственное управление и финансы Уварова А.Я.

Бухгалтерский учёт и налогообложение Попова Л.В.

Юридический

1543

Уголовное право и процесс Назаренко Г.В.

Теория и история государства и права Сизов В.Е.

22946 Количество студентов Итог

22 декабря 2011 г. Стр. 1 из 1

 

 

Задание №5

 

Создание Web-страниц

Производственные мастерские.

Пошив рабочей одежды за 4-и квартал

 

1-й квартал

2-й квартал

3-й квартал

4-йквартал

Иванова

120шт 

120шт 

90шт 

140шт 

Петрова

40шт 

90шт 

140шт 

70шт 

Сидорова

60шт 

70шт 

90шт 

130шт 

Смирнова

130шт 

95шт 

14шт 

60шт 


 

 

Страница 1

 

 

 

 

 

 

HTML-код

<html>

<head>

<title>Добро пожаловать!</title>

</head>

<body background="1.jpg">

<H1><font color="magenta"><p align="center"><b><i>

Производственные мастерские </p></H1></font></h1>

<HR color="bloo"SIZE="5">

<p align="center"><font color="indigo"><H3>Производственные  мастерские основаны в 1998 году  как фирма по пошиву рабочей  одежды. В 2008 году был открыт новый  офис в городе Орле.<H3></p>

<HR color="spice orange"SIZE="5">

<p aling="right"><font color="indigo"><H1>Главный офис</h1>

<h4><br>Площадь офиса 120 кв.м</br>

<br>ПЛАНЫ ТИПОВЫХ ЭТАЖЕЙ</br>

<br>1-й этаж: лобби</br>

<br>2-3 этажи: офисные площади</br>

<br>4-й этаж: технические  помещения</br>

<p align="center"><font color="red"><H1>Инженерные системы:</h1></p></font>

<ul type="square">

<h2>

<li>Современные скоростные  лифты (4 лифта в корпусе А и 3 лифта в корпусе Б);</li>

<li>Автоматические системы  противопожарной защиты и сигнализации;</li>

<li>Оптико-волоконная  связь.</li>

</h2></i></b>

<p align="center"><font color="coral"><H2>Лучшие специалисты</h2></p>

<ul type="square">

<h3>

<li>Иванова</li>

<li>Петрова</li>

<li>Сидорова</li>

<li>Смирнова</li></font>

</h3></i></b>

<p align="center"><font color="plum"><H1><strong>Контактные телефоны: 21-98-00; 76-00-98</strong></h1></font></p>

<p><LINK="blue"><VLINK="pink"><ALINK="green"><a href="2.html">Таблица</a></p>

<p><a href="3.html">Список  сотрудников</a></p>

<p><a href="4.html">Наши работы</a></p></ALINK></VLINK></LINK>

<br>

</body>

</html>       

 

 

 

 

 

 

 

 

Страница 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

HTML-код

<html>

<head>

<title>Таблица</title>

</head>

<body bgcolor="claret">

<H1>

<p align="center"> Производственные  мастерские <br>Пошив рабочей одежды  за 4-и квартала </p>

</H1>

<p align="center"><table border>

<tr>

<td><th bgcolor="yellow">Товар</th></td>

<td><th bgcolor="yellow"><aling=center>1-й квартал</th></td>

<td><th bgcolor="yellow"><aling=center>2-й квартал</th></td>

<td><th bgcolor="yellow"><aling=center>3-й квартал</th></td>

<td><th bgcolor="yellow"><aling=center>4-й квартал</th></td>

</tr>

<tr>

<td><th bgcolor="yellow">Иванова</th></td>

<td><th bgcolor="yellow"><aling=center>120 шт</th></td>

<td><th bgcolor="yellow"><aling=center>120 шт</th></td>

<td><th bgcolor="yellow"><aling=center>90 шт</th></td>

<td><th bgcolor="yellow"><aling=center>140 шт</th></td>

</tr>

<tr>

<td><th bgcolor="yellow">Петрова</th></td>

<td><th bgcolor="yellow"><aling=center>40 шт</th></td>

<td><th bgcolor="yellow"><aling=center>90 шт</th></td>

<td><th bgcolor="yellow"><aling=center>140 шт</th></td>

<td><th bgcolor="yellow"><aling=center>70 шт</th></td>

</tr>

<tr>

<td><th bgcolor="yellow">Сидорова</th></td>

<td><th bgcolor="yellow"><aling=center>60 шт</th></td>

<td><th bgcolor="yellow"><aling=center>70 шт</th></td>

<td><th bgcolor="yellow"><aling=center>90 шт</th></td>

<td><th bgcolor="yellow"><aling=center>130 шт</th></td>

</tr>

<tr>

<td><th bgcolor="yellow">Смирнова</th></td>

<td><th bgcolor="yellow"><aling=center>130 шт</th></td>

<td><th bgcolor="yellow"><aling=center>95 шт</th></td>

<td><th bgcolor="yellow"><aling=center>14 шт</th></td>

<td><th bgcolor="yellow"><aling=center>60 шт</th></td>

</tr>

</table></p>

<p align="center"><font color="indigo"><h2>Фирма работает эффиктивно. За 4 квартала работники фирмы произвели более 1000 штук экземпляров рабочей одежды. Фирма занимает одно из лидирующих мест среди данного рода деятельности фирм.</h2></p>

<a href="3.html">Список  сотрудников</a>

<a href="1.html">На главную</a>

<a href="4.html">Наши работы</a>

</body>

</html>     

 

 

 

Страница 3

 

 

 

 

 

 

 

HTML-код

<html>

<head>

<title>Сотрудники</title>

</head>

<body bgcolor="coral">

<font size="+3"><font color="#339933"><p align="center">

Производственные мастерские</p></h1></font></font>

<img src="48664985_88.jpg"><p><h3>Краснов  Валерий Анатольевич</h3></p>

<p align="justify"><h2>Главный  директор фирмы. На данной должности  находится с 2002 года.</h2></p>

<br>

<ul type="square">

<font size="+2"><font color="#6633FF">

<p>Сотрудники фирмы</p>

<li>Якушева Е.Т.-Заместитель  директора. Стаж работы - 7 лет </li>

<li>Дакукина М.И. Кассир. Стаж работы - 6 лет</li>

<li>Макенин Ю.Ю. Менеджер. Стаж работы - 2 года </li>

<li>Федотова Д.Н. Секретарь. Стаж работы - 4 года</li>

<li>Илюхина К.И. Юрист. Стаж работы - 4 года</li>

<li>Тимошина В.А. Кассир. Стаж работы - 8 лет </li>

</font>

</font>

</ul>

<br>

<h1><font color="blue"><p align="center"><b><i>Адреса наших  офисов, площадь офисов </p></h1></font></h1>

Информация о работе Разработка алгоритма и написание программы на языке Turbo Pascal