1)
a) (X = Y) И (Y = Z)
б) ((X = Y) И (Y != Z)) ИЛИ ((X = Z) И (Z != Y)) ИЛИ ((Y = Z) И (Z != X))
!= - "не равно"
в) (X > 0) И (Y > 0) И (Z > 0)
г) ((X > 0) И (Y > 0) И (Z < 0)) ИЛИ ((X > 0) И (Y < 0) И (Z > 0)) ИЛИ ((X < 0) И (Y > 0) И (Z > 0))
(X*Y*Z>0) И (X<0 ИЛИ Y<0 ИЛИ Z<0)
д) (X < Y) И (Y < Z)
2)
а) (X = Y) and (Y = Z)
б) ((X = Y) and (Y <> Z)) or ((X = Z) and (Z <> Y)) or ((Y = Z) and (Z <> X))
в) (X > 0) and (Y > 0) and (Z > 0)
г) ((X > 0) and (Y > 0) and (Z < 0)) or ((X > 0) and (Y < 0) and (Z > 0)) or ((X < 0) and (Y > 0) and (Z > 0))
(X*Y*Z > 0) and ((X < 0) or (Y < 0) or (Z < 0))
д) (X < Y) and (Y < Z)
begin
var m:=ReadInteger('число строк ');
var n:=ReadInteger('число столбцов ');
var a:array[,] of real; SetLength(a,m,n);
Randomize;
var p:=1.0;
for var i:=0 to m-1 do begin
for var j:=0 to n-1 do begin
a[i,j]:=89*Random+10;
Write(a[i,j]:0:5,' ');
if j mod 2=0 then p*=a[i,j]
end;
Writeln
end;
Writeln(p)
end.
Тестовое решение:
число строк 4
число столбцов 3
83.48215 49.40392 38.47974
79.95518 85.86098 19.45080
34.86908 65.25898 51.15671
96.59641 24.22868 42.34227
36449203938146.9