Напишите программу которая вычисляет значения логической функции z=x&y для все возможных значении аргументов x,y.
Input x ,y z = x and y print z
Function F(a,b:boolean): boolean; begin F := a and b; end; var a,b: boolean; begin for a := false to true do for b := false to true do writeln('z(', a, ',', b, ')=', F(a,b)); end.