Кто решит, тот молодечик! дана матрица ( массив ) a(n; m). вывести на экран массив a(n; m) и сумму элементов этого массива, находящихся в строке х. размеры массива a(n; m) и номер строки х вводятся с клавиатуры, а элементы гсч
(randomize)

Neznakomka111111 Neznakomka111111    2   09.03.2019 21:10    2

Ответы
dimentor13 dimentor13  24.05.2020 12:25

uses crt;
var a:array [1..99, 1..99] of integer;
i,j,n,m,x,z:integer;
begin
clrscr;
randomize();
z:=0;
writeln('Введите количество строк');
readln(n);
writeln('Введите количество столбцов');
readln(m);
writeln('Введите номер строки');
readln(x);
for i:=1 to n do
for j:=1 to m do
begin
a[i,j]:=random(10);
if x=i then z:=z+a[i,j];
end;
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:2, ' ' );
writeln();
writeln;
end;
writeln('Сумма ',x,' строки=',z);
readln();
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика