Другие языки программирования и технологии

Помогите пожалуйста! Завтра экзамен не буду допущен без программы (( помогите решить ..

."Дан массив 5 х 5. Заменить на нули элементы тех строк, у которых диагональный элемент равен нулю. "
Ты для начала написал бы на каком языке тебе надо.
АД
Азизбек Джовлиев
12 763
Лучший ответ
Íà Pascal

var
a: array[0..4, 0..4] of byte;
i, j: byte;

Begin
Randomize;
for i:=0 to 4 do
for j:=0 to 4 do
a[i,j]:= (random(3));
j:=0;
for i:=0 to 4 do
begin
if a[i,j] = 0 then
for j:=0 to 4 do a[i,j]:=0;
j:=i;
end;
for i:=0 to 4 do
begin
writeln;
for j:=0 to 4 do
write (a[i,j], ' ');
end;
End.
Sultanchik Saydinov
Sultanchik Saydinov
1 554
#include <iostream>
int main() {
const int n = 5;
int a[ n ][ n ];
//ввод массива
for( int i = 0; i < n; ++i )
for( int j = 0; j < n; ++j )
std ::cin >> a[ i ][ j ];
//вывод массива
for( int i = 0; i < n; ++i ) {
for( int j = 0; j < n; ++j )
std ::cout << a[ i ][ j ] << " ";
std ::cout << std ::endl;
}
//преобразование ( Заменить на нули элементы тех строк, у которых диагональный элемент равен нулю. " )
for( int i = 0; i < n; ++i )
if( 0 == a[ i ][ i ] )
for( int j = 0; j < n; ++j )
a[ i ][ j ] = 0;
//вывод массива
for( int i = 0; i < n; ++i ) {
for( int j = 0; j < n; ++j )
std ::cout << a[ i ][ j ] << " ";
std ::cout << std ::endl;
}
return 0;
}