program gdgtdh; var a, b, c, min: real; begin writeln('Введите первое число:'); readln(a); writeln('Введите второе число:'); readln(b); writeln('Введите третье число:'); readln(c); min := a; if b < min then min := b; if c < min then min := c; writeln('Наименьшее число:', min:0:2); end.