Дано x.выяснить,верно ли,что 0 =x =.если верно,то - вопрос №17347370 от deinefoxep08rm5 14.12.2020 00:48

Question

Информатика: Дано x.выяснить,верно ли,что 0 =x =.если верно,то должно быть выведено число 1,в противном случае-0

deinefoxep08rm5 · Answer

Паскаль:uses crt;const m = 1;var x : real;begin read(x); if (x = 0) and (x = m) then writeln(1) else writeln(0); readkey; end....

Дано x.выяснить,верно ли,что 0< =x< =.если верно,то должно быть выведено число 1,в противном случае-0