ответ = 12
Объяснение:
const
a: array[1..5] of double = (2, -2, 3, 0.25, -4);
var
dob : Double;
i : integer;
begin
dob := 1;
for i:=1 to 5 do
dob := dob * a[i];
writeln(dob);
end;
ответ = 12
Объяснение:
const
a: array[1..5] of double = (2, -2, 3, 0.25, -4);
var
dob : Double;
i : integer;
begin
dob := 1;
for i:=1 to 5 do
dob := dob * a[i];
writeln(dob);
end;