Составьте код в Паскале -10 ≤ х ≤ 10 Даю 50 баллов
Answers & Comments
den162Sil
Var x: integer; begin x:=random(-30,30); writeln('x = ', x); if (x>=-10) and (x<=10) then writeln('Значение x принадлежит отрезку [-10,10].') else writeln('x не принадлежит отрезку [-10,10].'); end.
Answers & Comments
x:=random(-30,30);
writeln('x = ', x);
if (x>=-10) and (x<=10) then writeln('Значение x принадлежит отрезку [-10,10].') else writeln('x не принадлежит отрезку [-10,10].');
end.
я не уверен что именно вам нужно