Составьте программу, которая определяет, принадлежит ли введённое целое число x интервалу (10, 20), и выводит на экран соответствующее сообщение: "Принадлежит" либо "Не принадлежит"
Составьте программу, которая определяет, принадлежит ли введённое целое число x интервалу (10, 20), и выводит на экран соответствующее сообщение: "Принадлежит" либо "Не принадлежит"
Гость
Ответ(ы) на вопрос:
Гостьprogram zadacha;
var
a:integer;
begin
read(a);
if (a>=10)and(a<=20)then
write('Принадлежит')
else
write('Не принадлежит')
end.
Не нашли ответ?
Похожие вопросы