1. Постройте программу «RGB-кодирование», описание которой приведено в § 53 учебника. Добавьте в эту программу защиту от ввода слишком больших чисел (больших, чем 255).
2. *Добавьте в программу возможность обратного перевода цифровых кодов: введенное значение шестнадцатеричного кода должно преобразовываться в отдельные значения RGB, например, из «#FF00CC» нужно получить R = 255, G = 0 и B = 204.
Возможно, вам будет полезно логическое свойство Focused, которое есть у компонентов, принимающих ввод с клавиатуры. Оно равно True, если компонент имеет «фокус ввода», то есть пользователь вводит данные в это поле. Например, если Edit1 – это компонент класса TEdit, можно написать
if Edit1.Focused then
{ компонент принимает ввод с клавиатуры }
else
{ компонент НЕ принимает ввод с клавиатуры }
3. Разработайте программу для перевода морских милей в километры (1 миля = 1852 м).
4. Разработайте программу для решения системы двух линейных уравнений. Обратите внимание на обработку ошибок при вычислениях.
5. Разработайте программу для перевода суммы в рублях в другие валюты.
6. Разработайте программу для перевода чисел и десятичной системы в двоичную, восьмеричную и шестнадцатеричную.
7. Разработайте программу для вычисления информационного объема рисунка по его размерам и количеству цветов в палитре.
8. Разработайте программу для вычисления информационного объема звукового файла при известных длительности звука, частоте дискретизации и глубине кодирования (числу бит на отсчёт).
Практическая работа № 66.Разработка компонентов
1. Постройте программу с компонентом TIntEdit, описание которой приведено в § 54 учебника.
2. *Найдите в Интернете информацию по установке нового компонента в палитру компонентов среды Lazarus (или Delphi) и выполните такую установку. Измените программу так, чтобы она использовала компонент TIntEdit из палитры компонентов. Учтите, что при установке компонента в Lazarus потребуется пересборка всей среды (в Delphi – нет).