Срочно подсобите с информатикой! Номер 13!!!
Приложения:

Ответы на вопрос
Ответил petyaGavrikov
0
var x,y : real;
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (y<=7*x/6+17/6)and(y<=-2*x+6)and(y>=-0.1*x-3.5)
then writeln('Да')
else writeln('Нет');
end.
Пример:
x = 2
y = -3
Да
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (y<=7*x/6+17/6)and(y<=-2*x+6)and(y>=-0.1*x-3.5)
then writeln('Да')
else writeln('Нет');
end.
Пример:
x = 2
y = -3
Да
Новые вопросы