Есть ответ 👍

Дана матрица 5*7.элементы матрицы целые случайные числа в интервале [-18; +48].вывести матрицу и найти: 1)разность между средним арифметическим положительных элементов матрица и средним арифметическим отрицательных элементов матрицы;

284
339
Посмотреть ответы 2

Ответы на вопрос:


//pascalabc.net 3.2 begin var a: array of array of integer; var n: =readinteger('строк матрицы:   '); var m: =readinteger('столбцов матрицы: '); setlength (a,  n); for var i: =0 to length(a)-1 do a[i]: =arrrandom (m, -18, 48); var sump: =0; var sumo: =0; var kolo: =0; for var i: =0 to n-1 do for var j: =0 to m-1 do if a[i][j]< 0 then begin sumo+=a[i][j]; kolo+=1; end else sump+=a[i][j]; writeln ('разница: ', sump/(m*n-kolo)-sumo/kolo); end.

Відповідь:

program Pr1;

var

 a: array[1..10] of integer;

 i,k,n,s: integer;

 sr: real;

begin

 Randomize;

 k := 0;

 s := 0;

 for i := 1 to 10 do

 begin{формирование массива}

   a[i] := random(41) - 20;

   write(a[i]:5);

   if a[i] > 0 then

   begin

     S := S + A[i];

     n := n + 1;

   end;  

   if abs(a[i]) mod 10 = 7 then

     k := k + 1;

 end;

 writeln;

 WRITELN('Количество элементов на 8: ', k);  

 if n<>0 then

   begin

     SR := S / N;

     WRITELN('Среднее: ', SR);

   end

 else

   writeln('Нет отрицательных чисел.');

end.

Пояснення:

Здається так, давно не писав нічого на цій мові

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS