Var arr: array[1..4] of real;
n: integer;
sum, op: real;
i: integer;
begin
for i:= 1 to 4 do
arr[i]=i+ 3;
Sum
for i : = 1 to 4 do
sum := sum + arr[i].;
op := 1;
for i:=1 to 4 do
op := op arr[i];
writeln (sum, op);
end.
Что выведется на экране при запуске программы?​

sonia81    3   13.04.2021 12:15    0