Даны три действительных числа. Вывести те из них, которые принадлежат интервалу (1,3).

Question

Даны три действительных числа. Вывести те из них, которые принадлежат интервалу (1,3).

Answer 1

Program z2;
var a,b,c:real;
begin
writeln('Input a, b, c:');
readln(a,b,c);
writeln('Числа, удовлетворяющие условию:');
if((a>1) and (a<3)) then<br>writeln(a);
if((b>1) and (b<3)) then<br>writeln(b);
if((c>1) and (c<3)) then<br>writeln(c);
end.

Comments

спасибо