Есть ответ 👍

Дано число k (0 < k < 11) и матрица размера 4 x 10. найти сумму и произведение элементов k-го столбца данной матрицы. , нужно написать программу в паскале

198
338
Посмотреть ответы 2

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

katy3105
4,8(63 оценок)

Var j,i,k,sum,proizv: integer; a: array [1..4,1..10] of integer; begin proizv: =1; randomize; writeln('матрица: '); for i: =1 to 4 do   for j: =1 to 10 do   a[i,j]: =random(21)-10; for i: =1 to 4 do   begin   for j: =1 to 10 do   write(a[i,j]: 5);     writeln;   writeln;   end; writeln('введите к: '); read(k); for i: =1 to 4 do   begin   sum: =sum+a[i,k];   proizv: =proizv*a[i,k];   end; writeln('cумма чисел ',k,'-ого столбца: ',sum); writeln('произведение чисел ',k,'-ого столбца: ',proizv);   end.

линейный

жили-были дед да баба.

была у них курочка ряба.

снесла курочка яичко, не простое, золотое.

дед бил, бил – не разбил.

баба била, била – не разбила.

мышка бежала, хвостиком махнула.

яичко упало и разбилось.

дед и баба плачут.

курочка кудахчет.

с ветвлением

«гуси-лебеди»

начало

девочка просит печку .

если съешь моего пирожка,

то ,

иначе не

конец

любишь кататься, люби и саночки возить

начало

если любишь кататься,

то люби и саночки возить

конец

циклический алгоритм

«собирай по ягодке, наберешь кузовок»

сказка о рыбаке и рыбке:

- раз старик закинул невод, пришел невод с одною тиной  

второй раз старик закинул .

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