19. Составить алгоритм и написать решение задачи на Паскале: Целое число х сгенерировано в диапазоне от 1 до 5. Вывести на экран название соответствующего пальца на руке.

Для PascalABC.net:
begin  var t := Random(1,5);  case t of    1: writeln (Мизинец);    2: writeln (Безымянный);    3: writeln (Средний);    4: writeln (Указательный);    5: writeln (Большой);  end;end.