С Новым годом! Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/8: Рейтинг темы: голосов - 8, средняя оценка - 5.00
1 / 1 / 1
Регистрация: 30.10.2012
Сообщений: 10
1

Последовательность чисел. Подсчет количества положительных и отрицательных элементов.

23.11.2012, 12:01. Показов 1530. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
вводится последовательность ненулевых чисел 0-конец .последовательности . подчитать сколько в нем положительных и отрицательных чисел. в паскале
0
Лучшие ответы (1)
Programming
Эксперт
9485 / 562 / 19
Регистрация: 12.04.2006
Сообщений: 11,671
Блог
23.11.2012, 12:01
Ответы с готовыми решениями:

Подсчет количества отрицательных элементов одномерного массива вещественных чисел
вот мой вариант но что-то не работает помогите плиз program zadacha4; uses crt; type ...

Подсчет количества положительных и отрицательных чисел
Мне очень нужна помощь в создании bat-файла Задание: разработать командный файл для...

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

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

2
Фрилансер
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,603
Записей в блоге: 1
23.11.2012, 12:07 2
Лучший ответ Сообщение было отмечено Eikon как решение

Решение

Pascal
1
2
3
4
5
6
Repeat
  write('Введите число(конец ввода 0): ');
  readln(n);
  if n>0 then inc(k1)
   else if n<0 then inc(k2);
Until n=0;
0
1 / 1 / 1
Регистрация: 30.10.2012
Сообщений: 10
28.11.2012, 21:09  [ТС] 3
можешь полностью записать
0
28.11.2012, 21:09
cpp_developer
Эксперт
20123 / 5690 / 417
Регистрация: 09.04.2010
Сообщений: 12,546
Блог
28.11.2012, 21:09
Помогаю со студенческими работами здесь

Подсчет количества отрицательных (положительных, нулевых, кратных k) элементов массива
Нада сделать в двумерном массиве прогу через Array и просто через двум.массив помагите плизз ...

Подсчет количества отрицательных (положительных, нулевых, кратных k) элементов массива
Вы не могли бы помочь, пожалуйста? кто поможет- тому добра) заранее спасибо

Подсчет числа положительных и отрицательных чисел среди сумм элементов строк массива
Составьте программу подсчета числа положительных и отрицательных чисел среди сумм элементов строк...

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Блоги программистов
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного суматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­­хронный счётчик с управляющим сигналом задержки).
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
Применение компонентов PrimeVue в Vue.js 3 на TypeScript
BasicMan 04.01.2025
Введение в PrimeVue и настройка окружения PrimeVue представляет собой мощную библиотеку компонентов пользовательского интерфейса для Vue. js 3, которая предоставляет разработчикам богатый набор. . .
Как стать Senior developer
cpp_developer 04.01.2025
В современной индустрии разработки программного обеспечения позиция Senior Developer представляет собой не просто следующую ступень карьерной лестницы, а качественно новый уровень профессионального. . .
Что известно о дате выхода Windows 12 и чего от нее ждать
IT_Exp 04.01.2025
В мире технологий постоянно происходят изменения, и операционные системы не являются исключением. Windows 11, выпущенная в октябре 2021 года, принесла множество инноваций и улучшений, но. . .
Что новенького в .NET Core 9
Programming 04.01.2025
Обзор ключевых изменений в . NET Core 9 Платформа . NET Core продолжает активно развиваться, и версия 9 представляет собой значительный шаг вперед в эволюции этой технологии. Новый релиз. . .
Инструкция по установке python3.13.1 в Debian 12
AlexSky-coder 03.01.2025
sudo apt update sudo apt install build-essential zlib1g-dev libncurses5-dev libgdbm-dev libnss3-dev libssl-dev libreadline-dev libffi-dev wget. . .
Затестил триггеры. архив проекта прилагаю с GOA файлами в настройках архиватора проектов.
Hrethgir 03.01.2025
В этот раз нет закольцованности, потому что от неё только глюки, как я понял, логика не вырезанная. Триггеры очень быстрые если верить измерениям с помощью анализатора от Gowin. Есть ещё регистры,. . .
Python в помощь DevOps
IT_Exp 03.01.2025
Причины использования Python в работе DevOps Python стал неотъемлемой частью мира DevOps, и это не случайно. Этот язык программирования обладает множеством преимуществ, которые делают его. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru