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

Заменить минимальный по модулю положительный элемент нулем

👇
Ответ:
dongrigoriew20
dongrigoriew20
02.07.2020
Заменить минимальный по модулю положительный элемент нулём. Заменить элементы с К1 по K3 на обратный. Из элементоа массива A сформировать массив D того же размера по правилу: первые 10 элеметов I, остальные Di=Ai-i

Для меня проблематично сделать всё это в одной задаче.
По отдельности каждое предложение есть.
Совместить не могу.
1)var a:array [1..10] of integer; i,min,n,z:integer;
begin
repeat
writeln ('Введите размер массива');
readln (n);
until n<=10;
min:=32767;
z:=0;
for i:=1 to n do
begin
writeln ('введите',i,'элемент');
readln (a[i]);
if a[i]>0 then begin
if min>a[i] then begin min:=a[i]; z:=i;
end;
end;
end;
a[z]:=0;
for i:=1 to n do
begin
writeln ('элемент массива n ',i,' = ',a[i]);
end;
readln;
end.

2)var a:array [1..10] of integer; i,k,n:integer;
begin
repeat
writeln ('Введите размер массива n');
readln (n);
until n<=10;
k:=3;
for i:=1 to n do
begin
writeln ('введите',i,'');
readln (a[i]);
end;
for i:=1 to k do
begin
a[i]:=a[i]*-1;
end;
for i:=1 to n do
begin
writeln ('элемент массива n ',i,' = ',a[i]);
end;
readln;
end.

3) var a:array [1..20] of integer;
d:array [1..20] of integer;
i,n:integer;
begin
writeln ('Введите размер массива n');
readln (n);
for i:=1 to n do
begin
writeln ('введите',i,'');
readln (a[i]);
end;
writeln('элементы нового массива');
for i:=1 to n do
begin
if i<=10 then d[i]:=i else d[i]:=a[i]-i;
writeln (d[i],' ');
end;
readln;
end.
4,7(76 оценок)
Открыть все ответы
Ответ:
костров1
костров1
02.07.2020

#include <iostream>

using namespace std;

int main() {

   int n, m;

   cin >> n >> m;

   int a[100][100];

   // чтение

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

       for (int j = 0; j < m; j++) {

           cin >> a[i][j];

       }

   }

   int max = a[0][0], max_i = 0, max_j = 0;

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

       for (int j = 0; j < m; j++) {

           if (a[i][j] > max) {

               max = a[i][j];

               max_i = i;

               max_j = j;

           }

       }

   }

   cout << max_i << " " << max_j;

   return 0;

}

Объяснение:


C ++ Максимум Найдите индексы первого вхождения максимального элемента в двумерном массиве. Входные
4,8(59 оценок)
Ответ:
konstantinseme2
konstantinseme2
02.07.2020

#include <iostream>

#include <vector>

using namespace std;

int main() {int m, n, cx, cy;

 cin >> m >> n;

 vector<int>a;

 a.reserve(m*n);

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

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

     int v;

     cin >> v;

     a.push_back(v);

   }

 }

 int x;

 int value = 0;

 cin >> x;

 for (int k = 0;k < x;++k) {

   cin >> cx >> cy;

   if((a[cy-1 + (cx-1)*cy]) != -100) {

     value += a[cy-1 + (cx-1)*cy];

     a[cy-1 + (cx-1)*cy] = -100;

   }

 }cout << value;

 

}

Объяснение:

4,8(50 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ