Составить схему алгоритма обработки числовой последовательности в соответствии с указанным заданием. Понимаю задание сложное, но Халявщики мимо, просто набор букв буду отмечать как спам
#include "iostream" #include <Windows.h> using namespace std; int main() { setlocale(LC_ALL, "Russian"); int n,m,index,value; value = 0; int mas[50]; cout << "Введите колличество элементов матрицы: ", cin >> n, cout <<endl; for (int i = 0; i < n; i++){ cout << "Введите " << i << " элемент матрицы: ", cin >> m; mas[i] = m; if (m < 0) { index = i; value = m; } } cout << "Заданная матрица: "; for (int i = 0; i < n; i++){ cout << mas[i] << " "; } cout << endl << "Номер последнего отрицательного числа: " << index << endl; cout << "Значение последнего отрицательного числа: " << value << endl; system("pause"); }
PascalABC.NET 3.3.5, сборка 1669 от 21.05.2018 Внимание! Если программа не работает, обновите версию!
begin Writeln('*** Исходная матрица ***'); var a:=MatrRandom(5,5,-9,9); a.Println(3); Writeln(15*'-'); var s:=a.ElementsByRow.GroupBy(t->t).Select(t->(t.Key,t.Count)) .Where(t->t[1]>1).OrderBy(t->t[0]); var c:=a.ElementsWithIndexes.OrderBy(t->t[0]).ToArray; Writeln('Знач. Кол-во Индексы'); foreach var p in s do begin Write(p[0]:3,p[1]:7,' '); var q:=p[0]; var s1:=c.IndexesOf(t->t[0]=q); foreach var k in s1 do Write('(',c[k][1]+1,',',c[k][2]+1,') '); Writeln end end.
![[100б]в матрице 5x5 определить количество и номера однозначных элементов - pascalabc](/tpl/images/0917/8958/9c9fe.jpg)
#include <Windows.h>
using namespace std;
int main() { setlocale(LC_ALL, "Russian");
int n,m,index,value;
value = 0;
int mas[50];
cout << "Введите колличество элементов матрицы: ", cin >> n, cout <<endl;
for (int i = 0; i < n; i++){
cout << "Введите " << i << " элемент матрицы: ", cin >> m;
mas[i] = m;
if (m < 0) {
index = i;
value = m;
}
}
cout << "Заданная матрица: ";
for (int i = 0; i < n; i++){
cout << mas[i] << " ";
}
cout << endl << "Номер последнего отрицательного числа: " << index << endl;
cout << "Значение последнего отрицательного числа: " << value << endl; system("pause");
}