Неозаглавленный
123456789101112131415161718
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.
Pascal
INFO