составьте программу определяющую является ли введённое число решением неравенства x2-4>0.pasclABC

2

Ответы и объяснения

2014-01-25T15:45:28+00:00
Var x:real;
begin
writeln('введите x');
readln(x);
x:=x*2-4;
if x<0 then
writeln('не является');
else
writeln('является');
end.
2014-01-25T15:46:13+00:00
VAR
   x: Real;
BEGIN
   Read(x);
   
   If (x*x > 4) then Write('Yes')
   Else Write('No');
END.