Ответы
Ответ дал:
1
var a,b,c,min:integer;
begin
readln(a);
min:=a;
readln(b); readln(c); begin
if b < min then min:=b else min:=a;
if c < min then min:=c; end;
writeln(min);
end.
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад