Delphi для начинающих

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Delphi крестики-нолики написал крестики-нолики,но не работает,так сказать "интелект"(он выражен в подпрограмме opas) при таком варианте как у меня сейчас,он иногда не ставит нолик вообще,если opas не испольщовать,то ход всегда есть,но он "глупый" в opas`e написаны все возможные варианты опасностей,и выберется из нех последний вариант,чтобы у компа можно было выиграть пишу это три часа уже,может взгляд со... https://www.cyberforum.ru/ delphi-beginners/ thread328866.html	delphi-компоненты Delphi обясните как написать... используя компоненты Edit, SpinEdit и StringGrid создать проект для решения следующей задачи. если введена последовательность чисел образует арифметическую прогрессию, то найти произведение n членов этой прогрессии, в противном случае-упорядочить элементы последовательности в в нисходящем порядке.
Delphi Максимально значение среди четных до первого нечетного Задан целочисленный массив a из n строк и m столбцов. Найти значение максимального элемента среди четных (по значению) элементов,расположенных до первого нечетного элемента. Матрицу расматривать по строкам. В случае отсутствия четных или нечетных элементов или невозможности поиска вывести соответствующие сообщения. https://www.cyberforum.ru/ delphi-beginners/ thread328846.html	Delphi Преобразование прописных букв в строчные Ребят, помогите пожалуйста срочно! Не могу найти решение этой задачи: Дана стока. Преобразовать в ней все прописные буквы в строчные. Вот алгоритм решения (диктовал препод): 1) Вводим символы в строку. 2) В цикле от 1 до length(s) выполняем следующий алгоритм: а) переводим символ s в код. б) к полученному коду прибавляем 32. в) полученное число переводим в символ. г) формируем... https://www.cyberforum.ru/ delphi-beginners/ thread328832.html
Обновление формы Delphi Ребят, нужна помощь, проблема вот в чём: На главной форме ставим FormStyle=fsMDIForm, создаём вторую форму, пишем FormStyle=fsMDIChild, на 1 форме создаём кнопку на создания второй формы-TForm2.Create(Self);,а какой код надо ставить на другую унопку чтобы 2 форма удалялась и заного создавалась, то есть обновлялась, или может по таймеру както сделать? Мне это надо, так как у меня на 1 форме...	Delphi Права администратор в win7 https://www.cyberforum.ru/ delphi-beginners/ thread328801.html Всем привет! Подскажите пожалуйста есть варианты стартануть в вин 7 с правами администратора. точнее интересует вопрос получения админских привилегий при старте приложения БЕЗ ЗАПРОСА у пользователя. Есть предложения?
Delphi Создать программу-конвертор, переводящую меры длины https://www.cyberforum.ru/ delphi-beginners/ thread328795.html Создать программу-конвертор, переводящая мера длины (метры-км, мили-км,см-дюйм и наоборот) Заранее спасибо	Delphi Копирование экземпляров класса Есть массив экземпляров некоторого класса. Мне нужно скопировать его в другой массив или тот же самый массив. Простое присваивание приводит к тому, что в дальнейшем изменяя один объект, изменяется и тот, который его копия. Есть вариант просто создать новый и присвоить ему свойства старого. Но свойств у него очень много, писать долго. Если вариантов нет, то конечно придётся. А если есть, то...
Delphi алгоритм упрожнения с acm Пытаюсь решить задачу http://acm.timus.ru/problem.aspx?space=1&num=1005 Подскажите, в чем ошибка? program Stones; {$APPTYPE CONSOLE} uses SysUtils; var https://www.cyberforum.ru/ delphi-beginners/ thread328724.html	Delphi Подсчитать в каждой строке введенные с клавиатуры символы.(Пожалуйста) https://www.cyberforum.ru/ delphi-beginners/ thread328643.html В задаче требуется: Подсчитать в каждой строке введенные с клавиатуры символы. Никак не могу составить, помогите пожалуйста. Добавлено через 33 секунды решение нужно выполнить в Делфи
Работа с Image Delphi Все доброго времени суток.........есть форма с Borderstyle=bsnone на ней есть Image который закреплен за нижним правым углом, картинка у него загружается при onCreate формы, и Image принимает размеры картинки загружаемой при onCreate. Как сделать так что бы к примеру( картинка 12х12 смотрится нормально в правом нижнем углу, а если загрузить картинку 75х75 она выходит ха границы формы, как сделать...	Delphi Нужен совет по саперу https://www.cyberforum.ru/ delphi-beginners/ thread328571.html Помогите пожалуйста с сапером, вопрос жизни и смерти. Есть работающая программа, но ее надо переделать так, чтобы бомбы расставлялись после первого нажатия, т.е. при первом нажатии нельзя было попасть на бомбу. Буду очень благодарен!

Волшебник

656 / 259 / 88

Регистрация: 18.12.2010

Сообщений: 545

02.07.2011, 20:33

построить массив A = (ai) элементы которого задаются формулой: аі=(1+1/2+...+1/і)/ і!, (і=1,2,...,n) - Delphi - Ответ 1813229

02.07.2011, 20:33. Показов 1293. Ответов 7

Метки (Все метки)

Ответ

Сообщение от natalo4ka

как сделать???

Примерно так:

Сначало обявим 2 функции.
1 - факториал (тут проблем думаю не будет)
2 - вычисление твоего выражения (аі=(1+1/2+...+1/і)/ і!, (і=1,2,...,n)) для заданного i (тут тоже проблем нет)

Delphi

Function Fact(n : Integer) : LongInt;
  Begin
    If n <= 1 Then
      Fact := 1
    Else
      Fact := n * Fact(n - 1);
  End;
 
Function AddCells(n:Integer):Real;
Var
  i:Integer;
Begin
Result:=0;
  For i:=1 To n Do
    Begin
      Result:=(Result + 1/i)/Fact(i);
    End;
End;

И собственно все заполнение сведется к записи такой штуки

Delphi

Var
  A:Array[1..n] Of Real;
Begin
***
 
For i:=1 To n Do A[i]:=AddCells(i);
 
***
End.

как вывести на экран думаю знаете)

Вернуться к обсуждению:
построить массив A = (ai) элементы которого задаются формулой: аі=(1+1/2+...+1/і)/ і!, (і=1,2,...,n) Delphi

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

02.07.2011, 20:33

Готовые ответы и решения:

Массив: Получить массив, элементы которого задаются генератором случайных чисел в диапазоне от 1 до 40.
Нужен одномерный массив, который задается генератором рандомных чисел в диапазоне от 1 до 40, числа...

Массив: Сформировать новый массив C, элементы которого вычисляются формулой...
Даны массивы A и B размера N. Задача: сформировать и напечатать новый массив C того же размера N,...

Сформировать одномерный массив, элементы которого определяются формулой
Составьте программу с использованием указанного метода сортировки. Необходимо сформировать...

Выведите на печать двумерный массив, элементы которого определяются формулой
выведите на печать двумерный числовой массив А(i,j)элементы которого определяются формулой...

	02.07.2011, 20:33

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

02.07.2011, 20:33

Помогаю со студенческими работами здесь

Вывести на печать двумерный числовой массив C, элементы которого определяются формулой C(i,j)=A(j)/(1+|B(i) |)
Даны два одномерных массива A(n) и B(m). Вывести на печать двумерный числовой массив C(n,m),...

Вывести на печать двумерный числовой массив B, элементы которого определяются формулой A(i)-3*A(j)
Дан одномерный числовой массив A(n).Вывести на печать двумерный числовой массив B(n,n),элементы...

Вывести на печать двумерный числовой массив A(n,m), элементы которого определяются формулой: A(i,j)=i+2*j.
Вывести на печать двумерный числовой массив A(n,m), элементы которого определяются формулой:...

Построить массив, элементы которого соответствуют элементам y (i)
ребят помогите плиз срочно. сдаю экз. прогу нужно написать. вот задание дан масив у1,..у20....

Наверх