ganul
?>

ЭТО ПО ИНФОРМАТИКЕ, НУЖНО СОСТАВИТЬ ПРАГРАММУ В Python.ТУТ 3 ЗАДАЧИ.​

Информатика

Ответы

Лилит_Шутова
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите её версию!

begin
  var b:=MatrRandom(4,4,-5,5); b.Println(3);
  var p:=1;
  var s:=0;
  Write('Элементы главной диагонали: ');
  for var i:=0 to 3 do
    for var j:=0 to 3 do
      if i<j then p*=b[i,j]
      else
        if i>j then s+=b[i,j]
        else Write(b[i,j]:3);
  Writeln(Newline,'П=',p,', S=',s)
end.

Пример
 -2 -1 -2  4
  0  1  1 -3
  0  1  5  5
  3  4  3  2
Элементы главной диагонали:  -2  1  5  2
П=-120, S=11

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

ЭТО ПО ИНФОРМАТИКЕ, НУЖНО СОСТАВИТЬ ПРАГРАММУ В Python.ТУТ 3 ЗАДАЧИ.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Olga Arutyunyan
arturo95
siren89
oskar-pn
Ilin1022
Никита227
oafanasiev41
Олегович Паутова
aananasAnastiya1270
rayman777
npprang21
muziumednogorsk
grebish2002
alekseysokolov29816
schernov