// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
const
КолСтрок=3;
КолСтолбцов=5;
begin
var Массив: array [1..КолСтрок,1..КолСтолбцов] of integer;
var СуммыПоСтрокам: array[1..КолСтолбцов] of integer;
Writeln('Введите элементы массива (',КолСтрок,',',
КолСтолбцов,') построчно:');
for var строка:=1 to КолСтрок do
for var столбец:=1 to КолСтолбцов do begin
Read(Массив[строка,столбец]);
СуммыПоСтрокам[строка]+=Массив[строка,столбец]
end;
Writeln('Суммы построчно:');
for var строка:=1 to КолСтрок do Print(СуммыПоСтрокам[строка])
end.
<u><em>Тестовое решение</em></u>
Введите элементы массива (3,5) построчно:
7 -5 13 19 -11
8 23 -15 -6 0
12 -6 -9 0 12
Суммы построчно:
23 10 9
#include <iostream>#include <conio.h>
using namespace std;
int main(){setlocale(LC_ALL,"Russian"); cout << "Эта программа будет создавать массив и выводить каждый нечётный элемент." << endl; int si_ze,massiv[200]; cin >> si_ze; for (int i = 0; i < si_ze;i++){ cin >> massiv[i]; } for (int i = 0;i < si_ze;i++){ if (massiv[i]%2 == 1) cout << i << ' '; }
return 0;}
Так,це можливо,ця функцiя е у кожнiй поштовiй скринцi