1AB (16cc) =1 1010 1011 (2cc) = 110 101 011 (2cc) =653 (8cc)
Ш1А; Ш картинка Кока-Колы.
выбирай
Var
O:integer;
Begin
Write('Введите оценку ученика: ');
ReadLn(O);
Case O of
1:Write('плохо');
2:Write('неудовлетворительно');
3:Write('удовлетворительно');
4:Write('хорошо');
5:Write('отлично');
End;
End.