Var a,b,c:real; begin writeln('Введите a,b,c'); readln(a,b,c); if (a<=3) and (a>=-1) then writeln(a, ' принадлежит промежутку [-1,3]'); if (b<=3) and (b>=-1) then writeln(b, ' принадлежит промежутку [-1,3]'); if (c<=3) and (c>=-1) then writeln(c, ' принадлежит промежутку [-1,3]'); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
