|
|
Другие темы раздела | |
Delphi Как отключить прокрутку листбокса? Привет всем. Я пишу мп3 плеер у меня на форме стоят listbox и gauge. Gauge выполняет роль регулятора/индикатора громкости и реагирует на прокрутку колесиком не зависимо от положения курсора, за исключением когда курсор над плейлистом, а Listbox выполняет роль плейлиста, так вот проблема заключается в том что если что-то выделено в плейлисте, то он считается постоянно активным и также реагирует на... https://www.cyberforum.ru/ delphi-beginners/ thread986574.html |
Delphi Исключительные ситуации Что за исключительная ситуация EEndOfFile? |
Delphi Нанесение урона кораблю TSpaceObject = class Image:TImage; procedure Process; virtual; constructor create(x, y, width, height:Integer; filename:string; container:Twincontrol); destructor Destroy; end; TAsteroid = class(TSpaceObject) https://www.cyberforum.ru/ delphi-beginners/ thread986512.html | Delphi функция format Привет всем. Не могу убрать лишние нули, которые получаются при использовании функции format. Например, число 1001,7004376728 в формате %5.3f получается 1001,700, а в формате %5.3g получается 1Е003. Кто-нибудь знает как записать параметры форматирования, чтобы получалось число, к примеру, с количеством знаков НЕ БОЛЬШЕ трех? https://www.cyberforum.ru/ delphi-beginners/ thread986420.html |
Чтение Caption в динамически созданном подменю Delphi Доброго время суток всем)) Помогите с решением проблемы, пожалуйста. В цикле создаю меню: begin DataForm.ADOOldQuery.Last; for OldProjectCount := DataForm.ADOOldQuery.RecordCount-1 downto 0 do begin MenuItem :=TMenuItem.Create(ParentItem); OldProjectMenu.Add(MenuItem); ... |
Delphi Проверка всех похожих компонентов
https://www.cyberforum.ru/ delphi-beginners/ thread986353.html Привет Тема такая... На форме имеется около 20 компонентов TCheckBox с разными именами, в параметре Tag у каждого компонента прописаны цифры от 1 до 20, разумеется каждый ЧекБокс имеет уникальный Тэг Так вот сама задача.... По нажатию на один ЧекБокс должна пройти проверка всех компонентов TCheckBox, по параметру Tag... Подскажите как организовать данный шаг!! Заранее спасибо Это для... |
Delphi Найти количество потребленного электричества за и вне нормы, сумму к плате Здравствуйте, я начинающий программист, дана задача" Известно начальные и конечные показатели потребленного электричества. Стоимость 1кВт. эл. составляет 0,2802 грн, если объем потребленного не превышал 150 кВт. Для более нормальных расходов тарифное состояние 0,3648 грн. Найти количество потребленного электричества за и вне нормы, сумму к плате." никак не могу врубиться, что да как... https://www.cyberforum.ru/ delphi-beginners/ thread986272.html |
dll Delphi Пытаюсь в дллке выполнить такую функцию создаю в ней Unit: Ругается на SendMessage(Application.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, 0); Хотя если просто делаю программу по нажатию клавиши выполнить, то все нормально. В чем причина фиг знает. unit Unit1; interface uses Windows,Messages, SysUtils, Variants, Classes,shellapi, ScktComp, Registry; procedure On_Screen(); procedure... |
Delphi Программа решения задачи с оператором многовариантного выбора
https://www.cyberforum.ru/ delphi-beginners/ thread986141.html Составить в Console Application delphi программу решения задачи с помощью оператора многовариантного выбора CASE и вывести результаты на экран. Ввод и вывод результатов организовать в удобной для пользователя форме. |
Delphi бесконечный цикл Создать программу с “бесконечным” циклом типа while. В цикле увеличивать переменную I до значения, заданного пользователем. При достижении этого значения выходить из цикла с помощью возбуждения исключения EAbort. Выдать сообщение о выходе из цикла в блоке Except. Необходимо поместить на форму кнопку (объект класса TButton), которая запускает цикл; сообщение можно выдать спомощью функции... https://www.cyberforum.ru/ delphi-beginners/ thread986062.html |
Непонятные символы. Delphi Добрый день, мне надо в программу вставить символы ❶❷❸❹❺❻❼❽❾❿ ♔ ♕ ♖ ♗ ♘ ♙ ♙ ♚ ♛ ♜ ♝ ♞ ♟ ну и тому подобное. Но делфи заменяет их вопросиками. Как быть? |
Delphi StringGrid цвет
https://www.cyberforum.ru/ delphi-beginners/ thread986009.html Добрый вечер,уже много обыскал на счет раскраски ячеек String Grid, но ничего толкового не получилось,подскажите как закрасить ячейки и |
0 / 0 / 0
Регистрация: 24.10.2013
Сообщений: 3
|
|
0 | |
В каком из данных 5 чисел сумма цифр больше - Delphi - Ответ 522904424.10.2013, 13:53. Показов 772. Ответов 2
Метки (Все метки)
Задача №1.Составить программу, определяющую, в каком из данных 5 чисел сумма цифр больше. Нахождение суммы цифр числа оформить в виде процедуры
Задача №2.Составить программу нахождения наименьшего общего кратного пяти натуральных чисел. Нахождение наименьшего общего кратного двух чисел оформить в виде функции. Вернуться к обсуждению: В каком из данных 5 чисел сумма цифр больше Delphi
0
|
24.10.2013, 13:53 | |
Готовые ответы и решения:
2
Составить программу определяющую в каком из 5 чисел сумма цифр больше Программа, определяющая, в каком из данных чисел больше цифр Составить программу, определяющую, в каком из данных 5 чисел сумма цифр больше Определить, в каком из 2 чисел сумма цифр больше |
24.10.2013, 13:53 | |
24.10.2013, 13:53 | |
Помогаю со студенческими работами здесь
0
Выяснить в каком из заданных чисел сумма цифр больше Узнать в каком из натуральных чисел сумма цифр больше Выяснить в каком из двух чисел сумма цифр больше Выяснить, в каком из заданных натуральных чисел сумма цифр больше |