На этой страничке я разместил ссылки на программы, которые писал в помощь студентам факультета информатики и вычислительной техники Красноярского государственного технического университета. Программы созданы в среде Турбо Паскаль 7.0. Возможно, что эти мои работы будут полезны студентам других факультетов, где изучают информатику и вычислительную технику...





Тема: Функции и процедуры.


Задача: Вывести на экран таблицу значений функции Y=f(X)...
X изменяется от -5 до 1 с переменным шагом h в зависимости от интервала,
на котором определен аргумент Х.
Y=2*х-5*cosx*sinx,       если -5<= X <=-2,   h=0,5;
Y=ln(2*x+7)-3*sinx,       если -2<= X <=0,    h=0,25;
Y=tg(2*x+10)+2*cosx,    если 0< X <=1,       h=0,25

Скачать исходник: tabulate.rar


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

Скачать исходник: pnumbers.rar




Тема: Строковые функции.


Задача: Используя функции для работы со строками, написать программу:
Словом будем называть группу символов, отделенную от других символов пробелом или запятой. Подсчитать число символов в каждом слове, число слов и вывести результаты на экран.

Скачать исходник: parser.rar


Задача: Используя функции для работы со строками, написать программу:
Для произвольного числа Х найти сумму цифр левой и правой половинок числа. Если число цифр в числе нечетное, то среднюю цифру не считать. Если суммы равны, то вывести на экран рекомендацию "съесть" этот билетик.

Скачать исходник: ticket.rar




Тема: Рекурсивные функции.


Задача: Задана последовательность названий городов. Составить цепочку максимальной длины по правилам известной игры: первым элементом цепочки может быть название любого города, каждый следующий начинается с последней буквы предыдущего, двух одинаковых городов в цепочке быть не должно.
Входные данные: текстовый файл "incity.txt" с названиями городов (латинские символы). В каждой строке - одно слово.

Скачать исходник: citys.rar


Задача: во входном файле задана без ошибок формула следующего вида:
<формула>=<цифра>|M|(<формула>,<формула>)|m|(<формула>,<формула>)
<цифра>=0|1|2|3|4|5|6|7|8|9
где M обозначает функцию MAX, а m - MIN
Вычислить (как целое число) значение по данной формуле (например, M(5,m(6,8))>=6)
Входные данные: исходная формула вводится с клавиатуры.

Скачать исходник: formula.rar


Задача: написать программу, вычисляющую квадраты нечетных чисел в диапазоне 0 - 100. Нельзя пользоваться математическими функциями вычисления квадрата числа; операциями умножения, деления; нельзя использовать циклы for, while..do, repeat..until.

Скачать исходник: recursia.rar


Задача: Задача о восьми ферзях. На шахматной доске расставить восемь ферзей так, чтобы они не "били" друг друга. Написать программу, которая печатает одну из таких расстановок.
(программа написана для запуска в полноэкранном режиме командной строки)

Скачать исходник: ferzy.rar




Тема: Структуры данных. Массивы. Сортировка.


Задача: Перемножить две матрицы размером 5х5 с произвольно взятыми элементами. Для С=А*В - А и В исходные матрицы.

Скачать исходник: abcmass.rar


Задача: Для произвольной матрицы А(N,N) сформировать одномерный массив B каждый элемент которого равен произведению элементов k-й строки на произведение элементов k-го столбца используя процедуру. Определить номер элемента с наибольшим значением полученного одномерного массива B.

Скачать исходник: massab.rar


Задача: Записать в файл N чисел, введенных с клавиатуры. Считать из файла эти числа. Упорядочить в порядке убывания эти числа. Вывести на экран полученную последовательность.

Скачать исходник: sorting.rar


Задача: Дан файл, содержащий целые числа. Найти количество нечетных чисел среди элементов файла.

Скачать исходник: filenumb.rar


Задача: Заполнить массив рядом натуральных чисел, расположив их закручивающейся спиралью по часовой стрелке.

Скачать исходник: spiral.rar


Задача: Дана матрица размером NxN. Найти максимальный элемент побочной диагонали и его координаты.

Скачать исходник: matrix.rar


Задача: Дан двумерный массив Х(6,6) . Определить имеются ли в массиве элементы с одинаковыми значениями среди элементов , расположенных ниже главной диагонали матрицы.

Скачать исходник: massiv6.rar


Задача:
1)Ввести матрицу А и матрицу В
2)Перемножить матрицу А и матрицу В (С=А*В)
3)Вывести матрицу С
4)Переставить строки в матрице А в соответствии в возрастанием минимальных элементов строк.
5) Перемножить отсортированую матрицу А с той же матрицей В (С=А(отсортированая)*В)
6) Вывести эту матрицу С
Входные данные: "matrixa.txt", "matrixb.txt" - текстовые файлы, содержащие исходные массивы A и B

Скачать исходник: matrixabc.rar




Тема: Текстовые файлы.


Задача: для произвольного текста, хранящегося в файле, определить и вывести на печать слова с удвоенными буквами.
Входные данные: текстовый файл "inputext.txt"

Скачать исходник: twochar.rar


Задача: напечатать все слова, хранящиеся в файле, отличные от заданного слова. Слова, совпадающие с заданным словом, удалить из файла.
Входные данные: текстовый файл '"input.txt"
Выходные данные: текстовый файл "output.txt"

Скачать исходник: delword.rar


Задача: Создать текстовый файл, содержащий информацию об абонентах телефонной станции:
номер АТС, число номеров, общее число абонентов, число абонентов-льготников, месячная плата.
Написать программу выдачи на экран записи по номеру АТС, общую сумму платы абонентов за месяц,
сумму платы льготников.
Входные данные: текстовый файл '"atc.txt"

Скачать исходник: phone.rar




Тема: Динамические структуры данных. Двусвязные линейные списки.


Задача: написать программу, которая удаляет из двусвязного списка входной последовательности целых чисел все узлы, содержащие палиндромы, если такие есть.
Примечание: палиндромы - это числа 11, 22, 33, 44 и т.д.

Скачать исходник: delpal.rar


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

Скачать исходник: spisok2.rar


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

Скачать исходник: sps13.rar


Задача: Построить линейный список L1 из слов, хранящихся в текстовом файле F1 (в каждой строке одно слово) и линейный список L2 из слов, хранящихся в текстовом файле F2 (в каждой строке одно слово). Построить линейный двусвязный список L3 из слов, входящих в список L1 и список L2, без повторений.
Входные данные: текстовые файлы "fileL1.txt" и "fileL2.txt"
Выходные данные: текстовый файл "output.txt"

Скачать исходник: two4one.rar


Задача: Разработать процедуру “центрирования” строк заданного текстового файла (dan.inp), каждая из которых имеет длину L больше или равной 40 символов и строки имеют разное число пробелов слева. В выходной файл (res.out) вывести строки исходного файла и файла, полученного в результате “центрирования” ,т.е. расположения в центре экрана независимо от длины строки. Для решения поставленной задачи использовать линейный список.
Входные данные: текстовый файл "Dan3.inp"

Скачать исходник: incenter.rar



Буду весьма признателен тому, кто, воспользовавшись предоставленными программами, оставит благодарственную запись в Гостевой Книге...

Сообщение в гостевую книгу

<<ПРЕДЫДУЩАЯ
ГЛАВНАЯ
СЛЕДУЮЩАЯ>>
Hosted by uCoz