Задать двумерный массив (6 6) случайными значениями от 15 до 20 включительно.вывести сумму значений элементов каждой строки матрицы

296

369

Посмотреть ответы 3

Ответы на вопрос:

irko00

Информатика

4,7(57 оценок)

Var a: array[1..100,1..100]of integer; i,j,s: integer; begin clrscr; s: =0; randomize; for i: =1 to 6 do for j: =1 to 6 do a[i,j]: =random(6)+15; s: =s+a[i,j]; end; end; writeln(s); readkey; end.

Anonim2118

Информатика

4,8(30 оценок)

Program gt; var a: array[1..100,1..100]of integer; i,j,s: integer; begin randomize; for i: =1 to 6 do for j: =1 to 6 do a[i,j]: =random(6)+15; for i: =1 to 6 do begin s: =0; for j: =1 to 6 do s: =s+a[i,j]; writeln(s); end; end.