Программирование Turbo Pascal 7 и Delphi 7, Обращайтесь кто интересуется |
Здравствуйте, гость ( Вход | Регистрация )
Программирование Turbo Pascal 7 и Delphi 7, Обращайтесь кто интересуется |
Aug 24 2005, 14:35
Сообщение
#1
|
|
Мега постер Группа: Posters Сообщений: 1,337 Регистрация: 15.8.2005 Из: Москва Пользователь №: 45 |
Можете сдесь задавать свои вопросы по этой теме.
-------------------- http://www.fds-net.ru Филиал Дома Студента МГУ
|
|
|
Feb 2 2008, 13:43
Сообщение
#181
|
|
Продвинутый пользователь Группа: Posters Сообщений: 236 Регистрация: 17.11.2007 Пользователь №: 11,738 |
Цитата Дан двумерный массив, содержит 5 строк и 3 столбца. Элементами массива являются целые числа. Упорядочить массив по убыванию элементов первого столбца "Ну пристрелите меня" ну незнаю я как эти массивы решатьььь. Хелп ми. |
|
|
Feb 3 2008, 23:05
Сообщение
#182
|
|
Новичок Группа: Members Сообщений: 5 Регистрация: 7.8.2007 Пользователь №: 8,346 |
В общих чертах решение может выглядеть примерно так:
1.Заводим 4-й столбик, который заполняем числами от 1 до 5, являющимися по сути исходными номерами строк массива. 2. Сортируем 1 столбик по убыванию, причём при каждой перестановке элементов делаем такую-же перестановку элементов дополнительного (индексного) столбика. 3.По окончании процесса переставляем элементы остальных столбиков по порядку номеров в индексном столбике. Вариант: Нахер дополнительный столбик. Тупо сортируем первый, каждый раз при перестановке его элементов аналогично переставляя элементы остальных столбиков. Успехов! |
|
|
Feb 3 2008, 23:16
Сообщение
#183
|
|
Новичок Группа: Members Сообщений: 5 Регистрация: 7.8.2007 Пользователь №: 8,346 |
Недостаточно данных. Если речь идёт о целых числах - то задача решается вообще без сортировки с использованием массива из 201 элемента независимо от N. - очевидно подсказывающий имел в виду, что при большом количестве входных данных (теоретически - неограниченном) и ограниченном числе значений этих данных бывает проще пересчитать, сколько раз каждое значение встретится во входном потоке данных. Например, числа от -100 до 100 (и "0"!) могут принимать 201 значение. Тогда заполнив в процессе чтения входного файла 201 переменную количеством чтений каждого значения, можно на их основе сформировать выходной файл, содержащий указанные значения в строго отсортированном порядке. |
|
|
Feb 16 2008, 19:23
Сообщение
#184
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
помогите плиз прогу в паскале написать: вычислить примерное значение бессконечной суммы с точностью е (эпсилон ~ 2.7183):
1/(1*3)+1/(2*4)+1/(3*5)+...+1/n(n+2) (помогите хотя бы без эпслилона посчитать сумму) -------------------- |
|
|
Apr 14 2008, 08:25
Сообщение
#185
|
|
Новичок Группа: Members Сообщений: 5 Регистрация: 7.8.2007 Пользователь №: 8,346 |
Кто знает?
Задача: Треугольник Паскаля 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 ..................... и т.д., каждое число равно сумме чисел над ним. Для первых рядов тоже справедливо, если положить крайние невидимые числа равны нулю. найти число нечётных чисел в n-ной строке треугольника, n ограничено 2*10**9 |
|
|
Apr 14 2008, 14:06
Сообщение
#186
|
|
Новичок Группа: Members Сообщений: 5 Регистрация: 7.8.2007 Пользователь №: 8,346 |
Аналог темы в форумах На-связи http://forum.na-svyazi.ru/?showtopic=13586
|
|
|
Гость_foxter_* |
Apr 17 2008, 17:04
Сообщение
#187
|
Guests |
Народ помогите плиз сделать прогу хоть на дельфи хоть на паскале.
Дана задача: Составить генератор случайных фраз. Объясню на примере. Вообщем дано 10 существительных, 10 глаголов, 10 прилагательных или типа того. выбирается одно существительное, один глагол, одно прилагательное случайгым образом и выводиться на экран. Вообщем-то всё. Помогите плиз |
|
|
Гость_Дима81_* |
Apr 17 2008, 17:45
Сообщение
#188
|
Guests |
Люди добрые помогите мне ПОЖАЛУЙСТА.
Лабораторная работа: "Программирование операции обработки двумерных массивов" Задача: Включить вектор С(М) в качестве главной диагонали матрицы. Спасибо. |
|
|
Гость_cyBopoB_* |
May 5 2008, 17:14
Сообщение
#189
|
Guests |
Простите пожалуйста что я с такой пустячной темой, но без помощи мне не обойтись.У меня возникли небольшие проблемы с циклами вот задача:
Составить алгоритм, написать и отладить программу для решения задачи: Ввести вещественное X и натуральное N. Найти значения функции Y: Y = x + x3 + x5 + . . . +x2n-1 Я знаю что надо решить эту задачу с помощью цикла,но как, вот вопрос. |
|
|
May 5 2008, 18:04
Сообщение
#190
|
|
Да прибудет с тобой сила... Группа: Posters Сообщений: 1,180 Регистрация: 21.5.2006 Из: г.п. Урмары :) Пользователь №: 611 |
x3, x5-непонятно. x умноженное на 5, или чо?
-------------------- ххх (21:01:35 6/08/2008)
Слу, в каком возрасте у маленьких девочек отрастают мозги? © |
|
|
May 5 2008, 18:22
Сообщение
#191
|
|
SALT LAKE 2002 Группа: Posters Сообщений: 2,129 Регистрация: 2.1.2007 Из: г. Цивильск. Пользователь №: 4,562 |
x3, x5-непонятно. x умноженное на 5, или чо? Наверняка, икс в степени 2n-1: икс в третьей, икс в пятой, икс в седьмой и т.д. -------------------- Побеждает тот, кто знает правила игры.
|
|
|
Гость_cyBopoB_* |
May 5 2008, 21:20
Сообщение
#192
|
Guests |
приношу свои извинения скопировал а отредактировать забыл
y=x+x^3+x^5.....+x^2n-1 |
|
|
May 6 2008, 06:50
Сообщение
#193
|
|
Да прибудет с тобой сила... Группа: Posters Сообщений: 1,180 Регистрация: 21.5.2006 Из: г.п. Урмары :) Пользователь №: 611 |
Код y:=0; while i<2*n do begin y:=y+x^i; i:=i+2; end; Так чтоли? -------------------- ххх (21:01:35 6/08/2008)
Слу, в каком возрасте у маленьких девочек отрастают мозги? © |
|
|
May 6 2008, 08:12
Сообщение
#194
|
|
Супер постер Группа: Local moder Сообщений: 888 Регистрация: 23.10.2005 Из: п.Кугеси Пользователь №: 106 |
|
|
|
May 6 2008, 16:00
Сообщение
#195
|
|
Да прибудет с тобой сила... Группа: Posters Сообщений: 1,180 Регистрация: 21.5.2006 Из: г.п. Урмары :) Пользователь №: 611 |
сам-то проверял на работоспособность, правильно будет сказать, этого клочка программы? В Паскале нет оператора возведения в степень. Да я утром писал, что пришло в голову более или менее умное, то и написал ^^ Сейчас подумаем-с. -------------------- ххх (21:01:35 6/08/2008)
Слу, в каком возрасте у маленьких девочек отрастают мозги? © |
|
|
May 6 2008, 16:55
Сообщение
#196
|
|
Новичок Группа: Members Сообщений: 4 Регистрация: 21.1.2008 Пользователь №: 13,915 |
CODE program norm; uses Crt,GraphABC; var maxMj,i,j,N,C,l:integer; x,r,a:real; M:array[1..10000]of integer; Begin clrscr; write('Vvedite N'); readln(N); write('Vvedite chislo yacheek: '); readln©; randomize; maxMj:=0; a:=500/N; setpencolor(clBLACK); rectangle(8,38,512,62); setbrushcolor(clGREEN); for i:=1 to N do begin r:=random©; x:=r; for j:=1 to C do begin if x>j-1 then if x<=j then M[j]:=M[j]+1; if M[j]>maxMj then maxMj:=M[j]; end; rectangle(10,40,10+round(i*a),60); end; SetWindowCaption('Гистограмма нормального распределения'); SetwindowSize(600,600); Setbrushcolor(clDARKGRAY); l:=0; for j:=1 to C do begin rectangle(round(l+630/5/C),480,round(l+630/C),round(480-400*M[j]/maxMj)); l:=l+round(630/C); end; readln; End. помогите плиз модифицировать программку ато полный завал буит!! нужен результат тот же самый... но саму прогу переписать надобы... Сообщение отредактировал Gobbs - May 6 2008, 16:58 |
|
|
Гость_XIII_* |
May 21 2008, 17:50
Сообщение
#197
|
Guests |
модули к паскалю выложите пажалуста(все которые есть на тп7)
|
|
|
Mar 22 2009, 21:44
Сообщение
#198
|
|
Продвинутый пользователь Группа: Posters Сообщений: 291 Регистрация: 9.7.2006 Из: Москва-Урмары Пользователь №: 891 |
Помогите решить хоть одну задачку...очень прошу вас, мне не на кого положиться, паук-единственная надежда...
Напишите программу реализации очередей с помощью указателей. Напишите программу реализации множеств посредством связанных списков. Напишите программу нахождения самого длинного простого пути от заданной вершины ориентированного графа. Напишите программу реализации алгоритма умножения целых чисел методом декомпозиции. Напишите программу, которая выводит динамическое изображение октаэдра, вращающегося вокруг заданной оси. Сообщение отредактировал Диана - Mar 22 2009, 21:53 -------------------- Всё что ни делается - всё к лучшему! проверено на собственном опыте |
|
|
May 4 2009, 14:09
Сообщение
#199
|
|
Новичок Группа: Members Сообщений: 9 Регистрация: 2.2.2008 Пользователь №: 14,418 |
Со спутника-шпиона получено изображение в некотором волновом диапазоне сверхсекретной военной базы предполагаемого противника. База расположена на Антарктиде, все постройки на ней высечены из кубов льда и имеют на фотографии квадратную форму и не имеют общих фрагментов стен ненулевой длины (по всей видимости, это сделано в целях маскировки от локаторов, работающих в инфракрасном спектре). Благодаря мастерству операторов оказалось, что стены разных построек параллельны границам фотографии. Для того, чтобы составить сверхсрочный отчет для командования, необходимо узнать, сколько зданий находятся на базе. Напишите программу, которая это сделает.
Формат входного файла В первой строке входного файла записаны числа пит (1 <= т, п <= 500) — размеры фотографии в пикселях по вертикали и по горизонтали. Следующие п строк содержат по т символов каждая: символ '.' соответствует пустому месту, '#' — элементу постройки. Формат выходного файла В выходной файл выведите единственное число — количество построек на базе. Примеры input.txt Output.txt 8 6 2 . . . . . . . . . # # . . . . # # . . . . . . . . # # # . . . # # # . . . # # # . . . . . . . . Помогите кто нить =) -------------------- |
|
|
Текстовая версия | Сейчас: 13th May 2024 - 11:40 |