F1 = ( ¬X ∨ Y ) ∧ ( ¬X ∨ ¬Y )
F2 = ( X ∨ Y ) ∧ ( ¬X ∨ Y )
1) Не хватка мощностей компьютера, либо он сильно загружен в данный момент, либо он серьезно "засран".
2) У вас скорее всего закончилось свободное место на диске. Рекомендую вам почистить диск в ручном или же в автоматическим режиме. А также можно купить еще один диск.
................................................................................................
Var
Symbol: char;
begin
write('Введите латинскую букву или цифру: ');
readln(Symbol);
case Symbol of
'a'..'z': writeln('Это маленькая буква');
'A'..'Z': writeln('Это большая буква');
'0'..'9': writeln('Это цифра');
end;
end.