Задача в Паскале Проверьте, принадлежит ли интервалу (а,b) число с, где а,b,с- любые числа?
Задача в Паскале
Проверьте, принадлежит ли интервалу (а,b) число с, где а,b,с- любые числа?
Гость
Ответ(ы) на вопрос:
Гостьprogram zadacha;
var a,b,c: integer;
begin
writeln ('Введите интервал');
read (a,b);
writeln ('Введите число');
readln (c);
if (c>=a) and (c<=b) then writeln ('Число принадлежит интервалу')
else writeln ('Число не принадлежит интервалу');
end.
Не нашли ответ?
Похожие вопросы