Var i, j, max, n, m: integer; ar: array[,]of integer; begin readln(n, m); setlength(ar, n, m); for i := 0 to n - 1 do for j := 0 to m - 1 do ar[i, j] := random(0, 100); max := ar[0, 0]; for i := 0 to n - 1 do begin for j := 0 to m - 1 do begin if(ar[i, j] > max) then max := ar[i, j]; end; end; writeln('Максимальный элемент: ', max); for i := 0 to n - 1 do begin for j := 0 to m - 1 do write(ar[i, j]:4, ' '); writeln; end; end.
Исходя из вашего запроса: без отрицания k #include <iostream> using namespace std; int main() { int a,k,s,x; for (k=0; k<20; k++) { s +=((-1)*(k+1)*x^k)/3^k; } cout << s << endl; system("pause"); // или _getch(); return 0; }
с отрицанием k #include <iostream> using namespace std; int main() { int a,k,s,x; for (k=0; k<20; k++) { s +=((-1)*(k+1)*x^k)/3^k; } cout << s << endl; system("pause"); // èëè _getch(); return 0; } и формулируйте вопрос корректнее. в обоих решениях k=0 изначально
Я буду создавать модели объектов и событий в 3 D редакторах