Как в паскале задать программу, которая из трёх чисел выберет наименьшее. Плис помогите приведите пример(числа любые). Заранее благодарен
Ответы
Ответ дал:
0
var a,b,c:integer;
begin
read(a,b,c);
if (a<b) and (a<c) then
writeln(a);
if (b<a) and (b<c) then
writeln(b);
if (c<a) and (c<b) then
writeln(c);
end.
begin
read(a,b,c);
if (a<b) and (a<c) then
writeln(a);
if (b<a) and (b<c) then
writeln(b);
if (c<a) and (c<b) then
writeln(c);
end.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад
10 лет назад