Составьте программу, которая будет определять наименьшее число из трех любых чисел ( в switch, а не pascal)
Answers & Comments
Alekcandra2005
Var a,b,c: integer; begin readln(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.
Answers & Comments
begin
readln(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.