Какое значение будет выведено в поле Edit1? var X, Y, Z : Integer; A : Boolean;
begin
X := 10; Y := 12; Z := 30;
A := (X < Y) аnd (Y < Z) аnd (Z mod Y = 0);
Edit1.Text := BoolToStr(A,False);
end;
begin
X := 10; Y := 12; Z := 30;
A := (X < Y) аnd (Y < Z) аnd (Z mod Y = 0);
Edit1.Text := BoolToStr(A,False);
end;
More Questions From This User See All