3. Вывести значение true, если приведенное высказывание для предложенных исходных данных...

Question

3. Вывести значение true, если приведенное высказывание для предложенных исходных данных является истинным, и значение false в противном случае (все числа, для которых не указано иное, являются действительными):
А)данное число x не принадлежит интервалу (a, b);
Б)данное целое число x является нечетным;
В)данное число x является корнем уравнения: ax2+bx+c=0;
СОСТАВЬТЕ ПРОГРАММКИ В ПАСКАЛЕ

Answer 1

Uses crt;
var a,b,c,d,x,r,r1:integer;
begin
readln(a,b,c,x);
if ((x > a) and (x < b)) then
writeln('true') else writeln('false');
if (x mod 2=1) then
writeln('true') else writeln('false');
d:=sqrt(sqr(b)-4*a*c);
r:=(-b+d)/(2*a);
r1:=(-b-d)/(2*a);
if ((x = r) or (x = r1)) then
writeln('true') else writeln('false');
end.

Comments

а?

---

что?

---

какое а б или в

---

для интервала (a, b) и ax2+bx+c=0...

---

для всех трех это, если нужно, раздели ее на части потом

---

пж напиши отдельно( в )

---

спасибо я поняла о чем ты. не нужно