0 / 0 / 0
Регистрация: 21.12.2018
Сообщений: 33
1

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

21.12.2018, 18:21. Показов 1855. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
(Задачу реализовать без использования массивов)
В последовательности целых чисел определить,имеются ли в ней два идущих подряд положительных элемента. Подсчитать количество таких пар.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.12.2018, 18:21
Ответы с готовыми решениями:

Массивы, определить, имеются ли в последовательности два идущих подряд нулевых элемента
Даны натуральное число n, массив целых чисел a(n). имеются ли в последовательности два идущих...

Выяснить, имеются ли в данном массиве два идущих подряд положительных элемента
Помогите решить пожалуйста!!! буду очень благодарна) Дан массив действительных чисел а1,…, аn....

Выяснить, имеются ли в данном массиве два идущих подряд положительных элемента
Дан массив действительных чисел а1,…, аn. Выяснить, имеются ли в данном массиве два идущих подряд...

Выяснить, имеются ли в заданном массиве два идущих подряд положительных элемента
Одномерный массив а1,…, аn. Выяснить, имеются ли в данном массиве два идущих подряд положительных...

3
Почетный модератор
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
21.12.2018, 18:49 2
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var n,i,a,b,k:integer;
begin
repeat
write('Введите количество чисел n>1 n=');
readln(n);
until n>1;
writeln('Введите целые положительные и отрицательные числа');
readln(a);
k:=0;
for i:=2 to n do
 begin
  readln(b);
  if(a>0)and(b>0) then inc(k);
  a:=b;
 end;
if k=0 then write('Пар рядом стоящих положительных чисел нет')
else write('Количество пар рядом стоящих положительных чисел=',k)
end.
1
0 / 0 / 0
Регистрация: 21.12.2018
Сообщений: 33
21.12.2018, 19:01  [ТС] 3
Программа должна считать количество пар положительных чисел. например: в последовательности из чисел 1 2 3 4 5 , будет находится 2 пары положительных чисел. здесь так не получается.
0
Модератор
10068 / 5409 / 3354
Регистрация: 17.08.2012
Сообщений: 16,566
28.12.2018, 08:38 4
Zlob1099, с чего бы это только две пары? Думаете, что это, например, (1, 2), (3, 4) или (1, 2), (4, 5) или (2, 3), (4, 5)? Ошибаетесь. В последовательности чисел 1, 2, 3, 4, 5 имеется 4 пары идущих подряд положительных чисел. Это (1, 2), (2, 3), (3, 4) и (4, 5).

Скорее всего, Вы неверно понимаете условие задачи. Вы, должно быть, имеете ввиду, что нужно подсчитать количество пар подряд идущих положительных чисел, таких, что любое число одной пары чисел не принадлежит любой другой паре чисел? Если так, то Вы заблуждаетесь, поскольку в условии задачи ничего такого не написано.
1
28.12.2018, 08:38
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.12.2018, 08:38
Помогаю со студенческими работами здесь

Определить, имеются ли в последовательности два идущих подряд нулевых члена
Даны целые числа с1, ..., с95. Имеются ли в последовательности с1, ..., с95 два идущих подряд...

Определить, имеются ли в массиве два подряд идущих нулевых элемента
Одномерный массив из 8 элементов. - Заполнить с клавиатуры - Определить, имеются ли в массиве...

Определить, имеются ли в последовательности два / три идущих подряд нулевых члена
Даны целые числа (c1,...,c95). Имеются ли в последовательности (c1,...,c95): а) два идущих подряд...

Определить, имеются ли в данной последовательности два идущих подряд нулевых числа
Ребят...я снова прогу в состояние работающей привести не могу. :-|Половина только пашет...:scratch:...


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

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

Новые блоги и статьи
Как проводить научные вычисления на 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