program minim_3;
var a,b,c, min : integer;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
min := a;
if min > b then min := b;
if min > c then min := c;
writeln('min = ', min);
end;
program minim_2;
var a,b,c, min : integer;
begin
write('a=');readln(a);
write('b=');readln(b);
min := a;
if min > b then min := b;
writeln('min = ', min);
end;