Вычислить и распечатать сумму первых пяти положительных элементов в массиве - Turbo Pascal

Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.50/8:

@ksu04061992 0 / 0 / 0 Регистрация: 12.12.2011 Сообщений: 27

	Вычислить и распечатать сумму первых пяти положительных элементов в массиве 16.01.2012, 15:32. Показов 1627. Ответов 1 Метки нет (Все метки) В файле задан массив А[15] целых чисел. Вычислить и распечатать сумму первых пяти положительных элементов в этом массиве (считать, что массив содержит не менее пяти положительных значений). Прошу помогите 0

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #3974869

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

16.01.2012, 15:32

Ответы с готовыми решениями:

Вычислить сумму первых пяти положительных элементов
Вычислить сумму первых пяти положительных элементов.

Массив: Вычислить количество положительных элементов и сумму первых пяти элементов.
Дан массив Х из 10 целых чисел. Вычислить количество положительных элементов и сумму первых пяти элементов. Названия тем должны быть...

В массиве D вычислить сумму отрицательных элементов массива, кратных пяти
В массиве D вычислить сумму отрицательных элементов массива, кратных пяти. Если в массиве нет таких элементов, выдать соответствующее...

VIPOS

0 / 0 / 1

Регистрация: 22.12.2012

Сообщений: 5

09.01.2013, 17:58

Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
for i to 15 do begin
if a[i]>0 and kol<6  then begin
summa=summa+a[i];
kol=kol+1;
end;
end;

Добавлено через 19 секунд
сделай чтение из файла..

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

09.01.2013, 17:58

Помогаю со студенческими работами здесь

Вычислить сумму трех первых положительных элементов массива
Дан массив D(n), где n<=10, вещественного типа. Разработайте программу, которая вычисляет сумму трех первых положительных элементов...

В массиве A, содержащем 10 положительных и отрицательных целых чисел, вычислить сумму положительных элементов
2.В массиве A, содержащем 10 положительных и отрицательных целых чисел, вычислить сумму положительных элементов. Элементы массива вводить с...

Сумма первых пяти положительных элементов массива
Нужно считать массив из файла и посчитать сумму первых 5 положительных элементов program Project1; type mass=array of integer; ...

Вычислить и вывести сумму первых положительных элементов нечетных столбцов матрицы
не могу переделать в delphi. написала программу на pascale.помогите пожалуйста. Вывести квадратную матрицу X размером N в виде...

В массиве целых чисел вычислить сумму первых четырех отрицательное элементов
В массиве целых чисел вычислить сумму первых четырех отрицательное элементов Добавлено через 2 часа 7 минут unit Unit1; interface ...

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

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи Все статьи Все блоги /
Шаблоны и протоколы для создания устойчивых микросервисов ArchitectMsa 19.04.2025 Микросервисы — архитектурный подход, разбивающий сложные приложения на небольшие, независимые компоненты. Вместо монолитного гиганта, система превращается в созвездие небольших взаимодействующих. . .	Изменяемые и неизменяемые типы в Python py-thonny 19.04.2025 Python славится своей гибкостью и интуитивной понятностью, а одна из главных его особенностей — это система типов данных. В этом языке все, включая числа, строки, функции и даже классы, является. . .	Интеграция Hangfire с RabbitMQ в проектах C#.NET stackOverflow 18.04.2025 Разработка современных . NET-приложений часто требует выполнения задач "за кулисами". Это может быть отправка email-уведомлений, генерация отчётов, обработка загруженных файлов или синхронизация. . .	Построение эффективных запросов в микросервисной архитектуре: Стратегии и практики ArchitectMsa 18.04.2025 Микросервисная архитектура принесла с собой много преимуществ — возможность независимого масштабирования сервисов, технологическую гибкость и четкое разграничение ответственности. Но как часто бывает. . .	Префабы в Unity: Использование, хранение, управление GameUnited 18.04.2025 Префабы — один из краеугольных элементов разработки игр в Unity, представляющий собой шаблоны объектов, которые можно многократно использовать в различных сценах. Они позволяют создавать составные. . .
RabbitMQ как шина данных в интеграционных решениях на C# (с MassTransit) stackOverflow 18.04.2025 Современный бизнес опирается на множество специализированных программных систем, каждая из которых заточена под решение конкретных задач. CRM управляет отношениями с клиентами, ERP контролирует. . .	Типы в TypeScript run.dev 18.04.2025 TypeScript представляет собой мощное расширение JavaScript, которое добавляет статическую типизацию в этот динамический язык. В JavaScript, где переменная может свободно менять тип в процессе. . .	Погружение в Kafka: Концепции и примеры на C# с ASP.NET Core stackOverflow 18.04.2025 Apache Kafka изменила подход к обработке данных в распределенных системах. Эта платформа потоковой передачи данных выходит далеко за рамки обычной шины сообщений, предлагая мощные возможности,. . .	Коммуникация в реальном времени с SignalR в C# на примере создания чата UnmanagedCoder 17.04.2025 Современный веб стремительно эволюционирует от статичных страниц к динамичным приложениям, где пользователи ожидают мгновенной реакции на свои действия. Представим, что вы отправляете сообщение. . .	Реализация CQRS с MediatR на C# .NET stackOverflow 17.04.2025 Современная разработка программного обеспечения постоянно ищет пути повышения эффективности организации кода. Архитектурные паттерны появляются, эволюционируют, и те, что проявляют свою. . .

Наверх