На языке паскаль составить программу , выводящую на экран наименьшее из трех чисел.программа должна выводить на экран результат в виде: наименьшее из данных трех чисел=значение.

Var a, b, c: real;
begin
     readln(a, b, c);
     if (b < a) then a := b;
     if (c < a) then a := c;
     writeln('Наименьшее из данных трех чисел = ', a);
end.