В переменную типа char вводится символ с клавиатуры. Программа выдает сообщение о том, какой символ был введен

@savvkoss · Регистрация: 12.12.2014

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

В переменную типа char вводится символ с клавиатуры. Программа выдает сообщение о том, какой символ был введен:
цифра от 0 до 9
лат строчная буква
лат заглавная буква.

@IceCortez · 12.12.2014, 20:17

Pascal

var
  c: char;
  
begin
  read(c);
  if c in ['0'..'9'] then
    writeln('Цифра');
  if c in ['a'..'z'] then
    writeln('Строчная буква');
  if c in ['A'..'Z'] then
    writeln('Заглавная буква');
end.

@Sergey132 · 14.12.2020, 19:25

var
num: integer;
begin
case num of
0..9: writeln('Цифра');
a..z: writeln( 'строчная буква');
A..Z: writeln('заглавная буква');
end;
readln
end.

Есть вариант по проще с использованием case of

@savvkoss 0 / 0 / 0 Регистрация: 12.12.2014 Сообщений: 7
		1
	В переменную типа char вводится символ с клавиатуры. Программа выдает сообщение о том, какой символ был введен 12.12.2014, 18:09. Показов 2702. Ответов 2 Метки нет (Все метки) В переменную типа char вводится символ с клавиатуры. Программа выдает сообщение о том, какой символ был введен: цифра от 0 до 9 лат строчная буква лат заглавная буква. 0

@Sergey132 0 / 0 / 0 Регистрация: 14.12.2020 Сообщений: 1
	14.12.2020, 19:25	3
	var num: integer; begin case num of 0..9: writeln('Цифра'); a..z: writeln( 'строчная буква'); A..Z: writeln('заглавная буква'); end; readln end. Есть вариант по проще с использованием case of 0

Опции темы

В переменную типа char вводится символ с клавиатуры. Программа выдает сообщение о том, какой символ был введен

Решение