Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Очистка памяти от AnsiString https://www.cyberforum.ru/ delphi-beginners/ thread1997595.html
Есть динамический массив строк Trace: array of AnsiString; По ходу исполнения процедуры массив обретает длину, строки заполняются. В конце процедуры Trace := nil Непосредственно после заполнения массива объем ОЗУ, занимаемый приложением, возрастает. А после Trace := nil не уменьшается. Если повторно повторить процедуру, заполняя массив другими строками, объем в ОЗУ растет. Если я правильно...
Как исправить программу Delphi
Есть программа (прикреплена во вложениях) Но она работает не совсем корректно Задание: даны одномерные массивы (2), нужно найти сумму отр элементов, вывести массивы и результаты на форму Для начала написал программу в консоли - там она работает нормально, но когда переделал под форму, что то пошло не так Не подскажите что и как? И еще вопрос - можно как то объединить вывод массивов в один...
Delphi Передвижение формы Как сделать передвижение формы, когда картинка достигала,какой-то координаты, форма двигалась. Я написал код, но ничего не работает. //if (key=68) and (xmario>496) then // Form1.Width:=Form1.width+10; https://www.cyberforum.ru/ delphi-beginners/ thread1997428.html Delphi Как встроить окно в Инспектор Объектов? Всем добрый день. В книге Архангельского "Программирование в Delphi7" сказано, что есть возможность встроить окно Code Explorer в окно Инспектора Объектов в качестве отдельной страницы. При этом они ложатся на отдельные страницы, совершенно не занимая дополнительного места. Сколько я не пытался это сделать, у меня ничего не получилось. Окна или ложатся друг под другом или одно рядом с другим.... https://www.cyberforum.ru/ delphi-beginners/ thread1997348.html
Ошибок не найдено, но и программа не работает Delphi
ошибок не найдено, но и программа не работает unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type Vopros = record //объявляем тип запись где будем хранить вопросы и варианты ответов к ним
Delphi Кракозябра с кодировкой Народ! помогите пожалуйста разобраться с кодировкой =( читаю из буфера строку PChar(P) Buffer:=UnicodeString(PChar(P)); Form1.Memo1.Lines.Add(Buffer); Form1.Memo1.Lines.Add('***'); https://www.cyberforum.ru/ delphi-beginners/ thread1997306.html
Delphi Запрос в SQL, после него добавляет не ту запись в таблицу После SQL запроса в таблице 'товары' добавляет не ту(строчка которая была выбрана) запись в другую таблицу. Почему так и как это исправить?:-| //Добавление из одной таблицы в другую DM1.tbl7.Last; DM1.tbl7.Append; DM1.tbl7.Edit; DM1.tbl7ID_prod.Value:= DM1.tbl3ID_prod.Value; DM1.tbl7Name_prod.Value:= DM1.tbl3Name_prod.Value; https://www.cyberforum.ru/ delphi-beginners/ thread1997302.html Delphi Загрузить текстовый файл в Memo
Задача состоит в том чтобы открыть текстовый файл в memo1. Но проблема в том, что имя текстового файла меняется от 1 до 100, т.е. в папке с программой будет файл 1.txt или 2.txt.....100.txt:( Как сделать открытие, какой код нужно написать? memo1.Lines.LoadFromFile(.txt);
Delphi Перенос файла из одной папки в другую https://www.cyberforum.ru/ delphi-beginners/ thread1997273.html
Здоров, в чем суть, у меня в папке с проектом есть папка Doc, там имеются файлы PDF, мне необходимо реализовать такую функцию, чтобы по нажатию на кнопку я находил файл на пк, выбирал его и он переносился в папку Doc, помагайте)))
Delphi Получить мантиссу Помогите получить мантиссу 215.376 и вывести его значение в компонент мемо https://www.cyberforum.ru/ delphi-beginners/ thread1997202.html
Написать программу в делфи Delphi
В режиме текста меню организовать выполнение сл. задач: 1)ввод данных в файл 2)выборка из файла 3)добавление данных в файл 4)выход
Delphi Не видит процедуру второго Unit: Undeclared identifier: 'ColorsPos' Главная программа: unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls; type https://www.cyberforum.ru/ delphi-beginners/ thread1997176.html
Модератор
9610 / 6217 / 2423
Регистрация: 21.01.2014
Сообщений: 26,520
Записей в блоге: 3
06.06.2017, 05:52 0

В трехзначном числе х зачеркнули его первую цифру - Delphi - Ответ 10515654

06.06.2017, 05:52. Показов 1764. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено Vladimir2512 как решение

Решение

М-да... Держи, дитя ЕГЭ...
Решение через строки:
Delphi
1
x := StrToInt(Copy(IntToStr(n), 3, 1) + Copy(IntToStr(n), 1, 2));
Числовое решение:
Delphi
1
x := n mod 10 * 100 + n div 10;


Вернуться к обсуждению:
В трехзначном числе х зачеркнули его первую цифру Delphi
0
Заказать работу у эксперта

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.06.2017, 05:52
Готовые ответы и решения:

В трехзначном числе х зачеркнули первую цифру ... По заданному n найти число х
2)В трехзначном числе х зачеркнули первую цифру. Когда полученное число умножили на 10, а...

В трехзначном числе х зачеркнули 1 цифру. Найти х
В трехзначном числе х зачеркнули 1 цифру.Когда оставшиеся число умножили на 10,а произведение...

В трехзначном числе зачеркнули старшую цифру. Когда полученное число умножили на 6, то получили исходное число. Найти общее количество таких чисел
В трехзначном числе зачеркнули старшую цифру. Когда полученное число умножили на 6, то получили...

В трехзначном числе x зачеркнули первую цифру
В трехзначном числе x зачеркнули первую цифру. Когда оставшееся число умножили на 10, а...

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

В трехзначном числе зачеркнули первую цифру слева
В трехзначном числе зачеркнули первую цифру слева. Когда полученное двухзначное число умножили на...

В трехзначном числе x зачеркнули первую цифру. Найти исходное число
1) В трехзначном числе x зачеркнули первую цифру. Когда оставшееся число умножили на 10, а...

В трехзначном числе зачеркнули его последнюю цифру
В трехзначном числе зачеркнули его последнюю цифру.Когда в образованном при этом 2-х значном числе...

В трехзначном числе x зачеркнули его вторую цифру
В трехзначном числе x зачеркнули его вторую цифру. Когда к образовавшемуся двухзначному числу...

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