Объяснение:
const n = 7;
var
a: array [1..n] of integer;
begin
var ans := 1;
for var i := 1 to 7 do
read(a[i]);
ans := ans * a[i];
end;
print(a[i]);
writeln();
write(ans);
end.
Во вложении.
Объяснение:
const n = 7;
var
a: array [1..n] of integer;
begin
var ans := 1;
for var i := 1 to 7 do
begin
read(a[i]);
ans := ans * a[i];
end;
for var i := 1 to 7 do
print(a[i]);
writeln();
write(ans);
end.
Во вложении.
Объяснение: