Имеются данные о количестве полных лет трех призеров спартакиады. напишите программу, которая выводит возраст самого младшего призера.

Program enot;
Var min,a,b,c: integer;
begin
read(a,b,c);
min:=a;
if b<min then min:=b;
if c< min then min:=c;
write(min);
end.