Решите пожалуйста: Даны 3 числа.Найти найменьшее из них.
Решите пожалуйста:
Даны 3 числа.Найти найменьшее из них.
Ответ(ы) на вопрос:
var
a, b, c, min: Integer;
begin
readln(a, b, c);
min:=a;
if b < min then min:=b;
if c < min then min:=c;
writeln(min);
end.
Не нашли ответ?
Похожие вопросы