калькулятор Опции

[Yurka]

Напишите программу, что имитирует экран калькулятора, другими словами, нужно, чтобы в ней после введения целого числа меньше 10 (|N | < 10) из клавиатуры вид этой цифры отображался на дисплее. Символ числа должен появляться сразу после ввода фигуры числа

Изображение каждой фигуры или отметки появляется с помощью включения/выключения семи элементов жидкокристаллического дисплея. Состояние программы-дисплея должно отображаться с помощью символов '\' (вертикальная опция), 'J (подчеркивание) и '' (пусто). Цифры и символы минуса должны отображаться следующим образом:
Введение: Файл ввода включает целые числа N (|Nj<1010), одно число в линейке.
Выведение: Исходный файл включает три строки с символическим рисунком дисплея, отдельным на каждую цифру.

Вот такая вот задача. Чесно говоря первая половина вроде понятна, а вот вторая с дисплеем

[Archon]

Хм...

Изображение каждой фигуры или отметки появляется с помощью включения/выключения семи элементов жидкокристаллического дисплея.

Цифры должны выглядеть так:

Код

 _      _
| |  |  _|
|_|  | |_

и тд

Заменяем массив на

const
  digits : array [0 .. 9] of TDigit = (
    (' _ ', '| |', '|_|'), { zero }
    ('   ', '  |', '  |'), { one }
    (' _ ', ' _|', '|_ '), { two }
    (' _ ', ' _|', ' _|'), { three }
    ('   ', '|_|', '  |'), { four }
    (' _ ', '|_ ', ' _|'), { five }
    (' _ ', '|_ ', '|_|'), { six }
    (' _ ', '  |', '  |'), { seven }
    (' _ ', '|_|', '|_|'), { eight }
    (' _ ', '|_|', ' _|') { nine }
  );

А TDigit нужно описать, как

type

   TDigit = array[1..3] of string[3];

Ну и в WriteDigit соответственно 7 на 3 поменять...

добавлено: исправил пару неточностей.

Сообщение отредактировано: Archon - 2.07.2005 15:58