Тема 3: «Обработка одномерных числовых массивов»
Задача 3.1.
Заполнить одномерный массив из 15 элементов целыми числами. Раскрасить при выводе синим цветом четные элементы массива, стоящие после максимального элемента.
Задача 3.2.
В одномерном числовом массиве хранятся фамилии студентов группы. Выполнить упорядочение массива по алфавиту. Вывести по запросу фамилии, начинающиеся на заданную букву.
Тема 4: «Обработка строк»
Задача 4.1.
Ввести десятичное натуральное число. Получить строку, представляющую собой запись этого числа в двоичной системе счисления.
Задача 4.2.
Разработать программу, которая производит частотный анализ текста, то есть подсчитывает, сколько раз встречается каждая русская буква в строке. Другие символы не учитывать, регистр букв не имеет значения.
Тема 5: «Обработка двумерных числовых массивов»
Задача 5.1.
Заполнить двумерный числовой массив В[6, 6] целыми числами. Найти столбец с наименьшим количеством отрицательных элементов и исключить его из массива.
Задача 5.2.
Раскрасить при выводе красным цветом столбец, содержащий наибольшее количество четных элементов.
Тема 6: «Процедуры и функции программиста»
Задача 6.1.
Создать функцию программиста, которая шифрует любую строку, используя ключ, то есть прибавляет к коду каждого символа последнюю цифру ключа.
Разработать программу, которая шифрует несколько строк, введенных пользователем.
|
|
|
Задача 6.2.
Дополнить предыдущую задачу таким образом, чтобы кроме функции шифрования была также функция дешифрования, и введенный текст затем можно было дешифровать по желанию пользователя. Процедуры и функции программиста расположить в отдельном модуле.
Тема 7: «Текстовые файлы»
Задача 7.
В текстовом файле хранятся слова, каждое слово на отдельной строке. Найти и вывести на экран слова, включающие некоторый слог, введенный пользователем, плюс любые другие буквы.
Тема 8: «Типизированные файлы»
Задача 8.
Заполнить типизированный файл целыми числами из интервала [-2000; 5000]. Поменять местами в файле первый отрицательный и первый положительный компонент.
Тема 9: «Модуль Graph»
Задача 9.
Нарисовать на экране круг зеленого цвета, который движется по горизонтали, при достижении границы экрана превращается в квадрат и начинает движение в обратном направлении. Программа завершается нажатием любой клавиши. Рисование фигур оформить в виде процедуры.
Тема 10: «Модуль DOS»
Задача 10.
Вывести на экран размеры всех файлов, находящихся в текущем каталоге, имена которых начинаются на заданную букву.
|
|
|
Справочные таблицы
| Таблица 15. Процедуры и функции модуля Crt | |||
| Имя | Назначение | ||
| Процедуры задания режимов работы | |||
| Text Mode | Задание текстового режима | ||
| Процедуры управления цветом | |||
| High Video | Задание высокой яркости символов | ||
| Low Video | Задание малой яркости символов | ||
| Norm Video | Задание исходной яркости символов | ||
| TextBackgound | Задание цвета фона | ||
| TextColor | Задание цвета символов | ||
| Процедуры работы с экраном | |||
| ClrEol | Удаление символов от курсора до конца строки | ||
| ClrScr | Очистка экрана | ||
| DelLine | Удаление строки, в которой находится курсор | ||
| GotoXY | Перемещение курсора в заданную позицию | ||
| InsLine | Добавление пустой строки на экране | ||
| Window | Задание размеров окна | ||
| Функции работы с экраном | |||
| WhereX | Текущая координата Х курсора | ||
| WhereY | Текущая координата Y курсора | ||
| Функции работы с клавиатурой | |||
| KeyPressed | Проверка нажатия клавиши | ||
| ReadKey | Чтение символа с клавиатуры | ||
| Процедуры управления звуком | |||
| Sound | Включение звука | ||
| NoSound | Отключение звука | ||
| Процедура разнообразного назначения
| |||
| Delay | Задержка выполнения программы | ||
| AssignCrt | Связь текстового файла с устройством CRT | ||
| Таблица 11. Процедуры и функции модуля System | |||
| Арифметические функции | |||
| Abc | Абсолютное значение аргумента | ||
| ArcTan | Арктангенс аргумента | ||
| Cos | Косинус аргумента | ||
| Exp | Показательная функция с основанием е | ||
| Frac | Дробная часть аргумента | ||
| Int | Целая часть аргумента | ||
| Ln | Натуральный логарифм | ||
| Pi | Число Пи (3,1215926535897932385) | ||
| Sin | Синус аргумента | ||
| Sqr | Квадрат аргумента | ||
| Sqrt | Квадратный корень аргумента | ||
| Процедуры для величин порядкового типа | |||
| Dec | Уменьшение переменной | ||
| Inc | Увеличение переменной | ||
| Функции для величин порядкового типа | |||
| Odd | Проверка аргумента на нечетность | ||
| Pred | Предшествующее значение аргумента | ||
| Succ | Следующее значение аргумента | ||
| Процедуры работы со строками | |||
| Delete | Удаление подстроки и строки | ||
| Insert | Помещение подстроки в строку | ||
| Str | Преобразование числа в строковую переменную | ||
| Val | Преобразование символьного представления числа в двоичное | ||
| Функции работы со строками
| |||
| Concat | Объединение строк | ||
| Copy | Выделение подстроки | ||
| Length | Длина строки | ||
| Pos | Поиск подстроки в строке | ||
| Функции преобразования типов | |||
| Chr | Получение символа по его коду | ||
| High | Получение максимального значения величины | ||
| Low | Получение минимального значения величины | ||
| Ord | Порядковый номер величины перечисляемого типа | ||
| Round | Округление вещественного числа до целого | ||
| Trunc | Целая часть числа | ||
| Функции управления вводом-выводом | |||
| Eof | Конец файла | ||
| Eoln | Конец строки текстового файла | ||
| FilePos | Номер текущей компоненты файла | ||
| FileSize | Текущий размер файла | ||
| IOResult | Результат последней операции ввода-вывода | ||
| SeekEof | Конец файла | ||
| SeekEoln | Конец строки текстового файла | ||
| Процедуры управления вводом-выводом | |||
| Append | Открытие файла для добавления в конец информации | ||
| Assign | Связь файловой переменной с внешним файлом | ||
| BlockRead | Чтение компонент из файла | ||
| BlockWrite | Запись компонент в файл | ||
| ChDir | Изменение текущего каталога | ||
| Close | Закрытие открытого файлы | ||
| Erase | Уничтожение внешнего файла | ||
| Flush | Освобождение буфера выходного файла | ||
| GetDir | Получение текущего каталога накопителя | ||
| MkDir | Создание каталога | ||
| Read | Чтение информации с файла | ||
| Readln | Чтение информации из текстового накопителя | ||
| Rename | Переименование внешнего файла | ||
| Reset | Открытие существующего файла | ||
| Rewrite | Открытие нового файла | ||
| RmDir | Удаление пустого каталога | ||
| Seek | Настройка на требуемую компоненту файла | ||
| SetTextBuf | Назначение буфера ввода-вывода | ||
| Truncate | Удаление части файла, начиная с текущей позиции | ||
| Write | Запись информации в файл | ||
| Writeln | Запись строки в текстовый файл | ||
| Процедуры управления динамической памятью | |||
| Dispose | Освобождение динамической памяти | ||
| FreeMen | Освобождение динамической памяти | ||
| GetMem | Создание новой динамической переменной | ||
| Mark | Фиксация состояния динамической памяти | ||
| New | Создание новой динамической переменной | ||
| Release | Возвращение состояние динамической памяти в заданное состояние | ||
| Функции управления динамической памятью и адресные функции | |||
| Addr | Адрес аргумента | ||
| Assigned | Проверка равенства указателя значению nil | ||
| CSeg | Содержание регистра CS | ||
| DSeg | Содержание регистра DS | ||
| MaxAvail | Размер максимального блока динамической памяти | ||
| MemAvail | Размер свободной области динамической памяти | ||
| New | Создание новой динамической переменной | ||
| Ofs | Смещение адреса аргумента | ||
| Ptr | Преобразование адреса в указатель | ||
| Seg | Адрес сегмента аргумента | ||
| SSeg | Содержимое регистра SS | ||
| SPtr | Содержимое регистра SP | ||
| Управление программой | |||
| Break | Досрочный выход из цикла | ||
| Continue | Начало новой итерации цикла | ||
| Exit | Выход из текущей подпрограммы или программы | ||
| Halt | Прекращение исполнения программы | ||
| RunError | Прекращение исполнения программы с выдачей сообщения об ошибке | ||
| Процедуры разнообразного назначения | |||
| Exclude | Исключение элементов множества | ||
| FillChar | Заполнение области заданным значением | ||
| Include | Включение элементов множества | ||
| Move | Копирование области памяти | ||
| Randomize | Инициализация генератора случайных чисел | ||
| Функции разнообразного назначения | |||
| Hi | Старший байт аргумента | ||
| Lo | Младший байт аргумента | ||
| ParamCount | Число параметров командной строки | ||
| ParamStr | Параметр командной строки | ||
| Random | Случайное число | ||
| SizeOf | Размер аргумента | ||
| Swap | Параметр мест младшего и старшего байтов аргумента | ||
| UpCase | Преобразование строчной буквы в заглавную | ||
| Таблица 12. Процедуры и функции модуля Graph | |
| Процедуры управления графическим режимом | |
| CloseGraph | Прекращение работы графического режима |
| DetectGraph | Проверка оборудования и режима |
| GetModeRange | Получение минимального и максимального номера графического режима |
| InitGraph | Инициализация графического режима |
| RestoreCrtMode | Возвращение в текстовый режим |
| SetGraphBufSize | Изменение размера графического буфера |
| SetGraphMode | Вход в графический режим и очистка экрана |
| Функции управления графическим режимом | |
| GetGraphMode | Получение номера графического режима |
| GetMaxMode | Максимальное число режимов текущего драйвера |
| GetModeName | Получение и заданного графического режима |
| GraphErrorMsg | Формирование сообщения об ошибке |
| GraphResult | Получение кода ошибки |
| GetDriverName | Получение имени текущего драйвера |
| InstallUserDriver | Размещение драйвера в таблице |
| InstallUsrFont | Установка нового шрифта |
| RegisterBGIdriver | Регистрация драйвера |
| RegisterBGIFont | Регистрация шрифта |
| Процедуры управления экраном, окном, страницей | |
| ClearDevice | Очистка графического экрана |
| ClearViewPort | Очистка графического окна |
| GetAspectRatio | Получение относительного масштаба изображения по горизонтали и вертикали |
| GetViewSettings | Получение параметров текущего графического окна |
| SetActivePage | Задание активной страницы |
| SetAspectRatio | Изменение относительного масштаба изображения по горизонтали и вертикали |
| SetViewPort | Задание размеров окна |
| SetVisualPage | Задание отображаемой на экране страницы |
| Процедуры управления цветом и палитрой | |
| GetDefaultPalette | Получение исходных параметров палитры |
| GetPalette | Получение параметров палитры |
| SetAllPalette | Задание всех цветов палитры |
| SetBkColor | Задание цвета фона экрана |
| SetColor | Задание текущего цвета |
| SetPalette | Задание одного цвета палитры |
| SetRGBPalette | Задание палитры для адаптеров IBM-8514 и VGA |
| Функции управления цветом и палитрой | |
| GetBKColor | Получение цвета фона |
| GetColor | Получение текущего цвета |
| GetMaxColor | Получение максимального кода цвета |
| GetPaletteSize | Получение количества цветов в палитре |
| Функции работы с точками | |
| GetMaxX | Получение максимального значения координаты X |
| GetMaxY | Получение максимального значения координаты Y |
| GetPixel | Получение цвета пикселя активной страницы |
| GetX | Получение координаты X текущей позиции на экране |
| GetY | Получение координаты Y текущей позиции на экране |
| Процедура работы с точками | |
| PutPixel | Помещение пикселя в активную страницу |
| Процедуры работы с линиями | |
| GetLineSettings | Получение параметров линии |
| Line | Построение линии от одной точки до другой |
| LineRel | Построение линии с относительными координатами |
| LineTo | Построение линии с абсолютными координатами |
| MoveRel | Перемещение указателя в точку с относительными координатами |
| MoveTo | Перемещение указателя в точку с абсолютными координатами |
| SetLineStyle | Задание характеристик линии |
| SetWriteMode | Задание способа построения линии |
| Процедуры построения фигур из линий | |
| Bar | Построение закрашенного прямоугольника |
| Bar3D | Построение закрашенного параллелепипеда |
| DrawPoly | Построение многоугольника |
| FillPoly | Построение закрашенного многоугольника |
| FloodFill | Заполнение области текущим орнаментом |
| GetFillPattern | Получение орнамента заполнения фигур |
| GetFillSettings | Получение параметров заполнения фигур |
| Rectangle | Построение прямоугольника |
| SetFillPattern | Задание произвольных параметров заполнения фигур |
| SetFillStyle | Задание стандартных параметров заполнения фигур |
| Процедуры построения криволинейных фигур | |
| Arc | Построение дуги окружности |
| Circle | Построение окружности |
| Ellipse | Построение дуги эллипса |
| FillEllipse | Построение закрашенного эллипса |
| GetArcCoords | Получение координат последней дуги |
| PieSlice | Построение закрашенного сектора круга |
| Sector | Построение закрашенного сектора эллипса |
| Процедуры работы с текстом | |
| GetTextSettings | Получение характеристик текста |
| OutText | Вывод последовательности символов |
| OutTextXY | Вывод последовательности символов, начиная с заданных координат |
| SetTextJustify | Задание способа выравнивания текста |
| SetTextStyle | Задание типа, начертания шрифта и коэффициента увеличения символов |
| SetUserCharSize | Задание высоты и ширины символов |
| Функции работы с текстом | |
| TextHeight | Получение высоты строки в пикселях |
| TextWidth | Ширина строки в пикселях |
| Процедуры обмена с памятью | |
| GetImage | Сохранение изображения в буфере |
| PutImage | Вывод изображения из буфера на экран |
| Функции обмена с памятью | |
| ImageSize | Получение размера требуемой для изображения памяти |
| Таблица 13. Процедуры и функции модуля Dos | |
| Процедуры управления вычислительным процессом | |
| Exec | Выполнение программы с параметрами из заданной командной строки |
| GetIntVec | Получение адреса программы обработки прерывания |
| Intr | Выполнение программного прерывания |
| MsDos | Выполнение функции Dos |
| Keep | Прекращение выполнения программы обработки прерывания |
| SetIntVec | Установка адреса программы обработки прерывания |
| SwapVectors | Переопределение векторов прерываний |
| Функции управления вычислительным процессом | |
| DosExitCode | Получение кода выхода из выполняемого процесса |
| EnvCount | Получение количества строк среды DOS |
| EnvStr | Получение указанной строки среды DOS |
| GetEnv | Получение значения указанной переменной среды DOS |
| Процедуры работы с файлами | |
| FindFirst | Поиск первого файла с заданными атрибутами в текущем или заданном каталоге |
| FindNext | Поиск следующего файла с заданными атрибутами в текущем или заданном каталоге |
| FSplit | Разбиение полного имени файла на три части |
| GetFAttr | Получение атрибутов файла |
| SetFAttr | Задание атрибутов файла |
| Функции работы с файлами и диском | |
| DiskFree | Получение числа свободных байтов на диске |
| DiskSize | Получение общего объема памяти диска |
| FExpand | Расширение имени файла до полного имени |
| FSearch | Поиск файла в списке каталогов |
| Процедуры работы с датой и временем | |
| GetDate | Получение текущей даты, установленной в DOS |
| GetFTime | Получение даты и времени последнего обновления файла |
| GetTime | Получение текущего времени, установленного в DOS |
| PackTime | Упаковка переменной типа DateTime в число типа Logint |
| SetDate | Установка текущей даты в DOS |
| SetFTime | Установка даты и времени создания файла |
| SetTime | Установка текущего времени в DOS |
| UnpackTime | Преобразование упакованных даты и времени в распакованную величину типа DateTime |
| Процедуры разнообразного назначения | |
| GetCBreak | Проверка способа работы с комбинацией Ctrl+Break в DOS |
| GetVerify | Анализ состояния флага проверки операции записи в DOS |
| SetCBreak | Установка способа работы с комбинацией Ctrl+Break в DOS |
| SetVerify | Установка состояния флага проверки операции записи в DOS |
| Функции разнообразного назначения | |
| DosVersion | Получение версии DOS |
Литература
1. Коллектив «Основы программирования. Turbo Pascal» (интерактивный курс 201 MB) 2006.
2. Фаронов В.В. «Turbo Pascal.- СПБ : БХВ-Петербург, 2004.
3. [Сетевой материал] http://pascal.guti.ru/ .
4. [Сетевой материал] http://www.tp7.info/
Дата добавления: 2018-05-13; просмотров: 384; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!