Почему нет? составь импровизированную базу данных:
Код:
1 Математика
наука о структурах, порядке и отношениях, которая исторически сложилась на основе операций подсчёта, измерения и описания форм реальных объектов.
2 Физика
еще одна наука о структурах, порядке и ...
потом открываешь как текстовый файл, читаешь строки, убираешь все до пробела и ищешь таким образом нужное. Нашел - читаешь все до следующей пустой строки.
Код:
var f:text;
...
assignfile(f,'Baza.txt');
reset(f);
while not eof(f) do
begin
readln(f,s);
...//обработка
end;
Цифры перед именами можно и убрать. Они просто для удобства редактирования вручную.
З.Ы. думаю, все же определение не в "блокноте", а в текстовом файле
