Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15

Найти сумму элементов в тех столбцах, которые содержат хотя бы один отрицательный элемент

10.02.2011, 12:18. Показов 1393. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привет помогите с одном и двумерн массивами ?? в делфи в оконном виде?( извините не понимаю в массивах помогите плиз)

Одномерные массивы
В одномерном массиве, состоящем из п вещественных элементов, вычислить
- номер минимального элемента массива;
- сумму элементов массива, расположенных между первым и вторым отрицательными элементами.
Преобразовать массив таким образом, чтобы сначала располагались все элементы, модуль которых не превышает единицу, а потом — все остальные.

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

Народ помогите??
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
10.02.2011, 12:18
Ответы с готовыми решениями:

Найти сумму элементов в тех столбцах, которые содержат хотя бы один отрицательный элемент
Добрый вечер! Очень прошу помочь, т.к. сама не в состоянии написать программу.Задание такое: характеристикой столбца целочисленной...

Найти сумму элементов в тех строках, которые содержат хотя бы один отрицательный элемент
Саму матрицу как-то смог создать, но.. Нужно найти сумму элементов в тех строках, которые содержат хотя бы один отрицательный элемент. Как...

Найти суммы элементов в тех строках, которые содержат хотя бы один отрицательный элемент
Создать программу по обработке матрицы 8*10 целых чисел. Матрицу заполнить случайными числами в диапазоне -9 .. 9. Найти суммы элементов...

8
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15
11.02.2011, 12:44  [ТС]
Народ помогите...
0
 Аватар для Тамила
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
11.02.2011, 12:46
имеет значение какие компоненты использовать?
0
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15
11.02.2011, 13:05  [ТС]
неа! смотря конешне какие стандарные нужно мемо едиты и тд
0
 Аватар для Тамила
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
11.02.2011, 13:31
Delphi
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
procedure TForm1.Button1Click(Sender: TObject);
var
   a:array[1..100]of real;
   i,n,nm,p1,p2:integer;
   sum,min:real;
begin
    randomize;
    Memo1.Clear;
    n:=StrToInt(Edit1.Text);
    for i:=1 to n do
    a[i]:=(random(100)-50)*0.1;
    for i:=1 to n do
    Memo1.Lines.Add(FloatToStr(a[i]));
    min:=a[1];
    nm:=1;
    sum:=0;
    for i:=2 to n do
    if a[i]<min then
     begin
        min:=a[i];
        nm:=i;
     end;
    for i:=n downto 1 do
    if a[i]<0 then p1:=i;
 
    for i:=n downto p1+1 do
    if a[i]<0 then p2:=i;
 
    for i:=p1 to p2 do
    sum:=sum+a[i];
    
    Label2.Caption:=FloatToStr(sum);
 
    Label1.Caption:='Минимальный элемент='+FloatToStr(min)+' под номером '+IntToStr(nm);
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  memo1.Clear;
end;
0
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15
11.02.2011, 13:44  [ТС]
извини это про одномерный массив да?
0
11.02.2011, 13:45

Не по теме:

да, это первое задание

1
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15
12.02.2011, 13:49  [ТС]
помоги с двумерными массивами:???

Добавлено через 7 часов 22 минуты
Двумерные массивы
Характеристикой столбца целочисленной матрицы назовем сумму модулей его отрицательных нечетных элементов. Переставляя столбцы заданной матрицы, расположить их в соответствии с ростом характеристик.
Найти сумму элементов в тех столбцах, которые содержат хотя бы один отрицательный элемент.


Помогите с двумерными массивами???

Добавлено через 16 часов 21 минуту
Народ помогите с двумерным массивам!!!!
0
0 / 0 / 0
Регистрация: 08.02.2011
Сообщений: 15
13.02.2011, 15:18  [ТС]
Нужна помощь с двумерным массивам!!!!????
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.02.2011, 15:18
Помогаю со студенческими работами здесь

Определить сумму элементов в тех столбцах матрицы, которые не содержат отрицательных элементов
Дана целочисленная квадратная матрица. Определить: 1.Сумму элементов в тех столбцах, которые не содержат отрицательных элементов. ...

Определить сумму элементов в тех строках матрицы, которые не содержат отрицательных элементов
Дана целочисленная квадратная матрица. Определить: 1)сумму элементов в тех строках, которые не содержат отрицательных элементов; ...

Как найти произведение элементов в тех строках, которые не содержат отрицательные элементы
Дана целочисленная квадратная матрица. Определить произведение элементов в тех строках, которые не содержат отрицательных элементов...

Количество строк массива, в которых присутствует хотя бы один отрицательный элемент
пожалуйста эту программу помогите сделать в Delphi 7 Добавлено через 39 секунд 123 (Перемещено из Turbo Pascal)

Найти сумму элементов в тех столбцах,которые содержат хотя бы один отрицательный элемент
Характеристикой столбца целочисленной матрицы назовём сумму модулей его отрицательных нечётных элементов.Переставляя столбцы заданной...


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

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru