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

Question

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

Answer 1

var
a,b,c:real;
begin
readln(a,b,c);
if (a>1) and (a<3) then writeln(a);<br>if (b>1) and (b<3) then writeln(b);<br>if (c>1) and (c<3) then writeln(c);<br>end.