Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Дано вещественное число A (>1). Вывести наименьшее из целых чисел N, для которых сумма 1+…+1/N будет больше A, и сумму Добрый вечер всем. Нужна помощь в задании по Pascal ABC Само задание: Дано вещественное число A (>1). Вывести наименьшее из целых чисел N, для которых сумма 1+1/2+…+1/N будет больше A, и саму эту сумму. Данное задание уже гуглил, и находил код на форуме, но он не подходит в принципе https://www.cyberforum.ru/pascal/thread910448.html https://www.cyberforum.ru/ pascal/ thread2355386.html Найти отрезки неубывания в N последовательности целых чисел Pascal
Здравствуйте. Задано преподавателем напасть программу выводящую на экран отрезки неубывания из N последовательности целых чисел. Также этим отрезком может являться одно число. Например: есть последовательность -5,-3,20,15,24,5,4,6,7,10,16,18 этими самыми отрезками тут будут "-5,-3,20", "24", "6,7,10,16,18". Построить саму последовательность труда не составляет,а вот что дальше делать ума не...
Pascal Найти число, отличающееся от других чисел https://www.cyberforum.ru/ pascal/ thread2355257.html
var a, b, c, d:integer; begin readln(a, b, c, d); if a=b then if c=a then writeln(d) else if c<>a then writeln(c) else if a<>b then
Pascal Майнкрафтия https://www.cyberforum.ru/ pascal/ thread2355195.html
Мы попали в Майнкрафтию, в которой все состоит из блоков размером 1 * 1 * 1. Вся страна поделена на одинаковые чанки, по одному Чанка для каждого жителя. Чанк представляет собой параллелепипед размером n * m * k блоков. Автор задачи живет в одном из таких чанков. Некоторые блоки этого Чанка пустые и через них можно пройти, а некоторые заставлены камнем, то есть непроходимыми. Автор сейчас...
Найти разность элементов массива Pascal
Есть такое задание: Программа на Pascal которая заполняет массив из 10 случайных целых чисел на промежутке от -10 до 5 вычисляет разность элементов массива. Правильно я сделал? Диапазон я верно указал? uses crt; var // создаем массив massiv:array of integer; raznost,i:integer; begin clrscr;
Pascal Для n точек плоскости найти расстояние от начала координат до каждой из них https://www.cyberforum.ru/ pascal/ thread2355009.html
Разработать алгоритм и программу с единственным циклом для обработки одномерных массивов. При заданных координатах X1,X2,...Xn; Y1,Y2,..Yn для n точек плоскости XOY найти Rk от начала координат до каждой из них (координатами k-й точки являются Xk, Yk).
Pascal Считая т текстовым файлом, ответить на следующие Считая t текстовым файлом, ответить на следующие вопр: а) эквивалентны ли типы text и fail of char; б) Кроме текстовых файлов, какие еще файлы могут делиться на строки? Обязательно ли все строки файла должны быть одинаковой длины? Могут ли в файле быть пустые строки в) Если при записи в t надо закончить строку, то как это сделать? Какие действия влечет за собой выполнение оператора... https://www.cyberforum.ru/ pascal/ thread2354940.html Определить содержимое файла f, после выполнения следующих операторов: Pascal
Var f: file of integer; i: integer; Определить содержимое файла f, после выполнения следующих операторов: а) rewrite(f); if eof(f) then write(f,1) else write(f,2); if eof(f) then write(f,3) else write(f,4); б) rewrite(f); for i:=3 downto 1 do write(f,sqr(i));
Pascal Найти сумму n первых четных по номеру членов геометрической прогрессии с первым членом b и знаменателем q Найти сумму n первых парных по номеру членов геометрической прогрессии с первым членом b и знаменателем q. Помогите пожалуйста, буду благодарен. https://www.cyberforum.ru/ pascal/ thread2354840.html Pascal Заменить каждую первую букву в слове заглавной. Запросить у пользователя строку S, содержащую несколько слов, разделенных символом пробела. Сформировать из нее строку S1, заменив каждую первую букву в слове заглавной. Вывести на чистый экран строки S и S1, рядом их длину. https://www.cyberforum.ru/ pascal/ thread2354830.html
Pascal Метод наименьших квадратов (МНК)
Здравствуйте, прошу вашей помощи, нужно составить алгоритм решения задачи для аппроксимации точек степенной функцией (полиномом) произвольной степени m. составить программу на языке Pascal, содержащую: ввод исходных точек из файла данных, формирование матрицы Грамма, решение системы линейных алгебраических уравнений методом Гаусса, вывод результатов и проверку. program kvadrat; uses...
Pascal Программа на турбо паскале https://www.cyberforum.ru/ pascal/ thread2354573.html
Ребят, помогите написать программу на турбо паскале. Не разбираюсь в массивах. Желательно уже полностью с началом и с концом
0 / 0 / 0
Регистрация: 05.11.2018
Сообщений: 19
0

Дан массив размера 10. Переставить в обратном порядке элементы массива, расположенные между его мин и макс элементами - Pascal - Ответ 13079671

21.11.2018, 01:46. Показов 2830. Ответов 1
Метки (Все метки)

Студворк — интернет-сервис помощи студентам
Приветствую
Помогите с задачей пожалуйста

Дан массив размера 10. Переставить в обратном порядке элементы массива, расположенные между его мин и макс элементами.

Нужно для отчета, сам хз как это сделать. В программе должен использоваться цикл far
На форуме находил данную тему, но код оттуда слишком большой и сложный, он в любом случае должен выглядеть иначе. Каждый, кто имеет представление как это сделать, помогите пожалуйста.
ЗАРАНЕЕ СПАСИБО!!!

ps. вот та тема
Кликните здесь для просмотра всего текста
https://www.cyberforum.ru/turbo-pascal/thread1152005.html


Для примера приведу похожую задачу и код к ней

Дан целочисленный массив A размера 10. Вывести номер последнего из тех его элементов A[i], которые удовлетворяют двойному неравенству: (A[1]<A[i]<A[10]). Если таких элементов нет, то вывести 0.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Program arr1;
uses crt;
var
a: array[1..10] of integer;
i, k: integer;
begin
writeln('Массив A =' );
for i := 1 to 10 do
begin
a[i] := random(10);//рандомно задаем массив
write(a[i],' ');//выводим все эллементы массива через пробел
end;
for i := 1 to 10 do
if (a[1] < a[i]) and (a[i] < a[10]) then k := i;
writeln();
writeln('порядковый номер числа удовлетворяющего условию', ' ',k);
end.


Вернуться к обсуждению:
Дан массив размера 10. Переставить в обратном порядке элементы массива, расположенные между его мин и макс элементами Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.11.2018, 01:46
Готовые ответы и решения:

Дан массив размера 10.Переставить в обратном порядке элементы массива , рассположенные между его минимальным и максимальным элементами.
помогите Дан массив размера 10.Переставить в обратном порядке элементы массива , рассположенные...

Переставить в обратном порядке элементы массива, расположенные между его первым и вторым нулевыми элементами
Дан массив размера 10. Переставить в обратном порядке элементы массива, расположенные между его...

Переставить в обратном порядке: элементы, расположенные между k-м и s-м элементами массива
Дан одномерный массив из 15 элементов. Переставить в обратном порядке: элементы, расположенные...

Переставить в обратном порядке элементы массива, расположенные между заданными элементами, не включая эти элементы
Дан массив А размера N и целые числа K и L (K≤L≤N). Переставить в обратном порядке элементы...

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

Переставить в обратном порядке элементы массива, расположенные между заданными элементами, включая эти элементы
Дан массив А размера N и целые числа K и L (K≤L≤N). Переставить в обратном порядке элементы...

Переставить в обратном порядке элементы массива, расположенные между A от (K) и A от (L), включая эти элементы.
Дан массив А из N целых чисел и целые значения K и L (1&lt;K&lt;L&lt;N). Переставить в обратном порядке его...

Переместить элементы, расположенные между минимальными и максимальными элементами, в обратном порядке
Помогите пожалуйста,а то преподователь убьет. Задача для 10го класса переместить элементы в...

Дан массив А размера N. Упорядочить элементы, расположенные к первому отрицательного элемента в порядке возрастания
Дан массив А размера N. Упорядочить элементы, расположенные к первому отрицательного элемента в...

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