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.

Answer 2

какое а б или в

Answer 3

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

Answer 4

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

Answer 5

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

Answer 6

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