С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 18.12.2014
Сообщений: 5
1

Для заданного целочисленного массива вычислить среднее из элементов, больших 50

18.12.2014, 15:58. Показов 876. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Для заданного целочисленного массива вычислить среднее из элементов, больших 50. Если таких элементов нет, вывести в компонент вывода строку (Элемент не найден). И надо обязательно использовать компонент memo.

Добавлено через 1 минуту
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
procedure TForm1.Button1Click(Sender: TObject);
var
k,sum:real;
i,a,b:integer;
a:array [1..100] of integer;
begin
 
k:=0;
sum:=0;
for i := 1 to a do
 
begin
if (b>50) then
 
begin
 
k:=k+1;
sum:=sum+b;
end;
end;
 
if (sum=0) then
else
 
end;
 
end.
Все что смог сделать. Не знаю как с memo работь.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
18.12.2014, 15:58
Ответы с готовыми решениями:

Вычислить среднее арифметическое элементов, больших заданного G и лежащих выше главной диагонали
составить графическую схему алгоритма и написать программу с организацией ввода-вывода с ...

Вычислить среднее арифметическое значение элементов целочисленного массива
Задача 1) Вычислить среднее арифметическое значение элементов целочисленного массива A(80). Задача...

Для заданного массива А(4,6) вычислить среднее арифметическое значение положительных элементов каждой строки
Для заданных условий составить процедуру и придумать несколько наборов тестовых данных для отладки....

Вычислить количество элементов массива, больших заданного С
В одномерном массиве, состоящем из N вещественных элементов, вычислить: 1) количество элементов...

0
18.12.2014, 15:58
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.12.2014, 15:58
Помогаю со студенческими работами здесь

Вычислить сумму элементов массива больших заданного числа
Задан массив целых чисел. Вычислить сумму элементов,которые больше заданного числа.

Вычислить произведение элементов массива не равных 54.38 и больших заданного значения
Вычислить произведение и напечатать номера элементов, равных нулю, нервных 54.38 и крупнее a

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

Вычислить сумму элементов массива больших заданного. Очень нужна блок схема
Задан массив целых чисел.Вычислить сумму элементов которые больше заданного числа.


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Как проводить научные вычисления на Python
InfoMaster 15.01.2025
Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .
Создание игры типа Minecraft на PyGame/Python: пошаговое руководство
InfoMaster 15.01.2025
В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .
Как создать свою первую игру в стиле Doom на Unreal Engine
InfoMaster 15.01.2025
Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .
Параллельное программировани­е: основные технологии и принципы
InfoMaster 15.01.2025
Введение в параллельное программирование Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .
Как написать микросервис на C# с Kafka, MediatR, Redis и GitLab CI/CD
InfoMaster 15.01.2025
В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .
Что такое CQRS и как это реализовать на C# с MediatR
InfoMaster 15.01.2025
Концепция CQRS и её роль в современной разработке В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .
Как настроить CI/CD с Azure DevOps
InfoMaster 15.01.2025
CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .
Как настроить CI/CD с помощью Jenkins
InfoMaster 15.01.2025
Введение в CI/ CD и Jenkins В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .
Как написать микросервис на Go/Golang с Kafka, REST и GitHub CI/CD
InfoMaster 14.01.2025
Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
Как написать микросервис с нуля на C# с RabbitMQ, CQRS, Swagger и CI/CD
InfoMaster 14.01.2025
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
Как создать интернет-магазин на PHP и JavaScript
InfoMaster 14.01.2025
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
Как написать Тетрис на Ассемблере
InfoMaster 14.01.2025
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru