Юношам 15, 16, 17 лет (дима, саша, сергей). составить программу выбора. в программе паскаль.

Var n:integer;
begin
write('n = ');
readln(n);
case n of
 15: writeln('Дима');
 16: writeln('Саша');
 17: writeln('Сергей');
 else writeln('Нет таких');
 end;
end.

Пример:
n = 17
Сергей