Question

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

Answer 1

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

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