Массив: Вычислить количество нулевых элементов, сумму положительных элементов и среднее значение отрицательных элементов

@MALprogrammist · Регистрация: 19.06.2019

Author24 — интернет-сервис помощи студентам

дан массив A(10). Вычислить количество нулевых элементов, сумму положительных элементов и среднее значение отрицательных элементов массива ,,, задание делать в форме со string grid

@AHBAR · 19.06.2019, 10:27

MALprogrammist,

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
procedure TForm1.Button1Click(Sender: TObject);
VAR
a:array[0..9] of integer;
i,Count0, Count1, s : Integer;
sr : double;
str : String;
begin
randomize;
count0 := 0;
count1 := 0;
s := 0;
sr := 0;
for i := 0 to 9 do begin
    a[i] := Random(21) - 10;
    StringGrid1.Cells[0,i] := IntToStr(a[i]);
    if a[i] = 0 then inc(count0);
    if a[i] > 0 then s := s + a[i];
    if a[i] < 0 then begin sr := sr + a[i]; inc(count1) end;
    end;
str := '';
if count0 = 0 then str := str + 'Нет нулевых элементов' + #13#10 else str := str + 'Нулевых элементов = ' + IntToStr(count0) + #13#10;
if s = 0 then str := str   + 'Нет (+) элементов' + #13#10 else str := str + 'Сумма (+) элементов = ' + IntToStr(s) + #13#10;
if count1 = 0 then str := str + 'Нет (-) элементов' else str := str + 'Среднее значение (-) элементов = ' + FloatToStr(sr/count1);
 
ShowMessage(Str);
end;

@MALprogrammist · 23.06.2019, 20:16 **[ТС]**

Спасибо большое ! Еще Можешь пажалуйсто комментарии написать прошу

@AHBAR · 25.06.2019, 13:59

Сообщение от MALprogrammist

комментарии

актуально?

Новые блоги и статьи Все статьи Все блоги /
Java Micronaut в Docker: контейнеризация с Maven и Jib Javaican 16.03.2025 Когда речь заходит о микросервисной архитектуре на Java, фреймворк Micronaut выделяется среди конкурентов. Он создан с учётом особенностей облачных сред и контейнеров, что делает его идеальным. . .	Управление зависимостями в Java: Сравнение Spring, Guice и Dagger 2 Javaican 16.03.2025 Инъекция зависимостей (Dependency Injection, DI) — один из фундаментальных паттернов проектирования, который радикально меняет подход к созданию гибких и тестируемых Java-приложений. Суть этого. . .	Apache Airflow для оркестрации и автоматизации рабочих процессов Mr. Docker 16.03.2025 Управление сложными рабочими процессами — одна из главных головных болей инженеров данных и DevOps-специалистов. Представьте себе: каждый день нужно запускать десятки скриптов в определенной. . .	Оптимизация приложений Java для ARM Javaican 16.03.2025 ARM-архитектура переживает настоящий бум популярности в технологическом мире. Когда-то воспринимаемая исключительно как решение для мобильных устройств и встраиваемых систем, сегодня она штурмует. . .	Управление состоянием в Vue 3 с Pinia и Composition API Reangularity 16.03.2025 Когда я начал работать с Vue несколько лет назад, мне казалось достаточным использовать простую передачу данных через props и события между компонентами. Однако уже на среднем по сложности проекте. . .
Введение в DevSecOps: основные принципы и инструменты Mr. Docker 16.03.2025 DevSecOps - это подход к разработке программного обеспечения, который объединяет в себе принципы разработки (Dev), безопасности (Sec) и эксплуатации (Ops). Суть подхода заключается в том, чтобы. . .	GitHub Actions vs Jenkins: Сравнение инструментов CI/CD Mr. Docker 16.03.2025 В этой битве за эффективность и скорость выпуска программных продуктов ключевую роль играют специализированные инструменты. Два гиганта в этой области — GitHub Actions и Jenkins — предлагают разные. . .	Реактивное программирование с Kafka Stream и Spring WebFlux Javaican 16.03.2025 Реактивное программирование – это программная парадигма, ориентированная на потоки данных и распространение изменений. Она позволяет выражать статические или динамические потоки данных и. . .	Простая нейросеть на КуМир: Учебное пособие по созданию и обучению нейронных сетей EggHead 16.03.2025 Искусственные нейронные сети — удивительная технология, позволяющая компьютерам имитировать работу человеческого мозга. Если вы хотя бы немного интересуетесь современными технологиями, то наверняка. . .	Исполнитель Кузнечик в КуМир: Решение задач EggHead 16.03.2025 Среди множества исполнителей в системе КуМир особое место занимает Кузнечик — простой, но невероятно полезный виртуальный персонаж, который перемещается по числовой прямой, выполняя ваши команды. На. . .

@MALprogrammist 0 / 0 / 0 Регистрация: 19.06.2019 Сообщений: 9
		1
	Массив: Вычислить количество нулевых элементов, сумму положительных элементов и среднее значение отрицательных элементов 19.06.2019, 07:57. Показов 1351. Ответов 3 Метки нет (Все метки) дан массив A(10). Вычислить количество нулевых элементов, сумму положительных элементов и среднее значение отрицательных элементов массива ,,, задание делать в форме со string grid 0

@MALprogrammist 0 / 0 / 0 Регистрация: 19.06.2019 Сообщений: 9
	23.06.2019, 20:16 [ТС]	3
	Спасибо большое ! Еще Можешь пажалуйсто комментарии написать прошу 0

@AHBAR 1077 / 488 / 316 Регистрация: 05.04.2013 Сообщений: 2,141
	25.06.2019, 13:59	4
	Сообщение от MALprogrammist комментарии актуально? 0

Опции темы