Даны три вещественных числа. Вывести на экран те их их, которые

program square_cube; // с циклом for
var a,b,c: real;
begin
writeln(Введите три вещественные числа через пробел );
readln(a, b, c);
writeln(В интервал (1,6 - 3,8) попадают числа);
if (a gt; 1.6) and (a lt; 3.8) then writeln(a);
if (b gt; 1.6) and (b lt; 3.8) then writeln(b);
if (c gt; 1.6) and (c lt; 3.8) then writeln(c);
writeln(---);
end.