Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.01.2009, 22:44   #1
Olalya da Silva
Пользователь
 
Регистрация: 09.01.2009
Сообщений: 11
Восклицание Массивы, множества. Работа с цветом

Сформировать двухмерный m*n массив из элементов. В качестве элементов использовать слова из K..L символов A..Z (одномерный массив символов латинского алфавита). Осуществить подсчет элементов, удовлетворяющих условиям задания. Проверку заданных условий поиска реализовать с использованием типа множества. Вывести на экран сформированный массив в виде таблицы, выделить цветом подсчитанные элементы. Результат подсчета вывести на экран в вотдельном окне.
(Здесь: M и N - соответственно число строк и столбцов формируемой таблицы; K и L - соответственно минимальное и максимальное число букв в формируемых словах - элементах массива).
Методические указания: При формировании массива использоватьRandom, Randomize. Коды ASСII символов A..Z-65..90. Слова формируются в одномерных массивах, каждый из которых состоит из L ячеек; буквы записываются без пробела, начиная с первой ячейки. незаполненные буквами позиции массива в конце слов заполнить символами пробела - код ASCII - 32.
Для вывода на экран строки заданного типа НЕОБХОДИМО:
- в программе указать об использовании модуля CRT (USES CRT; - эта директива должна присутствовать в начале программы).
- перед использованием стандартной процедуры вывода необходимо задать цвет вывода соответствующим значением параметра Х стандартной процедуры TextColor(X)/

Выделить цветом и подсчитать число слов, удовлетворяющих следующим условиям.
1. Средняя буква в слове - согласная.
2. Слово принадлежит столбцу, в котором есть не менее семи гласных букв.
K=2, L=7, M=20, N=10
Olalya da Silva вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
OpenGL: проблема с цветом N!ckeL Общие вопросы Delphi 5 10.01.2010 15:14
Массивы, работа с файлами. Freestyle Паскаль, Turbo Pascal, PascalABC.NET 0 09.12.2008 14:05
Выделение цветом ratgunter Общие вопросы C/C++ 0 05.12.2008 23:22
Работа с матрицами. Массивы. Xeon332 Помощь студентам 9 16.01.2008 21:03