Nekostes
6 год назад
Даны три числа(A,B и C),определите значения наименьшего из них.
ОТВЕТЫ
Bronevskiy
Jun 30, 2019
//прога на Pascal`e
var
a, b, c: real;
begin
readln (a, b, c);
if alt;b then if alt;c then write (a) else write (c)
else if blt;c then write (b) else write (c);
write ( - меньшее);
end.
var
a, b, c: real;
begin
readln (a, b, c);
if alt;b then if alt;c then write (a) else write (c)
else if blt;c then write (b) else write (c);
write ( - меньшее);
end.
79
Смежные вопросы:
