Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/15: Рейтинг темы: голосов - 15, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 18.12.2013
Сообщений: 2
1

Найти первое отрицательное число в массиве

18.12.2013, 22:24. Показов 2852. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Думаю что он легкий, а решить не могу( не умею решать их) (
В массиве чисел А1 А2......Аn найти первое отрицательное число и напечатать его номер

Заранее огромное спасибо!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
18.12.2013, 22:24
Ответы с готовыми решениями:

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

Удалить из одномерного массива первое отрицательное число
нужна программа которая бы удаляла из массива первое отрицательное число.Массив зап случ образом в...

В одномерном массиве найти первое простое число
Дан одномерный числовой массив. Найти первое простое число этого массива

В целочисленном массиве найти первое с конца нечётное число
в целочисленном массиве найти первое с конца не чётное число

1
27 / 27 / 39
Регистрация: 16.11.2013
Сообщений: 64
19.12.2013, 10:44 2
Лучший ответ Сообщение было отмечено korobulk как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
var a:array[1..1000] of integer;
i,n:integer;
begin
readln(n);
for i:=1 to n do begin a[i]:=random(21)-10; write(a[i],' '); end;
writeln;
i:=1;
while (a[i]>=0)and(i<=n) do inc(i);
if i>n then writeln('Нет отрицательных элементов') else writeln(i);
end.
1
19.12.2013, 10:44
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.12.2013, 10:44
Помогаю со студенческими работами здесь

В целочисленном массиве найти первое число, принадлежащее отрезку[-2;5]
Через while. В целочисленном массиве найти первое число, принадлежащее отрезку .

Задать 2 числа. Если первое число отрицательное, то его возвести в квадрат
Задать 2 числа. Если первое число отрицательное, то его возвести в квадрат, а если положительное,...

Определить, каким по счету будет первое отрицательное число введенное с клавиатуры
С клавиатуры вводятся любые числа. определить, каким по счету будет первое отрицательное число....

В целочисленном массиве найти первое с конца нечетное число (цикл while)
В целочисленном массиве найти первое с конца нечетное чило Через while


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Преобразование полей (элементов управления содержимым) в обычный текст
РоΜа 23.01.2025
Возникла необходимость преобразовать поля в текст (те, что на вкладке разработчик добавляются) . Помучившись родил следующее: Sub ПоляВТекст() Преобразует все поля в текст (даты, текст,. . .
Как проверить существование директории в скрипте Bash
bt_guru 23.01.2025
При разработке скриптов Bash одной из ключевых задач является корректная работа с файловой системой, где особое место занимает проверка существования директорий. Эта операция становится критически. . .
Как работают срезы (slice) в Python
bytestream 23.01.2025
Python предоставляет разработчикам мощный и гибкий инструмент для работы с последовательностями данных - срезы (slices). Эта функциональность позволяет извлекать, модифицировать и управлять. . .
Как удалить подмодуль (submodule) в Git
bytestream 23.01.2025
При работе с крупными проектами в системе контроля версий Git разработчики часто сталкиваются с необходимостью управления зависимостями и внешними компонентами. Подмодули (submodules) представляют. . .
В чем разница между @staticmethod и @classmethod в Python. Декораторы методов
bytestream 23.01.2025
В Python декораторы методов представляют собой мощный инструмент, позволяющий модифицировать поведение функций и методов без изменения их исходного кода. Эта возможность является одной из. . .
Как преобразовать InputStream в String в Java
bytestream 23.01.2025
В мире Java-разработки работа с потоками данных является одной из ключевых операций при создании современных приложений. InputStream, как фундаментальный класс для обработки входных потоков данных,. . .
Как обновить форк (ответвление) репозитория в Git
bytestream 23.01.2025
Одним из наиболее мощных инструментов Git для организации совместной работы является механизм форкинга репозиториев, который позволяет создавать независимые копии проектов для дальнейшей разработки. . . .
Как работает async/await в C#. Асинхронное программировани­е в .NET
bytestream 23.01.2025
Введение в асинхронное программирование Асинхронное программирование представляет собой важнейшую концепцию современной разработки программного обеспечения, особенно в контексте создания. . .
КуМир: полное руководство
bytestream 23.01.2025
Введение в КуМир: история создания и назначение КуМир (Комплект Учебных МИров) представляет собой образовательную среду программирования, которая была создана для обучения основам алгоритмизации и. . .
Что такое OLAP. Где и как использовать многомерный анализ данных
bytestream 23.01.2025
Введение в OLAP-технологии В современном мире бизнес-аналитика и обработка больших массивов данных играют ключевую роль в принятии стратегических решений. Организации накапливают огромные объемы. . .
MongoDB: что это, для чего нужна и как использовать
bytestream 23.01.2025
Введение в MongoDB: современная документоориентированная СУБД В современном мире разработки программного обеспечения выбор правильной системы управления базами данных является критически важным. . .
Как использовать закрытый ключ шифрования в Git. Шифрование в Git
bytestream 23.01.2025
Установка и настройка закрытых ключей в Git предоставляет дополнительный уровень безопасности для работы с репозиториями. Для начала необходимо создать пару ключей, обычно это осуществляется с. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru