Составьте программу.которая определяет принадлежит ли введенное целое число ИКС интервалу (10.20) и выводит на экран соответствующие сообщение: Принадлежит либо не принадлежит
Составьте программу.которая определяет принадлежит ли введенное целое число ИКС интервалу (10.20) и выводит на экран соответствующие сообщение: Принадлежит либо не принадлежит
Гость
Ответ(ы) на вопрос:
ГостьVar A:integer;
Begin
WriteLn('Введи целое число');
ReadLn(A);
if (A>10)and(A<20) then WriteLn('Принадлежит')
else WriteLn('Не принадлежит20')
End.
Не нашли ответ?
Похожие вопросы