Дано x.выяснить,верно ли,что 0 =x =.если верно,то - вопрос №17347370 от AnnaKor14 10.08.2020 15:33

Question

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

AnnaKor14 · 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