Ну мы в школе по этой программе с котом <span>на ярлыке </span>роботали
Var a,b,c:real;
begin
writeln('Введите a,b,c');
readln(a,b,c);
if (a<=3) and (a>=-1) then writeln(a, ' принадлежит промежутку [-1,3]');
if (b<=3) and (b>=-1) then writeln(b, ' принадлежит промежутку [-1,3]');
if (c<=3) and (c>=-1) then writeln(c, ' принадлежит промежутку [-1,3]');
end.
Учиcь гyглить, тебе очень пригодится :)
3. https://goo.gl/FWNEdZ
4. <span>https://goo.gl/NnsXQw</span>
5. https://goo.gl/6pVXu2
1), потому что другие варианты не подходят
Спортивный инвентарь, советские тренажеры - выбери, как больше нравится