Программирование на языке высокого уровня - Программирование, компьютеры и кибернетика курсовая работа
Главная
Программирование, компьютеры и кибернетика
Программирование на языке высокого уровня
Сущность среды программирования Turbo Pascal. Разработка программы с учетом потребительских свойств. Особенности методов современной технологии программирования (пошаговой детализации, структурный, модульный принцип, метод иерархической декомпозиции).
посмотреть текст работы
скачать работу можно здесь
полная информация о работе
весь список подобных работ
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Министерство Образования и Науки Российской Федерации
Дагестанский Государственный Технический Университет
Программирование на языке высокого у ровн я
Целью данной курсовой работы является ознакомление с интегрированной средой программирования Turbo Pascal, приобретение навыков создания программ любой сложности на одном из языков программирования высокого уровня (Pascal), с использованием современных методов технологии программирования:
Важной задачей разработки курсового проекта является реализация на практике принципа максимальной эффективности, экономичности и продолжительности срока использования программы, что значительно увеличивает жизненный цикл программы (ЖЦП) и повышает потребительские свойства программы.
Жизненный цикл программы состоит из двух периодов:
период разработки, состоит из трех стадий: предпроектная стадия, стадия проектирования, стадия внедрения;
Цель курсовой работы - разработка программы с учетом потребительских свойств:
функциональная полнота, т. е. программа выполняет все, что задумано;
комфорт в эксплуатации, т. е. удобство работы пользователя;
простота в обучении, т. е. пользователь должен легко обучаться работать с программой;
надежность программы, т. е. правильная работа при верных исходных данных.
При выполнении курсовой работы необходимо показать навыки использования различных структур алгоритмов: линейных, разветвляющихся, циклических . В программах использованы различные типы данных: строковый, регулярный, вещественный, файловый, комбинированный, множественный и символьный.
Неотъемлемой целью данной курсовой работы является приобретение навыков отладки всей программы и её отдельно взятых частей; умение составлять техническую документацию к разработанным программным продуктам.
1) Найти произведение двух массивов C=A(5,3) *B(3,3); D=A(5,3) *R(3,2) и результаты записать в файлы FC и FD.
Матрица А вводится из файла F1. Матрица В вводится из файла F2. Матрица R вводится из файла F3.
2) 1строку матрицы А, 3 строку матрицы В и 2 строку матрицы R умножить на F, где F --max из минимальных элементов трех матриц А,В,R. Преобразованные матрицы записать в те же файлы.
3) Найти сумму элементов каждого файла. Результат записать в файл F4.
1. Сообщить сколько раз встречаются в тексте каждый символ кроме букв.
2. Вывести все символы, не встречающиеся в тексте.
3. Выяснить, можно ли из символов первой и последней строки, используя каждый символ, только один раз, составить фамилию студента.
а. Создать файл, содержащий сведения о количестве изделий категорий А,Б,С, собранных рабочим за месяц. Структура записи имеет поля: фамилия сборщика, наименование цеха, количество изделий по категориям, собранных рабочим за месяц.
б. Считая заданными значения расценок SА,SБ,SС за выполненную работу по сборке единицы изделия категорий А,Б,С соответственно, выдать на печать следующую информацию:
ь общее количество изделий, собранных рабочими цеха Х;
ь ведомость заработной платы рабочих цеха Х;
ь средний размер заработной платы работников цеха Х.
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
· Все символы, которые невстречаются в тексте
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
Общее количество изделий собранных рабочими цеха Х
Средний размер заработной платы рабочих цеха Х
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
Создать файл ,содержащий ведения о количестве изделий категорий собранных рабочим ,за месяц.
Создать Создать файл,содержащий ведения о количестве изделий категорий собранных рабочим ,за месяц .
множество символов не встречающихся в тексте: _ ! " # $ % & ' ( ) * + -/ 0 1 2 3 4 5 6 7 8 9 : ; < = > ?
Содержимое файла до начала выполнения программы
Содержимое файла после выполнения программы
Общее количество изделий собранных рабочими столярного цеха
Средний размер заработной платы рабочих столярного цеха
1) п/п ассигнует файл на диске с названием ADRES, ставит в соответствие файловую переменную A1, открывает его для чтения, вводит из него массив NAME (I,J) и закрывает файл.
PROCEDURE wwod_а (adres: string; i,j:byte; var name:mas);
2) п/п умножает матрицу m1(i,j) на m2(j,i1) в результате получает массив naime(i,i1);
PROCEDURE umn_matrix (i,j,i1:byte; var name,m1,m2:mas);
3) п/п ассигнует файл на диске с названием adres, ставит в соответствие файловую переменную A, открывает его для записи, записывает в файл с названием adres массив name (i,j) и закрывает его.
PROCEDURE zapis (adres: string; i,j:byte; var name:mas);
4) п/п находит S-минимальный элемент матрицы ADR(I,j) и выводит его.
5) п/п находит F-максимальный из минимальных элементов из трёх чисел A,B,C
6) п/п умножает строку I матрицы name(i,j) на число F-максимальное из минимальных элементов записывает преобразованную матрицу в конец файла adres.
FUNCTION UMN (i,j:byte; var name:mas):byte;
7) п/п ассигнует файл на диске с названием ADRES, ставит в соответствие файловую переменную A, открывает его для чтения вычисляет SUM_EL-сумму элементов массива и закрывает его. Результат записывает в файл F4.txt.
FUNCTION SUM_EL(adres:string):real;
1) п/п ассигнует файл на диске с названием ADRES, ставит в соответствие файловую переменную A1, открывает его для чтения, вводит из него массив NAME (I,J) и закрывает файл.
PROCEDURE wwod_а (i,j:byte; adres: string; var name:mas);
procedure wwod_f(i,j:byte;adres:string; var naime:mas);
for k:=1to j do read(a1,naime[n,k]);
Исходные данные: Результат: В ручную:
Вывод: Так как результат, выполненный вручную совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
2) п/п умножает матрицу m1(i,j) на m2(j,i1) в результате получает массив naime(i,i1);
PROCEDURE umn_matrix (i,j,i1:byte; var name,m1,m2:mas);
procedure umn_matrix(i,j,i1:byte;var naime,m1,m2:mas);
naime[n,K]:=naime[n,K]+m1[n,r]*m2[r,K];
1 2 1 0 1 1*1+2*2 1*0+2*3 1*1+2*0 5 6 1
0 1 * 2 3 0 = 0*1+1*2 0*0+1*3 0*1+1*0 = 2 3 0
Вывод: Так как результат выполненный вручную совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
3) п/п ассигнует файл на диске с названием adres, ставит в соответствие файловую переменную A, открывает его для записи, записывает в файл с названием adres массив name (i,j) и закрывает его.
PROCEDURE zapis (adres: string; i,j:byte; var name:mas);
procedure zapis(adres:string i,j:byte;;naime:mas);
for k:=1to j do write(a1,naime[n,k]);
Исходные данные: Результат : В ручную:
Вывод: Так как результат выполненный вручную совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
4) п/п находит s-минимальный элемент матрицы ADR(I,j) и выводит его.
if min>adr[i,j] then min:=adr[i,j];
Исходные данные: Результат : В ручную
Вывод: Так как результат выполненный вручную совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
5) п/п находит F-максимальный из минимальных элементов из трёх чисел A,B,C
Исходные данные: Результат: В ручную:
Вывод: Так как результат, выполненный вручную, совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
6) п/п умножает строку I матрицы name(i,j) на число F-максимальное из минимальных элементов записывает преобразованную матрицу в конец файла adres.
FUNCTION UMN (i,j:byte; var name:mas):byte;
function umn(i,j:byte;var naime:mas):byte;
Исходные данные: Результат: В ручную:
Вывод: Так как результат, выполненный вручную, совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
7) п/п ассигнует файл на диске с названием ADRES, ставит в соответствие файловую переменную A, открывает его для чтения вычисляет SUM_EL-сумму элементов массива и закрывает его. Результат записывает в файл F4.txt.
FUNCTION SUM_EL(adres:string):real;
function SUM_el(adres:string):byte;
Исходные данные: Результат: В ручную:
Вывод: Так как результат, выполненный вручную, совпадает с результатом выданным подпрограммой, то можно сделать вывод, что подпрограмма работает правильно.
Постановка задачи: ассигнуем файловые переменные f и fn с физическими файлами p1.txt и p2.txt. Файл p1.txt открываем для чтения. Файл p2.txt открываем для записи. Считаем количество символов в тексте кроме букв. Закрываем физические файлы f и fn.
Постановка задачи : ассигнуем файловые переменные f и fn с физическими файлами p1.txt и p2.txt. Открываем файл p1.txt для чтения, а файл p2.txt для добавления в его конец символов, не встречаюшихся в тексте. Пока нет конца файла, считываем символы из файла p1.txt. Находим множество sc. Затем проверяем, если символ из sc, то записываем его в файл p2.txt. Закрываем физические файлы.
Постановка задачи: ассигнуем файловые переменные f и fn с физическими файлами p1.txt и p2.txt. Открываем файл p1.txt для чтения, а файл p2.txt для добавления в его конец результата, можно ли из символов первой и последней строки составить фамилию студента. Находим результат вычислений. Закрываем физические файлы.
for i:=240 to 255 do x[1,i-144]:=i;
writeln(fn,”количество кимволов в тексте кроме букв”);
if x[2,i]<>0 then writeln(fn,chr(x[1,i]),'--->',x[2,i],' ');
Результаты, полученные ПК в файле p2.txt .
кол-во символов встречающихся в тексте кроме букв
кол-во символов встречающихся в тексте кроме букв
Поскольку результаты, полученные ПК в файле p2.txt, совпадают с результатами полученными вручную, можно предположить, что программа работает правильно.
Постановка задачи: ассигнуем файловые переменные f и fn с физическими файлами p1.txt и p2.txt. Открываем файл p1.txt для чтения, а файл p2.txt для добавления в его конец символов, не встречаюшихся в тексте. Пока нет конца файла, считываем символы из файла p1.txt. Находим множество sc. Затем проверяем, если символ из sc, то записываем его в файл p2.txt. Закрываем физические файлы.
П/П читает символы в тексте из файла p1.txt и добавляет в конец файла p2.txt символы не встречающиеся в тексте
writeln(fn,'символы не встречающиеся в тексте');
if chr(i) in sc then writeln(fn,chr(i),' ');
Результаты, полученные ПК в файле p2.txt.
_ ! " # $ % & ' ( ) * + -/ 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ А Б В Г Д Е Ж З И Й К Л М H О Р С Т У Ф Х Ц Ч Ш Щ Ъ Ы Ь Э Ю Я - - - ¦ + ¦ ¦ ¬ ¬ ¦ ¦ ¬ - - - ¬ L + T + - +¦ ¦ L г ¦ T ¦ = + ¦ ¦ T T L L - г + + - - - - ¦ ¦ - ф ш щ ъ ю Ё ё Є є Ї ї Ў ў ° • · № ¤
_ ! " # $ % & ' ( ) * + -/ 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ ` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ А Б В Г Д Е Ж З И Й К Л М H О Р С Т У Ф Х Ц Ч Ш Щ Ъ Ы Ь Э Ю Я - - - ¦ + ¦ ¦ ¬ ¬ ¦ ¦ ¬ - - - ¬ L + T + - +¦ ¦ L г ¦ T ¦ = + ¦ ¦ T T L L - г + + - - - - ¦ ¦ - ф ш щ ъ ю Ё ё Є є Ї ї Ў ў ° • · № ¤
Поскольку результаты, полученные ПК в файле a1.txt, совпадают с результатами полученными вручную, можно предположить, что программа работает правильно.
Постановка задачи: ассигнуем файловые переменные f и fn с физическими файлами p1.txt и p2.txt. Открываем файл p1.txt для чтения, а файл p2.txt для добавления в его конец результата, можно ли из символов первой и последней строки составить фамилию студента. Находим результат вычислений. Закрываем физические файлы.
П/П читает символы в тексте из файла p1.txt, проверяет можно ли из символов первой и последней строки составить фамилию студента и добавляет результат в конец файла p2.txt.
writeln('введите фамилию студента');
if kon=1 then write(fn,'нельзя составить фамилию студента')
else write(fn,'можно составить фамилию студента');
Результаты, полученные ПК в файле p2.txt.
Поскольку результаты, полученные ПК в файле a1.txt, совпадают с результатами полученными вручную, можно предположить, что программа работает правильно.
П/П по данным, извлеченным из файла d.txt , создает файл y.txt, содержащий фамилию работника, количество собранных изделий и строка определяющая оклад.
writeln('‚введите наименование цеха');
for k:='A' to 'C' do read(cena[k]);
writeln(fr,'‚ введите наименование цеха ');
writeln(fr,'средняя зарплата =',srzarpl:10:3);
writeln(fr,'общее количество изделий=',obkol);
Для проверки тестовой программы создаем файл d.txt и записываем в него следующие записи:
Результаты, полученные ПК в файле rezul.txt.
Общее количество изделий собранных рабочими рабочими столярного цеха 229
Заработная плата рабочих столярного цеха
Средняя зарплата рабочих столярного цеха 1100
Общее количество изделий собранных рабочими столярного цеха 229
Заработная плата рабочих столярного цеха
Средняя зарплата рабочих столярного цеха 1100
Поскольку результат, полученный в файле best.txt после выполнения тестовой программы, совпадает с результатом, полученным вручную, можно сделать вывод, что подпрограмма z_3 работает правильно.
turbo pascal програмирование технология
procedure wwod_f(i,j:byte;adres:string; var naime:mas);
for k:=1to j do read(a1,naime[n,k]);
procedure umn_matrix(i,j,i1:byte;var naime,m1,m2:mas);
naime[n,K]:=naime[n,K]+m1[n,r]*m2[r,K];
procedure zapis(i,j:byte;adres:string;naime:mas);
for k:=1to j do write(a1,naime[n,k]);
if min>adr[i,j] then min:=adr[i,j];
function umn(i,j:byte;var naime:mas):byte;
function SUM_el(adres:string):byte;
for i:=240 to 255 do x[1,i-144]:=i;
writeln(fn,'количество символов встречающихся в тексте');
if x[2,i]<>0 then writeln(fn,chr(x[1,i]),' - ',x[2,i],' ','штук');
writeln(fn,'символы не встречающиеся в тексте');
if chr(i)in sc then writeln(fn,chr(i),' ');
writeln('введите фамилию студента');
if kon=1 then write(fn,'нельзя составить фамилию студента')
else write(fn,'можно составить фамилию студента');
writeln(fb,'obgee kolichectvo izdelii');
writeln ('общее количество изделий собранных рабочими столярного цеха=',s:1);
with rab[k] do if cex=c then srzar:=srzar+zar;
writeln('cpednia zarplata=',srzarpl:1);
Файл Содержимое файла до начала Содержимое файла после
Выполнения программы выполнения программы
множество символов не встречающихся в тексте
Y.TXT ----------------- Общее количество изделий
Файл Содержимое файла до начала Содержимое файла после
Выполнения программы выполнения программы
множество символов не встречающихся в текст P2.TXT ----- можно
Y.TXT ----------------- Общее количество изделий
Поскольку результаты, полученные ПК в файлах F1.TXT,F2.TXT,F3.TXT,F4.TXT,FC.TXT,FD.TXT,P2.TXT,Y.TXT, совпадают с результатами полученными вручную, можно предположить, что программа работает правильно.
Для правильной работы программы необходимо наличие следующих файлов:
F1.TXT, F2.TXT, F3.TXT- для первого задания, P1.TXT- для второго задания,
D.TXT- для третьего задания. В файлах первого задания должны хранится матрицы: А (5,3), В (3,3), R (3,2).
В файле второго задания может храниться произвольный текст. В файлах третьего задания хранится информация о рабочих столярного и сборочного цехов ,соответственно: фамилии рабочих, число изготовленных окон, число изготовленных столов и заработная плата. Все эти файлы должны находиться в текущей директории.
Сама программа KURSOV.PAS должна хранится в текущей директории вместе с файлами данных. После запуска программы из IDE TURBO Pascal, необходимо ввести для второго задания:
Для третьего задания необходимо ввести с клавиатуры:
Разработка алгоритмов методом пошаговой детализации. Типы данных и операции в Turbo-Pascal. Организация работы с подпрограммами. Составление алгоритмов и программ задач с использованием конечных сумм. Организация работы с динамическими переменными. учебное пособие [1,4 M], добавлен 26.03.2014
Цель, этапы, основные проблемы структурного программирования. Принцип нисходящего проектирования алгоритмов и программ (метод проектирования сверху вниз). Достоинства метода пошаговой детализации. Основные плюсы и минусы методик программирования. реферат [40,0 K], добавлен 01.04.2010
Освоение технологии структурного программирования и применения стандартных методов работы с одномерными массивами при разработке и создании программы на языке Турбо Паскаль. Разработка программы методом пошаговой детализации с помощью псевдокода. реферат [276,9 K], добавлен 27.02.2008
История создания и развитие Pascal. Особенности пакета программирования Turbo. его возможности редактора текстов, компилятора и отладчика. Построения программы на языке Turbo Pascal, ее структура, типы алгоритмов, одномерные и многомерные массивы. курсовая работа [519,3 K], добавлен 25.06.2011
Основные этапы разработки программного обеспечения (пакета программ), анализ требований к системе. Метод пошаговой детализации. Языки программирования низкого уровня и высокого уровня (императивные, объектно-ориентированные, функциональные, логические). презентация [41,4 K], добавлен 13.10.2013
Появление первых вычислительных машин и возникновение "стихийного" программирования. Структурный подход к декомпозиции сложных систем. Развитие модульного и объектно-ориентированного программирования. Особенности компонентного подхода и CASE-технологий. презентация [1,5 M], добавлен 14.10.2013
Информационные технологии и защиты данных. Методы защиты информации. Виды информационной безопасности и умышленные угрозы. Программирование на языке Turbo Pascal. Типы числовых данных. Функции ввода и вывода. Логические операторы, символьные переменные. курсовая работа [1,7 M], добавлен 16.05.2016
Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д. PPT, PPTX и PDF-файлы представлены только в архивах. Рекомендуем скачать работу .
© 2000 — 2021
Программирование на языке высокого уровня курсовая работа. Программирование, компьютеры и кибернетика.
Бродский Полное Собрание Сочинений Скачать Торрент
Курсовая работа: Реклама на транспорте. Особенности разработки рекламной кампании
Реферат: Рассмотрение и утверждение проекта федерального бюджета в России
Реферат На Тему Психология Память
Характеристика По Практике Нир
Реферат: The Roman Military Essay Research Paper
Два Типа Любви В Романе Обломов Сочинение
Тамгалы Тас Эссе На Казахском Языке
Контрольная Работа По Химии 10 Класс Органика
Курсовая работа: Жанр интервью в газете "Красное знамя". Скачать бесплатно и без регистрации
Курсовая работа по теме Символические знаки в разных религиозных системах
Курсовая работа по теме Этнографический туризм
Дипломная работа по теме Проектирование детали 'Втулка'
Класс Выполнение Практической Работы
Курсовая работа по теме Договор совместной деятельности
Сочинение Про Народные
Дипломная работа: Управление на малых предприятиях
Курсовая Особенности И Методы Нормирования Управленческого Труда
Реферат: Принцип неопределенности
Реферат по теме Наматериальные активы: как оценить их стоимость
Особенности взаимоотношений специалистов по связям с общественностью и журналистов - Журналистика, издательское дело и СМИ дипломная работа
Сравнение речевого поведения ведущих различных телевизионных каналов - Иностранные языки и языкознание курсовая работа
Биография Мухаммеда Махди Акефа – руководителя египетской организации "братьев-мусульман" - История и исторические личности реферат