По решению сформулировать условие задачи

Var X:2 ... 5;

Begin

WriteLn ('Введите оценку: ') ;

ReadLn (X) ;

Case Х Of

2: Write ('неудовлетворительно') ;

3: Write ('удовлетворительно') ;

4: Write ('хорошо') ;

5: Write ('отлично')

end;

End.

Question

Феофил

6 февраля, 13:02

+1

Ответы (1)

Знаете ответ на вопрос?

Флена · Answer 1

Дано число Х в интервале от 2 до 5. Нужно написать программу (с помощью оператора case), которая при вводе числа Х выдавала информацию об оценке.