1Составьте пожалуйста программу в PascalABC для определения принадлежит ли введённое число промежуткам [2;5] или [-1;1]
1Составьте пожалуйста программу в PascalABC для определения принадлежит ли
введённое число промежуткам [2;5] или [-1;1]
Гость
Ответ(ы) на вопрос:
Гостьvar a:integer;
begin
read(a);
if ((a>=2) and (a<=5)) or ((a>=-1) and (a<=1)) then writeln('Yes') else writeln('No');
end.
Если число не целое, то вместо integer напиши real
Не нашли ответ?
Похожие вопросы