Question

A = 1
B = 0
C = 1
print(bool((A or B and not C) or A))

Переписать на паскаль, даю 100 баллов

Answer 1

Ответ:

program t;

var A,B,C:integer;

begin

A := 1;

B := 0;

C := 1;

write((odd(A) or odd(B) and not odd(C)) or odd(A))

end.