Если С - цифра, то вывести "digit', если латинская буква, то 'lat', если русская - вывести "rus"

@Andreynoob · Регистрация: 17.12.2015

Студворк — интернет-сервис помощи студентам

Здравствуйте , помогите с задачей ... Вообще сам ничего не могу сообразить(( . Условие: Дан символ С , изображающий цифру или букву (латинскую или русскую). Если С изображает цифру, то вывести строку "digit', если латинскую букву , то вывести 'lat', если русскую - вывести "rus". Исходные данные С='n' . Пример верного решения: 'lat'.

@Puporev · 09.01.2016, 08:42

Pascal

var c:char;
begin
repeat
write('Введите цифру или русскую или латинскую букву c=');
readln(c);
until c in ['0'..'9','A'..'Z','a'..'z','А'..'я','Ё','ё'];
case c of
'0'..'9':write('digit');
'A'..'Z','a'..'z':write('lat');
'А'..'я','Ё','ё':write('rus');
end;
end.

@Andreynoob 0 / 0 / 0 Регистрация: 17.12.2015 Сообщений: 31
		1
	Если С - цифра, то вывести "digit', если латинская буква, то 'lat', если русская - вывести "rus" 09.01.2016, 00:06. Показов 2299. Ответов 1 Метки нет (Все метки) Здравствуйте , помогите с задачей ... Вообще сам ничего не могу сообразить(( . Условие: Дан символ С , изображающий цифру или букву (латинскую или русскую). Если С изображает цифру, то вывести строку "digit', если латинскую букву , то вывести 'lat', если русскую - вывести "rus". Исходные данные С='n' . Пример верного решения: 'lat'. 0

Опции темы

Если С - цифра, то вывести "digit', если латинская буква, то 'lat', если русская - вывести "rus"

Решение