Обчислити значення логічних виразів:
var X, Y, Z: Integer; A: Boolean;
begin
X := 1;   Y := 2;   Z := 3;
A1 := (X < Y) and (Y < Z); 
A2 := (X > Y) or (Y > Z); 
A3 := (X > Y) xor (Y < Z); 



СРОЧНО!! ДАМ 50 БАЛОВ, НУЖНО В ТЕЧЕНИИ 20 МИНУТ

Ответы

Ответ дал: p15
0

Ответ:

True False True

Объяснение:

var X, Y, Z: Integer; A1,A2,A3: Boolean;

begin

X := 1;   Y := 2;   Z := 3;

A1 := (X < Y) and (Y < Z);

A2 := (X > Y) or (Y > Z);

A3 := (X > Y) xor (Y < Z);

PRINT (A1, A2, A3)

end.

ЗАПУСКАЕШЬ И НАСЛАЖДАЕШЬСЯ (ИСПРАВЛЕНЫ ОШИБКИ И СДЕЛАН ВЫВОД)

а ВРУЧНУЮ  - True and True=True

False или False=False

False исключающее или True=True

Вас заинтересует