Вопрос № 120286: Здравствуйте, эксперты!
Нужна ваша помощь. Помогите, пожалуйста, осуществить вот эту процедуру вставки элемента в массив на Delphi. Существует массив, выражающий последовательность элементов X[1..n]. Необходимо в последовательность вставить число...Вопрос № 120288: Здравствуйте, уважаемые эксперты!
Помогите разобраться! Препод уже замучал!
Конкретнее:
Нужен код для Delphi 7. Дано слово/число неопределённой длины и нужно в нём переставить буквы/цифры в обратном порядке.
Функции типа
а:=рекурс...Вопрос № 120366: Здравствуйте уважаемые эксперты.
хочу написать программу, которая включала бы компьютер в определенное время. Есть идея реализовать это через биос, задавая там время включения. Подскажите пожалуйства как это сделаь....
Вопрос № 120.286
Здравствуйте, эксперты!
Нужна ваша помощь. Помогите, пожалуйста, осуществить вот эту процедуру вставки элемента в массив на Delphi. Существует массив, выражающий последовательность элементов X[1..n]. Необходимо в последовательность вставить число y в позицию k. При этом элементы с номерами от k до n должны быть перемещены на один индекс ближе к концу последовательности.
Procedure ElInsert(var X:TArray; var n:Integer; Y:integer; k:Integer);
Var
i:Integer;
Begin
For i:=n downto k Do
X[i+1]:=X[i];
X[k]:=Y;
n:=n+1;
End;
Отправлен: 26.01.2008, 17:43
Вопрос задала: Kollisto (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 5)
Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Kollisto!
Работающий код в приложении.
В приложенном файле проект целиком.
Удачи!
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа.
Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 26.01.2008, 18:26 Оценка за ответ: 5 Комментарий оценки: Спасибо!:-) Вам Удачи!
Вопрос № 120.288
Здравствуйте, уважаемые эксперты!
Помогите разобраться! Препод уже замучал!
Конкретнее:
Нужен код для Delphi 7. Дано слово/число неопределённой длины и нужно в нём переставить буквы/цифры в обратном порядке.
Функции типа
а:=рекурсия(б) не предлагать.
Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Екатерина Ходеева!
Код в приложении.
На форме два компонента TEdit (для исходной строки и результата) и TButton.
Удачи!
Приложение:
Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 26.01.2008, 18:16 Оценка за ответ: 5 Комментарий оценки: Спасибо! Оперативно, понятно и то, что нужно!
Отвечает: Esi
Здравствуйте, Екатерина Ходеева!
Допустим х строковая переменная, в которой буквы/или числа. (Если х числовая, то необходимо ее перевести в символьную используя функции floattostr или inttostr. Возможно, придется использовать исключения Try except end)
i:= Length(x); y:= “”; //где ч- счётчик, у – нужный Вам результат.
for i=1 to Length(x) do y:=copy(x,i,1)+y;
Ответ отправил: Esi (статус: 3-ий класс)
Ответ отправлен: 26.01.2008, 23:57 Оценка за ответ: 3 Комментарий оценки: Извините, но надо иногда просматривать ссылку "текущие ответы через web-интерфейс". Вы немного опоздали - уже даны более рациональные ответы и вся проблема обсуждена. К тому же ваше решение не особо отличается от уже данных. Так что уж не взыщите! Всего 3.
Отвечает: Genia007
Здравствуйте, Екатерина Ходеева!
procedure TForm1.Button6Click(Sender: TObject);
var s,s1: string; d: integer;
begin
s:=edit1.Text;
for d:= length(s)-1 downto 0 do
insert((copy(s,length(s)-d,1)),s1,0);
edit1.Text:=s1;
end;
Ответ отправил: Genia007 (статус: 5-ый класс)
Ответ отправлен: 27.01.2008, 15:12 Оценка за ответ: 3 Комментарий оценки: Смотрите иногда предыдущие ответы! Такой вариант уже был предложен!
Вопрос № 120.366
Здравствуйте уважаемые эксперты.
хочу написать программу, которая включала бы компьютер в определенное время. Есть идея реализовать это через биос, задавая там время включения. Подскажите пожалуйства как это сделаь.
Сделать такое как вы хотите реально, но аппаратно-зависимо. Есть такая программа Bilarm ((c) 2003 Гусаров А.Н.) - она это делает, но только для известных ей материнских плат.
Когда мне понадобилась такая функция для конкретной материнки (Asus A8N-SLI), то пришлось проводить поиск конкретных смещений в CMOS, где хранятся данные о будильнике - для этого нужна утилита, способная получать дамп CMOS - потом ставим разное время в BIOS и сравнивая, находим смещения и формаь хранения.
Обычно будильник входит в контрольную сумму и ее надо пересчитывать тоже (но за все платы не поручусь) - все познается анализом дампов.
Основная проблема - доступ к физической памяти, для этого нужен специальный динамически подгружаемый драйвер.
Ответ отправил: PavelGM (статус: Студент)
Ответ отправлен: 29.01.2008, 10:37
