var
a,b,c,n: integer;
begin
writeln('Сколько всего актеров в театре?');
readln(n);
writeln('Сколько есть высоких среди актеров?');
readln(a);
writeln('Сколько есть голубоглазых среди актеров?');
readln(b);
writeln('Сколько есть актеров блондинов?');
readln(c);
if a < b then
if a < c then writeln('Максимальное количество высоких голубоглазых блондинов: ',a)
else writeln('Максимальное количество высоких голубоглазых блондинов: ',c)
else if b < c then writeln('Максимальное количество высоких голубоглазых блондинов: ',b)
else writeln('Максимальное количество высоких голубоглазых блондинов: ',c);
end.