Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Free Pascal Найти среднее арифметическое чисел первого столбца матрицы https://www.cyberforum.ru/ free-pascal/ thread759225.html
Exitcode=1 :( Не знаю, почему вылетает: Program SredniStolbec; Uses Crt; Const n=5; m=5; Var
Сформировать запись "операторы ТР": оператор, действие Free Pascal
Доброй ночи друзья требуется ваша помощь! 1)Сформировать запись "операторы ТР": оператор, действие. Подсчитать их количество и количество операторов имеющих повторяющиеся ключевые слова. 2)Доделать программу 1 заполнением и обработкой файлов. Имя файла вводить с клавиатуры в процессе работы программы.
Free Pascal Кадровая развертка https://www.cyberforum.ru/ free-pascal/ thread759145.html
В листинге программы встретил такую запись : while (port and 8) = 0 do; {ожидаем обратный ход луча кадровой развертки} Что она означает? Что такое кадровая развертка? Может есть ссылки где про это можно почитать?
Free Pascal Сортировка по возрастанию элементов массива даны массивы A, B, C. переставьте элементы в них таким образом что слева подряд были записанны отрицательные а справа положительные program allalalal; type mass=array of integer; var ka,kb,kc:byte; a:mass; b:mass; c:mass; procedure VVOD(var d:mass); https://www.cyberforum.ru/ free-pascal/ thread759094.html
Free Pascal Строки. Печать слов в алфавитном порядке
Добрый вечер уважаемые форумчане! В очередной раз прошу вашей помощи. 2)Дано несколько слов, в каждом из которых от одной до семи строчных букв, между соседними словами - не менее одного пробела, за последним словом - точка. Напечатать эти слова в алфавитном порядке. Заранее благодарю!
Free Pascal Сформировать квадратную матрицу B из элементов квадратной матрицы А https://www.cyberforum.ru/ free-pascal/ thread758873.html
Сформировать квадратную матрицу B из элементов квадратной матрицы А. Каждый элемент bik должен быть равен сумме элементов матрицы А из области, определяемой индексами i,k в соответствии с рисунком. Вывести результирующую матрицу.
Free Pascal Строки. Перевод в числа Добрый вечер уважаемые форумчане! В очередной раз прошу вашей помощи. 1) Даны 2 строки с1 и с2, содержащие до 5 цифр каждая. Преобразовать их к данным целого типа, используя процедуру VAL, вычислить арифметическое выражение c3=(c1-c2)/(c1+c2) Заранее благодарю! https://www.cyberforum.ru/ free-pascal/ thread758850.html Free Pascal Собрать определённый вес из элементов массива
Здравствуйте! Реально ли решить эту задачу программой с сложностью O(logN) или O(logM)? Кто-нибудь сможет описать алгоритм с такой сложностью? (больше чем O(logN) или O(logM) не подойдёт, так как мне нужно решение этой задачи использовать, как фрагмент другой, в которой очень ограниченно время при наличии больших данных) Дано N золотых слитков массой m1, …, mN. Ими наполняют рюкзак,...
Free Pascal Двумерные массивы. Вычисление элементов по формуле. const n=..; var A,B,C :array of real; Вычислить C=(A+B)^2 Пожалуйста помогите я на экзамене) Буду очень признателен! https://www.cyberforum.ru/ free-pascal/ thread758488.html Free Pascal Определить, есть ли в текстовом файле слова из другого текстового файла https://www.cyberforum.ru/ free-pascal/ thread758141.html
Помогите пожалуйста с ошибкой в программе. Нужно было определить, есть ли в текстовом файле(1) слова из другого текстового файла(2). Считается, что файл(2) имеет вид: слово1 слово2 ... слово60 Причем задана максимальная длина слова=15 и всего слов не больше 60. В файле(1) ограничений нет. Пытался реализовать это так: K:=1;
Дано n чисел. Сгенериовать последовательность этих чисел в лексико-графическом порядке Free Pascal
Здравствуйте, помогите с программкой. Дано n чисел. Сгенерировать последовательность этих чисел в лексико-графическом порядке.
Free Pascal Как исправить ошибку в подсчёте? https://www.cyberforum.ru/ free-pascal/ thread757987.html
Условие задачи:Дана матрица размера M x N и целое число K (1 < K < M). Найти сумму и произведение элементов K-й строки данной матрицы. Const n=3; m=4; Var a : array of integer; I, j ,k,P,S: integer; Begin randomize;
0 / 0 / 0
Регистрация: 12.01.2013
Сообщений: 5
0

Вывод номера элемента массива, удовлетворяющего требованиям - Free Pascal - Ответ 3988585

12.01.2013, 04:54. Показов 4500. Ответов 2
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Есть массив с рандомными числами(от -20 до 20). Нужно вывести номер элемента массива, который первым по счету будет больше 0. Вывод должен идти через процедуру.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program T;
const n=28;
var f:array[1..n] of integer;
i,a:integer;
[B]Procedure AA(i,a:integer);
begin
for i:=1 to n do
if f[i]>0 then writeln(i);
end;[/B]
begin
randomize;
for i:=1 to n do
f[i]=random(41)-20;
AA(i,a);
readln;
end.
Если сделать так, как написано выше, выводятся все номера элементов, значения которых выше 0, а нужно что бы выводился только номер первого по счету элемента, значение которого превышает 0. Подскажите, пожалуйста, что нужно изменить.

Вернуться к обсуждению:
Вывод номера элемента массива, удовлетворяющего требованиям Free Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.01.2013, 04:54
Готовые ответы и решения:

Вывод номера элемента максимального и минимального элемента массива
Вечер добрый. Есть вот такая вот задача: Заполнить массив из 10 элементов случайными числами в...

Вывод номера элемента массива
Здравствуйте!Задали задачу, нужно исключить из одномерного массива элемент со значением &quot;0&quot;(он...

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

Вывод минимального номера строки и столбца с максимальным значением элемента массива
Есть массив, из которого выводиться максимальный элемент, при этом, если элемент в этом массиве...

2
12.01.2013, 04:54
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.01.2013, 04:54
Помогаю со студенческими работами здесь

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

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

Определить номера минимального элемента массива и элемента, являющегося минимальным без учета этого элемента.
Дан массив. Определить номера минимального элемента массива и элемента, являющегося мини-мальным...

Найти номера минимального элемента массива и элемента, являющегося минимальным без учета этого элемента
11.109. Дан массив. Определить: а) максимальный элемент массива и элемент, являющийся максимальным...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru