Исходные данные - три числа a,b и с . Результату min надо присвоить наименьшего из них.
Исходные данные - три числа a,b и с . Результату min надо присвоить наименьшего из них.
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b,c,min:integer;
begin
readln(a,b,c);
if (a>b) and (a>c) then min:=a;
if (b>a) and (b>c) then min:=b;
if (c>a) and (c>b) then min:=c;
write(min);
end.
Не нашли ответ?
Похожие вопросы