Ввести числовое значение учебной оценки. Вывести название этой оценки или сообщение об ошибке

@Alleexandr · Регистрация: 04.12.2020

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

@mr-Crocodile · 23.12.2020, 13:40

Pascal

var m : integer;
begin
  ReadLn(m);
  case m of
    1: WriteLn('Кол');
    2: WriteLn('Неудовлетворительно');
    3: WriteLn('Удовлетворительно');
    4: WriteLn('Хорошо');
    5: WriteLn('Отлично');
 else
   WriteLn('Не знаю такой оценки')
 end;
end.

@Alleexandr 0 / 0 / 0 Регистрация: 04.12.2020 Сообщений: 33
		1
	Ввести числовое значение учебной оценки. Вывести название этой оценки или сообщение об ошибке 23.12.2020, 10:04. Показов 1009. Ответов 1 Метки нет (Все метки) Ввести числовое значение учебной оценки. Вывести название этой оценки или сообщение об ошибке 0

Опции темы