Program Graduate;
var age: integer;
institute: string;
school: string;
begin
writeln('Введите возраст: ');
readln(age);
if age > 17 then
begin
writeln('Введите ваш университет: ');
readln(institute);
writeln('Хороший институт');
end
else
begin
writeln('Введите вашу школу: ');
readln(school);
writeln('Хорошая школа');
end;
end.