Хелпикс

Главная

Контакты

Случайная статья





Лабораторная работа № 7. Методические указания



Лабораторная работа № 7

Тема. Массивы. Операции с массивами. Вывод строки символов заданного       цвета (модуль CRT). Стандартные функции и процедуры. Работа с псевдо-случайными последовательностями (ПСП).

Задание. С помощью ПСП сформировать двухмерный MxN массив из элементов. В качестве элементов использовать слова из K..L символов A..Z.

Осуществить действия по заданному алгоритму. Вывести на экран сфор-мированный массив, выделив цветом (мерцанием) указанные в варианте элементы. Вывести результаты на экран.

(Здесь: M и N - соответственно число строк и столбцов формируемой

матрицы; K и L - соответственно минимальное и максимальное число букв в

формируемых словах - элементах массива).

Методические указания

При формировании массива использовать стандартные подпрограммы ПСП -

Random ( Randomize ), а также, возможно использование функции CHR.

Коды ASCII символов A..Z - 65..90 (a..z - 97..122); Слова формируются в одномерных массивах, каждый из которых состоит из L ячеек; буквы записываются без пробела, начиная с первой ячейки.

Незаполненные буквами позиции массива в конце слов заполнить символами пробела - код ASCII - 32.

Для вывода на экран строки заданного цвета необходимо:

1. в программе указать об использовании модуля CRT (USES CRT; - эта

директива должна присутствовать в начале текста программы).

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

цвет вывода соответствующим значением параметра X стандартной процедуры TextColor(X) или переопределить соответствующим образом предопределенную переменную TextAttr модуля CRT. X можно изменять от 0 до 15(или Black, Blue, .. , White); 128(Blink).

Например: .. TextColor(Yellow + Blink); Writeln('текст'); ..- на экран выве-дется мерцающая строка "текст" желтого цвета. (или .. TextAttr:=4+128; Writeln('текст'); .. то же самое).

                     

 




  

© helpiks.su При использовании или копировании материалов прямая ссылка на сайт обязательна.