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

Question

Юлия

4 сентября, 07:42

+2

Ответы (1)

Знаете ответ?

Лавруха · Answer 1

Паскаль:

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.