Напишите программу которая определяет значение логического выраже- ния, утверждающего,...

Question

Напишите программу которая определяет значение логического выраже- ния, утверждающего, что хотя-бы одно из введённых с клавиатуры действительных чисел отрицательно. Результат вычисления выводится на экран монитора. Так же нужна блок-схема к данной программе.

Answer 1

var x,y : real;

b:boolean;

begin

b:=False;

read(x,y);

if (x<0) or (y<0) then b:=True;</p>

Writeln(b);

end.

Comments

Блок схему не пишу, ты и сам без труда составишь к этой программе. b не обязательно присваивать False, можно было просто в ветвлении else использовать