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

Помогите решить информатику составить "программу Паскаль"
1.Определить принадлежит ли точка А(х) отрезку [-5;7]

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

Var a,b,c,e: integer;
begin
 writeln(введите интервал);
 read(b,c);
 if (b>c) then begin e:=b; b:=c; c:=e; end;
 writeln(введите число);
 readln(a);
 if ((b<=a) and (c>=a)) then writeln(входит) else writeln(не входит);
end.