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

Question

Информатика

Дрона

14 августа, 12:30

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

+4

Ответы (1)

Знаете ответ?

Агапит · Answer 1

var

a, b, c:real;

begin

readln (a, b, c) ;

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.