georggeorg
01.06.2022 20:32

Техническая система передачи информации состоит из​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
алинаарсенова
22.12.2022 04:44

using namespace std;

#include <iostream>

#include <clocale>

#include <cstdlib>

#include <iomanip>

#include <string>

#include <ctime>

void massinit(int* mass, int masssizeM, int masssizeN) {

for (int i = 0; i < masssizeM * masssizeN; i++) {

  mass[i] = rand() % 90 + 10;

}

}

void massout(int* mass, int masssizeM, int masssizeN) {

for (int i = 0; i < masssizeM; i++) {

 for (int j = i * masssizeN; j < (i + 1) * masssizeN; j++) {

  cout << setw(3) << mass[j] << " ";

 }

 cout << endl;

}

cout << endl << endl;

}

int twodimcount(int* mass, int masssizeM, int masssizeN) {

 

int returnval = 0;

for (int i = 0; i < masssizeM; i++) {

 int avgvalue = 0;

 for (int j = i * masssizeN; j < (i + 1) * masssizeN; j++) {

  avgvalue += mass[j];

 }

 returnval += avgvalue;

 avgvalue /= masssizeN;

 for (int j = i * masssizeN; j < (i + 1) * masssizeN; j++) {

  mass[j] += avgvalue;

 }

}

 

cout << "Новый массив:" << endl;

massout(mass, masssizeM, masssizeN);

return returnval;

}

int main() {

setlocale(LC_ALL, "rus");

system("chcp 1251");

srand(time(0));

int M = rand() % 8 + 2;

int N = rand() % 8 + 2;

int a = 0;

int* mainmass = new int[M * N];

massinit(mainmass, M, N);

cout << "Изначальный массив:" << endl;

massout(mainmass, M, N);

a = twodimcount(mainmass, M, N);

cout << "Сумма средних значений строк новой матрицы: " << a << endl;

delete[] mainmass;

system("pause");

return 0;

}

0,0(0 оценок)
Ответ:
Valerivaleeva
12.12.2021 19:54
Const
  n=10;
var
  a,b:array[1..n] of integer;
  i,si,smax:integer;
begin
  Writeln('Введите парами длины катетов ',n,' треугольников');
  smax:=0;
  for i:=1 to n do begin
    Read(a[i],b[i]);
    si:=a[i]*b[i]; { пополам разделим потом максимальное }
    if si>smax then smax:=si
    end;
  Writeln('Треугольник(и) с максимальной площадью, равной ',smax/2,':');
  for i:=1 to n do
    if a[i]*b[i]=smax then Writeln('№',i,': ',a[i],'x',b[i]);
  Writeln
end.

Пример работы
Введите парами длины катетов 10 треугольников
7 16 18 10 9 5 15 11 9 19 15 12 11 13 9 20 14 10 12 8
Треугольник(и) с максимальной площадью, равной 90:
№2: 18x10
№6: 15x12
№8: 9x20
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота