dimatitov1428dimasik
12.06.2020 11:08

Периметр 420 мм 64 см 460 мм длина 120 мм 19 см 100 мм ширина 90 мм 13 см 130 мм узнай площадь каждого прямоугольника ​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
turivecpolina
09.04.2021 10:29

#include <iostream>

#include <vector>

using namespace std;

void group_multiply(vector<int> &a, int l, int r, int x){

   for(int i = l; i <= r; i++)

       a[i] *= x;

}

signed main(){

   const int n = 10;

   vector<int> a(n);

   int num = 0, max_elem = -INT_MAX;

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

       cin >> a[i];

       if(a[i] > max_elem){

           max_elem = a[i];

           num = i+1;

       }

   }

   group_multiply(a,n-5,n-1,num);

   for(auto &i:a)

       cout << i << " ";

}

0,0(0 оценок)
Ответ:
Анаша2018
27.04.2023 10:57

const

 n=5;

var

 a: array [1..N,1..N]of integer;

 i,j,sum:integer;

begin

 sum:=0;

 for i:=1 to N do

   begin

     for j:=1 to N do

       begin

         a[i,j]:=random(25)-11;

         write(a[i,j]:4);

         if (a[i,j] mod 2 = 1)

           and (a[i,j]>0) then

             sum:=sum+a[i,j];

       end;

     writeln;

   end;

 writeln('Sum: ',sum);

end.

const

 n=5;

var

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

 i,j,k:integer;

begin

 for i:=1 to N do

   begin

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

     write(a[i]:4);

   end;

 writeln;  

 for i := 1 to N-1 do  

   for j := 1 to N-i do  

     if a[j] < a[j+1] then  

       begin

         k := a[j];

         a[j] := a[j+1];

         a[j+1] := k;

       end;

 for i:=1 to N do

   write(a[i]:4);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота