Предмет: Информатика,
автор: omlekbird1997
В двумерном целочисленном массиве положительные элементы заменить их квадратами
Ответы
Автор ответа:
0
#include <iostream>
using namespace std;
int main() {
int n, m;
cin >> n >> m;
int a[n][m];
for(int i = 0; i < n; i++)
for(int j = 0; j < m; j++) {
cin >> a[i][j];
if(a[i][j] > 0) a[i][j]*=a[i[j];
}
for(int i = 0; i < n; i++) {
for(int j = 0; j < m; j++)
cout << a[i][j] << " ";
cout << endl;
}
}
using namespace std;
int main() {
int n, m;
cin >> n >> m;
int a[n][m];
for(int i = 0; i < n; i++)
for(int j = 0; j < m; j++) {
cin >> a[i][j];
if(a[i][j] > 0) a[i][j]*=a[i[j];
}
for(int i = 0; i < n; i++) {
for(int j = 0; j < m; j++)
cout << a[i][j] << " ";
cout << endl;
}
}
Автор ответа:
0
Const
N = 3;
Var
A:Array[1..N,1..N] of integer;
i,j:integer;
Begin
Randomize;
WriteLn('Исходный массив:');
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
A[i,j]:=random(21)-10;
Write(A[i,j]:3,' ')
End;
WriteLn
End;
WriteLn;
WriteLn('Переработанный массив:');
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
if A[i,j]>0 then A[i,j]:=A[i,j]*A[i,j];
Write(A[i,j]:3,' ');
End;
WriteLn
End;
End.
N = 3;
Var
A:Array[1..N,1..N] of integer;
i,j:integer;
Begin
Randomize;
WriteLn('Исходный массив:');
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
A[i,j]:=random(21)-10;
Write(A[i,j]:3,' ')
End;
WriteLn
End;
WriteLn;
WriteLn('Переработанный массив:');
For i:= 1 to N do
Begin
For j:= 1 to N do
Begin
if A[i,j]>0 then A[i,j]:=A[i,j]*A[i,j];
Write(A[i,j]:3,' ');
End;
WriteLn
End;
End.
Похожие вопросы
Предмет: Физика,
автор: Аноним
Предмет: Қазақ тiлi,
автор: 345359
Предмет: Английский язык,
автор: alinamartemyanova09
Предмет: Химия,
автор: Kirill121212
Предмет: Литература,
автор: roman5551337mazika