|
|
| Другие темы раздела | ||||||||||||||||||
|
Delphi Алгоритм Евклида со сдвигом битов
https://www.cyberforum.ru/ delphi-beginners/ thread1993289.html Составить программу вычисляющую НОД двух чисел по алгоритму Евклида. Пусть m>=n - два целых числа, одновременно не равных нулю. Тогда НОД(m,0)=m, НОД(m,n)=НОД(n,r), где r - остаток деления m на n. Вычисления организовать в виде рекурсивной процедуры с двумя аргументами. Вывести на экран 10-ричное и 16-ричное представление НОД. Для организации вывода применить операции сдвига битов. Сделать в... |
Delphi Массивы и последующие задания с ними Здравствуйте! Суть задания вот в чем. Создаем массив из N элементов в диапазоне . Далее задания: 1) Удалить из него все элементы, первая цифра которых четная. 2)Вставить число К после всех элементов, кратных своему номеру. 3)Поменять местами первый положительный и отрицательный элемент. Выбирать задания через выбор CheckBox. Задание сделала, работает, но каждое из заданий обращается не к... | |||||||||||||||||
|
Delphi Интерполяция методом Лагранжа
https://www.cyberforum.ru/ delphi-beginners/ thread1993269.html Не могу прогу дописать.Интерполяция методом Лагранжа,не знаю как сделать чтоб можно было выбирать порядок ур-я и график построить к соответсвуешему порядку.Помогите,плес const maxCountValue = 25; type vector=array of real; matrix= array of real; SplineTuple= record a,b,c,d,x:real; end; var |
Delphi Как правильность выбора в RadioGroup? Привет всем. Через xlsx выгружаю варианты ответа в radiogroup, 4 или 5 вариантов получается. Потом они перемешиваются, так как первый вариант ответа всегда правильный. Как проверять варианты ответа на правильность? https://www.cyberforum.ru/ delphi-beginners/ thread1993210.html | |||||||||||||||||
|
Поиск в StringGrid Delphi Не получается осуществить вывод в memo ударников. Сделала отличников, не аттестованных, но с ударниками всё плохо. Подскажите пожалуйста. //ОТЛИЧНИКИ for j := 1 to Form2.StringGrid1.RowCount - 1 do begin k:=0; for i := 1 to Form2.StringGrid1.ColCount - 4 do if Form2.StringGrid1.Cells = '5' then inc(k); if k = i-1 then |
Delphi В квадратной матрице порядка n найти сумму тех элементов, сумма индексов которых равна n.
https://www.cyberforum.ru/ delphi-beginners/ thread1993157.html Есть ли на просторе интернета что-то похожее, но готовое как пример, просто не пойму как это с визуальной стороны должны выглядеть. Программа которая в квадратной матрице порядка n находит сумму всех тех элементов, сумма индексов которых равна n. | |||||||||||||||||
| Delphi Компонент делфи Подскажите, если какой-нибудь компонент или как вообще сделать подобное. Я жму на кнопку "Добавить папку", выбираю папку и она должна считаться в листбокс, или на какую-нибудь панель в виде: Путь к папке Путь к файлу в этой папке Путь к файлу в этой папке И так как папок можно выбирать много, то это должно таким деревообразным видом всё добавляться: Путь к папке Путь к... https://www.cyberforum.ru/ delphi-beginners/ thread1993138.html |
Delphi Сортировка расческой День добрый, дорогие друзья. Нужна ваша помощь с реализацией сортировки "расческой" на языке delphi. Есть код, но он работает не правильно, и при вводе размерности массива <6 крашит. procedure combsort(var A: arr); var i, jr: Cardinal; j: real; begin j := Length(A); jr := Round(j); while i < i + jr do | |||||||||||||||||
|
Delphi Убрать ошибку при отмене сохранения
https://www.cyberforum.ru/ delphi-beginners/ thread1993069.html Суть из заголовка (I/O error 102). procedure TForm1.SaveClick(Sender: TObject); var i: Integer; begin if s = '' then Form1.SaveasClick(Sender) else begin Assignfile(f,S); end; rewrite(f,sizeof(rec)); |
Delphi Создать программу, которая используя пункты меню, управляет таблицей
https://www.cyberforum.ru/ delphi-beginners/ thread1993055.html Создать программу, которая с помощью пунктов меню управляет таблицей(использовать stringgrid, mainmenu). (Пример: создать программу, в которой нажатием кнопки осуществляется заполнение таблицы таблицей умножения, а с помощью подпунктов меню возможно редактирование содержимого ячеек, например прибавить число или возведение в степень.) | |||||||||||||||||
|
Добавить цифры и знаки арифметических действий так, чтобы получилось правильное арифметическое выражение Delphi Дана конечная последовательность, состоящая из левых и правых скобок различных заданных типов. Как определить, можно ли добавить в нее цифры и знаки арифметических действий так, чтобы получилось правильное арифметическое выражение. |
Delphi Порядок отрицательных членов изменить на обратный, порядок неотрицательных сохранить
https://www.cyberforum.ru/ delphi-beginners/ thread1993021.html Задача по делфи(нужно все 3 пункта в 1 программе сделать) Прошу Помочь В условиях задания 3 а) порядок отрицательных членов изменить на обратный, порядок неотрицательных сохранить; б) порядок отрицательных членов сохранить, порядок неотрицательных из
Наверх
| |||||||||||||||||
