Дистанционная подготовка: Var S:real; N,M:integer; begin Read(N,M); S:=0; For N:=1 to N*M DO begin Read(M); S:=S+M end; writeln(S); END.
Var S:real; N,M:integer; begin Read(N,M); S:=0; For N:=1 to N*M DO begin Read(M); S:=S+M end; writeln(S); END.
от Родион Пономарев - Вторник 7 Май 2019, 11:05
112363. Сумма элементов матрицы
  SVar
S:real;
N,M:integer;
begin
Read(N,M);
S:=0;
For N:=1 to N*M DO
begin
Read(M);
S:=S+M
end;
writeln(S);
END.