Дан символ, программа должна определить является ли он буквой латинского алфавита или буквой русского алфавита (паскаль)

1

Ответы и объяснения

2013-10-13T16:05:55+04:00
Var  N: char;
begin 
 readln (N);
 if (N in ['A'..'Z']) or (N in ['a'..'z']) then writeln ('Cимвол ', N, ' - латинского алфавита')
 else writeln ('Cимвол ', N, ' - русского алфавита');
end.
а если я введу точку или запчтую или любой другой символ, то мне скажет, что это русский алфавит, что неверно