
Никита
5 год назад
Составьте программу, которая определяет,принадлежит ли введенное число x интервалу (10,20) и выводит на экран соответствующее сообщение "Принадлежит" либо "Не принадлежит".
ОТВЕТЫ

Ford Robert
Oct 24, 2020
Program z1;
uses crt;
var x:integer;
begin
writeln('введите число');
readln(x);
if (x=>10) and (x<=20) then writeln('Принадлежит')
else writeln('Не принадлежит');
end.
uses crt;
var x:integer;
begin
writeln('введите число');
readln(x);
if (x=>10) and (x<=20) then writeln('Принадлежит')
else writeln('Не принадлежит');
end.
132