Даны три числа(A,B и C),определите значения наименьшего из них.
//прога на Pascal`e var a, b, c: real; begin readln (a, b, c); if aelse if bwrite (' - меньшее'); end.