Составить программу. : на компьютер поступают результаты соревнований по плаванию для трех спортсменов. составить программу так, чтобы пк сам выбирал лучший результат. буду !

Var
a, b, c, min: longint;
begin
readln(a, b, c);
min:=a;
if b < min then min:=b;
if c < min then min:=c;
writeln(min);
readln;
end.