Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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
writeln(a);
if((b>1) and (b<3)) then
writeln(b);
if((c>1) and (c<3)) then
writeln(c);
end.