3найти количество отрицательных элементов каждого столбца матрицы х(5, 6 результат записать в вектор к(6).

Const n=5; m=6;
var x:array[1..n,1..m] of integer;
 k:array[1..m] of integer;
    i,j,k0:integer;
begin
Randomize;
For i:=1 to n do begin
  for j:=1 to m do begin
    x[i,j]:=Random(20)-10;
    write(x[i,j]:4);
  end;
  writeln;
end;
for j:=1 to m do begin
  k0:=0;
  for i:=1 to n do if x[i,j]<0 then k0:=k0+1;
  k[j]:=k0;
end;
writeln('Количество отрицательных элементов в столбцах:');
for j:=1 to m do write(k[j]:4);
writeln;
end.

#include <iostream>

using namespace std;

int main()

{

setlocale (LC_ALL, "RUS");

int i,j,N,M,S,a[20][20];

int *A;

cout<<"Введите количество строк,N=";  

cin>>N;

cout<<"Введите количество столбцов,M=";  

cin>>M;

A=new int [N*M];

cout<<"Составьте матрицу А\n";

//цикл по переменной i,в которой перебираем строки

for (i=0; i<N; i++)

//цикл по переменной j, в котором перебираем элементы внутри строки

for (j=0; j<M; j++)

cin>>a[i][j]; //ввод элемента матрицы

cout<<"матрица А:\n";

for (i=0; i<N; i++)

{

for (j=0; j<M; j++)

cout<<a[i][j]<<"\t"; //вывод элемента матрицы

cout<<endl; //переход на новую строку

}

for (S=i=0; i<N; i++)

for (j=0; j<M; j++)

S+=a[i][j];

cout<<"сумма равна,S="<<S<<endl;

system("pause");

return 0;

}

ответ: См. снимок экрана (код в объяснении).

PS. Если хочешь, чтобы можно было вводить десятичные дроби, поменяй в определениях переменных a, b и c   'int' на 'float'.

Объяснение:

from math import sqrt

a = int(input("Введите a: "))

b = int(input("Введите b: "))

c = int(input("Введите c: "))

D = b**2 - (4 * a * c)

if D < 0:

   print("Нет корней (D < 0)")

elif D == 0:

   x = (-b) / (2 * a)

   print('x =', x)

else:

   x1 = (-b - sqrt(D)) / (2 * a)

   x2 = (-b + sqrt(D)) / (2 * a)

   print('x1 =', x1)

   print('x2 =', x2)