На­пи­сать программу (можно в "блокноте"), при вы­пол­не­нии ко­то­рой с кла­ви­а­ту­ры...

Question

На­пи­сать программу (можно в "блокноте"), при вы­пол­не­нии ко­то­рой с кла­ви­а­ту­ры счи­ты­ва­ет­ся ко­ор­ди­на­та точки на пря­мой (х — дей­стви­тель­ное число) и опре­де­ля­ет­ся при­над­леж­ность этой точки од­но­му из вы­де­лен­ных от­рез­ков, включая границы (см. прикреплённый файл).

---

Comments

На каком языке програмирования?

---

Pascal ABC

Answer 1

Var x:real;
begin
readln(x);
if (x>=-7)and(x<=-5) then writeln('B')<br> else if (x>=-1)and(x<=1) then writeln('D')<br>  else if (x>=5)and(x<=7) then writeln('F');<br>end.

Пример:
6
F