В ЭВМ поступают результаты соревнований по плаванию для трёх спортсменов. Составьте программу, которая выбирает лучший результат и выводит его на экранс сообщением, что это результат победителя заплыва. Помогите пожалуйста решить задачу через If.
program sorevnovaniya; var a,b,c: integer; begin writeln ('Введите результаты соревнований'); readln (a,b,c); if (a<b) and (c<b) then writeln (b, '-', 'результат',' ','победителя',' ', 'заплыва'); if (b<c) and (a<c) then writeln (c, '-', 'результат',' ','победителя',' ', 'заплыва'); if (b<a) and (c<a) then writeln (a, '-', 'результат',' ','победителя',' ', 'заплыва'); end.