• дана вещественная матрица B(m*m). вычислить произведение суммы всех элементов данной и их разность.
    Нужно сделать программу на языке Паскаль через размерность.
    Среда разработки Pascal ABCNET

Ответы 6

  • на 6 строке ошибка. Встречено '(', а ожидался идентификатор
  • Только что проверил - никаких ошибок. Видимо Вам пофигу две первые строки
    • Автор:

      louie5
    • 6 лет назад
    • 0
  • PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018Внимание! Если программа не работает, обновите версию!
    • Автор:

      keith44
    • 6 лет назад
    • 0
  • И Вы засунули текст программы куда попало
    • Автор:

      flake63
    • 6 лет назад
    • 0
  • Вообще, сами бы подумали: как может программа не компилироваться, если приведен пример её работы с результатами?
  • PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018Внимание! Если программа не работает, обновите версию!begin  var m:=ReadInteger('Количество строк/столбцов в матрице:');  Writeln('*** Исходная матрица ***');  var b:=MatrRandom(m,m,-99,99);   b.Println(4); Writeln(4*m*'-');  var (s,s1):=(Sqr(b[0,0]),0);  for var i:=0 to m-1 do    for var j:=0 to m-1 do      if i+j<>0 then s1+=b[i,j];  s-=Sqr(s1);  Writeln('Результат: ',s)end.ПримерКоличество строк/столбцов в матрице: 5*** Исходная матрица ***  48 -33   4 -66  28  91 -46  58  11  92  37 -42   8 -12  39  25  65  91 -30  83 -31 -53  36  28  49--------------------Результат: -184320
    • Автор:

      melendez
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years