Если правильно поняла знак инверсии(т.е логическое отрицание) перед скобкой распространяется на скобку (В конъюнкция (т.е логич умножение) инверсия А) и на следующую (А дизъюнкция (т.е логичекое сложение) С),а связывает скобки дизъюнкция! =)
Считается по формуле суммы членов арифметической прогрессии: Sn=((a1+an)/2)*n, то есть ((1+212)/2)*212
const
ns=20;
var a:array[1..ns,1..ns] of integer;
m,n,i,j:byte;
min,sum:integer;
begin
randomize;
readln(m,n);
writeln('Исходная матрица:');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=random(20);
write(a[i,j]:3);
end;
writeln;
end;
writeln('Минимальные элементы столбцов:');
sum:=0;
for j:=1 to n do
begin
min:=a[1,j];
for i:=1 to m do
if a[i,j]<min then
min:=a[i,j];
sum:=sum+min;
writeln(j,' - ',min:2);
end;
writeln('Сумма минимальных элементов: ',sum);
end.
Встречается в цикле с постусловием: <span>repeat ... until
</span><span>Цикл повторяется до тех пор, пока условие записанное после ключевого слова until, будет ложным (не выполняется). Как только это условие выполнится, происходит выход из цикла. Такой цикл выполняется как минимум 1 раз обязательно.</span>