1. аквариум имеет длину 50 см, ширину 40 см. какова высота аквариума, если в него вмещается 80000 куб.см - id371502820210210 от приветик49 10.02.2021 05:44

Question

Информатика: 1. аквариум имеет длину 50 см, ширину 40 см. какова высота аквариума, если в него вмещается 80000 куб.см воды. , .

приветик49 · Accepted Answer

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив ***');
var c:=MatrRandom(3,5,-9,9);
c.Println(4); Writeln(4*c.ColCount*'-');
Writeln('Произведение элементов: ',
      c.ElementsByRow.Aggregate(int64(1),(x,y)->x*y));
Writeln('*** Массив-результат ***');
c.Transform(t->t*t);
for var i:=0 to c.RowCount-1 do c[i,i]:=1;
c.Println(4)
end.

Пример
*** Исходный массив ***
-7 -3   4 -1 -5
   9   1   9   2   4
-3 -3 -1 -4 -8

Произведение элементов: -78382080
*** Массив-результат ***
   1   9 16   1 25
81   1 81   4 16
   9   9   1 16 64

1. аквариум имеет длину 50 см, ширину 40 см. какова высота аквариума, если в него вмещается 80000 куб.см воды. , .

MOGZ ответил