Question

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

Answer 1

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.

Answer 2

а если я введу точку или запчтую или любой другой символ, то мне скажет, что это русский алфавит, что неверно