Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Ну убейти не пойму в чём дело.

 Var c:char;
Type digit = set of '0'..'9';
begin
c:='7';
if c in digit THEN {сдесь ошибка} writeln('rabotaet');
end.

Ошибка: '(' expected but 'THEN' found
???

Цитата

Ну убейти не пойму в чём дело.

В том, что In проверяет принадлежность элемента к множеству, а не ко множественному типу...

Чувствуешь разницу?

Усё понял. Спасибо.
Бл, а в книге было написано в качестве примера:


Var 
  c:char;

Type 
  digit = set of '0'..'9';

begin
  if c in digit THEN..............

.Что твариться!

const digit : set of char = ['0'..'9'];