0 / 0 / 0
Регистрация: 26.11.2012
Сообщений: 41

Ввести целочисленный двумерный массив AN×N , вывести его. Определить K – сколько нечётных элементов содержится на диагоналях массива.

26.11.2012, 14:41. Показов 2057. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ввести целочисленный двумерный массив AN×N , вывести его. Определить K – сколько нечётных элементов содержится на диагоналях массива. Далее выяснить координаты максимума среди элементов, расположенных под побочной диагональю и уменьшить этот элемент на K .
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
26.11.2012, 14:41
Ответы с готовыми решениями:

Ввести двумерный массив A(N×N) , вывести его. Найти сумму положительных элементов расположенных в части массива одновременно
Ввести двумерный массив A(N×N) , вывести его. Найти сумму положительных элементов расположенных в части массива одновременно как над...

Ввести целочисленный одномерный массив A, вывести его. Найти K– количество нечётных элементов в этом массиве
Добрый вечер. Помогите решить задачу,с обычным одномерным массивом справился,а со сложным не могу. Ввести целочисленный...

Ввести целочисленный двумерный массив A(NxM), вывести его. Найти сумму положительных угловых элементов
Помогите пожалуйста с задачей: Ввести целочисленный двумерный массив A(NxM), вывести его. Найти сумму положительных угловых элементов....

1
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
26.11.2012, 15:04
Лучший ответ Сообщение было отмечено Tatyana123 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
uses crt;
const nmax=15;
var a:array[1..nmax,1..nmax] of integer;
    n,i,j,imx,jmx:byte;
    k,mx:integer;
begin
randomize;
repeat
write('Размер матрицы до ',nmax,' n=');
read(n);
until n in [1..nmax];
writeln('Исходная матрица:');
k:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(20);
    write(a[i,j]:4);
    if((j=i)or(j=n-i+1))and odd(a[i,j]) then k:=k+1;
   end;
  writeln;
 end;
writeln;
writeln('Количество нечетных элементов на диагоналях матрицы=',k);
mx:=a[1,1];
imx:=1;
jmx:=1;
for i:=1 to n-1 do
for j:=1 to n-i do
if a[i,j]>mx then
 begin
  mx:=a[i,j];
  imx:=i;
  jmx:=j;
 end;
writeln('Максимальный элемент над побочной диагональю=',mx,' его координаты=[',imx,',',jmx,']');
writeln('Уменьшение его на ',k);
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if(i=imx)and(j=jmx) then a[i,j]:=a[i,j]-k;
    write(a[i,j]:4);
   end;
  writeln;
 end;
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
26.11.2012, 15:04
Помогаю со студенческими работами здесь

Ввести двумерный массив ANxM, вывести его. Определить в какой строке больше положительных элементов
Добрый вечер. Помогите с задачей пожалуйста Ввести двумерный массив ANxM, вывести его. Определить в какой строке больше...

Создайте двумерный целочисленный массив А[1..10, 1..7] и найдите сумму всех его элементов, имеющих оба нечетных индекса
Создайте двумерный целочисленный массив А и найдите сумму всех его элементов, имеющих оба нечетных индекса. нужно написать программу как...

Ввести двумерный массив A3 5× . Определить в нём произведение остатков от деления на 4 тех элементов, которые
Нужен код программы и желательно блок-схему

Ввести двумерный массив A 5×3 . Найти суммы индексов строк и столбцов четных элементов массива
помогите пожалуйста с задачей Ввести двумерный массив A 5×3 . Найти суммы индексов строк и столбцов четных элементов массива.

Ввести двумерный массив A3×4 . Определить в нём количество тех элементов, которые при делении на 3 дают остаток 2
Ввести двумерный массив A3×4 . Определить в нём количество тех элементов, которые при делении на 3 дают остаток 2


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
JWT аутентификация в ASP.NET Core
UnmanagedCoder 18.06.2025
Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .
Краткий курс по С#
aaLeXAA 18.06.2025
Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .
50 самых полезных примеров кода Python для частых задач
py-thonny 17.06.2025
Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД
stackOverflow 17.06.2025
Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .
Angular: Вопросы и ответы на собеседовании
Reangularity 15.06.2025
Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .
Архитектура Onion в ASP.NET Core MVC
stackOverflow 15.06.2025
Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .
Unity 4D
GameUnited 13.06.2025
Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .
SSE (Server-Sent Events) в ASP.NET Core и .NET 10
UnmanagedCoder 13.06.2025
Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .
С днём независимости России!
Hrethgir 13.06.2025
Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг.
kumehtar 13.06.2025
Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru