Задание
m := A
end;
for i := 1 to 10 do
begin
if A
A
end;
Дан массив, состоящий из целых чисел: А = 6 8 9 10 11 7 6 18 20 12 6.
Определите чему будет равен седьмой \(по порядку\) элемент массива после выполнения фрагмента программы:
m := 1001;
for i := 1 to 10 do
begin
if A
\[i\]
< m thenm := A
\[i\]
;end;
for i := 1 to 10 do
begin
if A
\[i\]
> m thenA
\[i\]
:= m*m;end;