М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Sofia2406
Sofia2406
03.05.2022 08:00 •  Информатика

Дана действительная матрица размера m×n. определить числа равные значениям средних арифметических элементов строк.

👇
Ответ:
Const
   M = 3;
   N = 4;
Var
   A:array[1..M,1..N] of real;
   i,j:integer;
   S:real;
Begin
Randomize;
For i:= 1 to M do
    Begin
    S:=0;
    For j:= 1 to N do
        Begin
        A[i,j]:=random*13;
        Write(A[i,j]:6:3,' ');
        S:=S+A[i,j];
        End;
    WriteLn('  Sr = ',S/N:0:3);
    End;
End.
4,4(43 оценок)
Открыть все ответы
Ответ:
fgdfc1
fgdfc1
03.05.2022

Информационная модель — модель объекта, представленная в виде информации, описывающей существенные для данного рассмотрения параметры и переменные величины объекта, связи между ними, входы и выходы объекта и позволяющая путём подачи на модель информации об изменениях входных величин моделировать возможные состояния объекта.

Информационная модель (в широком, общенаучном смысле) — совокупность информации, характеризующая существенные свойства и состояния объекта, процесса, явления, а также взаимосвязь с внешним миром.

4,6(98 оценок)
Ответ:
annetalovecamar
annetalovecamar
03.05.2022
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var n:=ReadInteger('Количество элементов в массиве: ');
  var a:=ArrRandom(n,-50,50);
  a.Println(',');
  Writeln('Четные элементы: ');
  var i:=1;
  while i<n do begin Write(a[i],' '); Inc(i,2) end;
  Writeln;
  Writeln('Нечетные элементы: ');
  i:=0;
  while i<n-1 do begin Write(a[i],' '); Inc(i,2) end;
  Writeln
end.

Тестовое решение:
Количество элементов в массиве:  10
15,-18,-29,-25,46,21,-8,-17,-9,15
Четные элементы:
-18 -25 21 -17 15
Нечетные элементы:
15 -29 46 -8 -9
4,8(11 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ