Регистрация
tevzi
25.05.2022 12:13
Информатика
Есть ответ 👍

Двумерные массивы.pascal заполнить случайными значениями матрицу произвольного размера,вывести на экран.найти произведение сумм элементов нечетных столбцов матрицы.

159
194
Посмотреть ответы 2

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

зайнаб2006
зайнаб2006
4,5(66 оценок)
Var     a: array[1..10000,1..10000] of integer;     i,j,n: integer;     s,p: real; begin randomize; p: =1; write('n = '); readln(n); 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; j: =1; repeat s: =0; for i: = 1 to n do       s: =s+a[i,j]; p: =p*s; j: =j+2; until j> n; writeln('p = ',p); end. n = 7   -8    4    4    6  -6  -3    1   -6  -6    8    7    8    8    2   5  -2    5    7  -4    9  -1   0  10    2  -5    9    9    3   2    8    2 -10  -6  -4  -6   -7    3  -4    9    2    4  -3   6    4  -3    0    1    4  -5 p = 4032
бородкин
бородкин
4,4(33 оценок)

#include <iostream>

using namespace std;

int main(){

int k = 0;

while(k < 10){

cout << "привет";}

return o;

}

Популярно: Информатика