запишите алгоритм нахождения минимума из трех целых чисел а,б,с.
Answers & Comments
alexooooon
Это самый элементарный алгоритм, я б на вашем месте сам подумал, как сделать это задание. Как по мне, есть 2 пути решения задачи: - через if с подставлением по 1 сравнению (долгий) - через if с подставлением по 2 сравнения (короткий) берем короткий var a,b,c:integer; begin readln(a,b,c); if ((a<c) and (a<b)) then write(a); if ((b<a) and (b<c)) then write(b); if ((c<a) and (c<b)) then write(c); end.
Answers & Comments
Как по мне, есть 2 пути решения задачи:
- через if с подставлением по 1 сравнению (долгий)
- через if с подставлением по 2 сравнения (короткий)
берем короткий
var a,b,c:integer;
begin
readln(a,b,c);
if ((a<c) and (a<b)) then write(a);
if ((b<a) and (b<c)) then write(b);
if ((c<a) and (c<b)) then write(c);
end.