(i<=j) - номера элементов <span>выше и на главной диагонали
</span>(i+j<=n+1) - номера элементов <span>выше и на побочной диагонали
Ответ: </span><span>4) сумма элементов выше и на главной диагонали, выше и на побочной диагонали</span>
1.44мегобайт
если я не ошибаюсь
Var a, b, x : real;
Begin
Write('Введите а: ');
Readln(a);
Write('Введите b: ');
Readln(b);
X := -b + b * b - 4 * a * b / 2 * a;
Write('x = ', x : 0 : 2);
Readln;
End.