Регистрация
MARRISABEL
23.11.2021 19:04
Информатика
Есть ответ 👍

У МЕНЯ КР Там ещё продолжение есть но я незнаю как тут много фото сделать!? ‍♀️​

236
383
Посмотреть ответы 2

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

matelskayaelizowz66m
matelskayaelizowz66m
4,4(68 оценок)

ответ:I Don't know

I

Объяснение: You speak Russian?

2345metal6789
2345metal6789
4,8(84 оценок)
Const   m=8;   n=6; var   a: array[1..m,1..n] of integer;   st,t: string;   i,j,k,s: integer; begin   write('k='); read(k);   randomize;   writeln('исходная матрица a[',m,',',n,']');   st: ='';   for i: =1 to m do begin       s: =0;       for j: =1 to n do begin           a[i,j]: =random(15)-5; // [-5; 9]           write(a[i,j]: 3);           s: =s+a[i,j]           end;       writeln;       if s> k then begin           str(i,t);           if st='' then st: =t           else st: =st+','+t           end       end;   if st< > '' then writeln('искомые строки: ',st) end. пример k=15 исходная матрица a[8,6]   3 -5  6  8  0  2   1  1  5  2  0  1   0 -1  1  9  5  8   -1 -2 -3  3 -2 -2   8  7  5  6  5  3   8 -1  7 -3  7  3   3 -5  6 -1  0  4   7  1  9  1  4  6 искомые строки: 3,5,6,8

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