дан символ, программа должна определить является ли он буквой латинского алфавита или буквой русского алфавита (паскаль)
Answers & Comments
SophiaGreen
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.
0 votes Thanks 1
alexmishenev
а если я введу точку или запчтую или любой другой символ, то мне скажет, что это русский алфавит, что неверно
Answers & Comments
begin
readln (N);
if (N in ['A'..'Z']) or (N in ['a'..'z']) then writeln ('Cимвол ', N, ' - латинского алфавита')
else writeln ('Cимвол ', N, ' - русского алфавита');
end.