Эта задача на нахождение суммы отриц. элементов Const N=7; К=5; Var a: array [1..N, 1..К] of integer; i, j, y : integer; Begin for i:=1 to N do for j:=1 to K do readln(a[i,j]); у:=0; for i:=1 to N do for j:=1 to K do If (a[i,j]<0) then y:=y+ a[i,j]; writeln (y); End.
Var i,j,s,min,im:integer; a:array[1..7,1..5]of integer; begin for i:=1 to 7 do begin for j:=1 to 5 do begin a[i,j]:=random(-9,9); write(a[i,j]:4); end; writeln; end; writeln('Сумма отрицательных по столбцам:'); for j:=1 to 5 do begin for i:=1 to 7 do if a[i,j]<0 then s:=s+a[i,j]; write(s:4); s:=0; end; min:=a[1,1]; for j:=1 to 5 do begin if (a[1,j]<min) then begin min:=a[1,j]; im:=j; end; end; writeln; writeln('Min=',min,'; (1,',im,')'); end.
1. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); long sum = 0; int a; cout << "Введите a" << endl; cin >> a; if (a > 500) { cout << "а > 500" << endl; } else { sum = (500 * 501 / 2) - ((a - 1) * a ) / 2; cout << sum; } } 2. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); double average = (1 + 1000) / 2.; cout << "Среднее арифметические чисел от 1 до 1000" << average << endl; } 3 #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); int a = 0, b = 0; cout << "Введите границы диапазона" << endl; cin >> a >> b; cout << "Все числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { cout << i << endl; } } else { for (int i = b; i < a; i++) { cout << i << endl; } } cout << "Чётные числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 2 == 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 2 == 0) { cout << i << endl; } } } cout << "Нечётные числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 2 != 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 2 != 0) { cout << i << endl; } } } cout << "Числа, кратные 7:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 7 == 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 7 == 0) { cout << i << endl; } } } } 4. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); int a = 0, sum = 0; cout << "Введите числа" << endl; while (true) { cin >> a; if (a == 0) { break; } sum += a; } cout << "Сумма =" << sum << endl; }
1. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); long sum = 0; int a; cout << "Введите a" << endl; cin >> a; if (a > 500) { cout << "а > 500" << endl; } else { sum = (500 * 501 / 2) - ((a - 1) * a ) / 2; cout << sum; } } 2. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); double average = (1 + 1000) / 2.; cout << "Среднее арифметические чисел от 1 до 1000" << average << endl; } 3 #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); int a = 0, b = 0; cout << "Введите границы диапазона" << endl; cin >> a >> b; cout << "Все числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { cout << i << endl; } } else { for (int i = b; i < a; i++) { cout << i << endl; } } cout << "Чётные числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 2 == 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 2 == 0) { cout << i << endl; } } } cout << "Нечётные числа:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 2 != 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 2 != 0) { cout << i << endl; } } } cout << "Числа, кратные 7:" << endl; if (a <= b) { for (int i = a; i <= b; i++) { if (i % 7 == 0) { cout << i << endl; } } } else { for (int i = b; i < a; i++) { if (i % 7 == 0) { cout << i << endl; } } } } 4. #include <iostream> using namespace std; void main() { //задаём русский язык для консоли setlocale(LC_ALL, "Russian"); int a = 0, sum = 0; cout << "Введите числа" << endl; while (true) { cin >> a; if (a == 0) { break; } sum += a; } cout << "Сумма =" << sum << endl; }
Const
N=7; К=5;
Var a: array [1..N, 1..К] of integer;
i, j, y : integer;
Begin
for i:=1 to N do
for j:=1 to K do readln(a[i,j]);
у:=0;
for i:=1 to N do for j:=1 to K do
If (a[i,j]<0) then
y:=y+ a[i,j];
writeln (y);
End.