Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Interdust
0 / 0 / 0
Регистрация: 04.12.2015
Сообщений: 5
#1

Сформировать динамический массив А [1.n] по формуле - Pascal ABC

09.12.2015, 18:01. Просмотров 151. Ответов 1
Метки нет (Все метки)

Решите задачу на языке Паскаль.
Задно натуральное число n. Сформировать динамический массив А [1..n] по следующей
формуле:
http://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{i}\equiv \frac{1}{i!+1}
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.12.2015, 18:01
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Сформировать динамический массив А [1.n] по формуле (Pascal ABC):

Сформировать массив по формуле Yk=K*cos (Ak). Отсортировать массив по возрастанию - Pascal
Дан массив размера N. Сформировать массив Yn, каждый элемент которого определяется по формуле Yk=K*cos (Ak). Отсортировать массив Yk по...

Сформировать одномерный динамический массив - Pascal ABC
Разработать алгоритмы и программы решения задач: 1) сформировать одномерный динамический массив из разностей наибольших и наименьших...

Сформировать массив, каждый элемент которого вычисляется по формуле - Pascal ABC
Задан одномерный числовой массив (X) из 10 чисел. сформировать другой одномерный числовой массив (Y), каждый элемент которого вычисляется...

Сформировать массив Y (n), каждый элемент которого вычисляется по формуле Y (i) = X (i) + X (i + n) - Pascal ABC
Дан массив Х (2n). Сформировать масив Y (n), каждый элемент которого вычисляется по формуле Y (i) = X (i) + X (i + n), где и изменяется от...

Нужно сформировать массив, элементы которого исчисляются по формуле - Pascal
написал прогу, по формуле, но не уверен в правильности, да и прога не может провести потсчет результатов. " Нужно сформировать массив,...

Из заданного массива сформировать массив, который вычисляется по заданной формуле - Pascal ABC
задан одномерный массив из 10 чисел. сформировать другой массив, каждый элемент которого вычисляется по формуле {Y}_{i}=\frac{1}{\Pi...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3351 / 2338 / 1616
Регистрация: 05.06.2014
Сообщений: 11,088
10.12.2015, 12:42 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
const
  n_max = 100;
 
function factorial(n: integer): real;
var
  f: real;
  i: longint;
 
begin
  f := 1;
  for i := 2 to n do
    f := f * i;
  factorial := f
end;
 
type
  parray = ^array [1..n_max] of real;
 
var
  a: parray;
  i, n: integer;
 
begin
  readln(n);
  getmem(a, n * sizeof(real));
  for i := 1 to n do
  begin
    a^[i] := 1 / (Factorial(i) + 1);
    writeln(a^[i]);
  end;
  readln;
  freemem(a);
end.
Добавлено через 21 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Исправил:
{$R-} 
type
  PVector = ^TVector;
  TVector = Array[1.. 1] of Real;
 
var
  a: PVector;
  n, i: Integer;
 
function factorial(n: integer): real;
var
  f: real;
  i: longint;
begin
  f := 1;
  for i := 2 to n do
    f := f * i;
  factorial := f
end;
 
begin
  Write('n = '); ReadLn(n);
  GetMem(a, n * sizeof(Real));
  for i := 1 To n Do
  begin
    a^[i]:=1/(Factorial(i)+1);
    writeln(a^[i]);
  end;
  readln;
  FreeMem(a);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2015, 12:42
Привет! Вот еще темы с ответами:

Сформировать двумерный динамический массив и добавить в него строку с заданным номером - Pascal
2. Сформировать двумерный динамический массив. Добавить в него строку с заданным номером;

Сформировать другой одномерный числовой массив, каждый элемент которого вычисляется по формуле - Pascal ABC
Задан одномерный числовой массив (X) из 10 чисел. сформировать другой одномерный числовой массив (Y), каждый элемент которого вычисляется...

Сформировать "сглаженный" массив, заменив в исходном все элементы, кроме крайних, по формуле - Pascal ABC
Дан массив A, состоящий из n-элементов. Сформировать "сглаженный" массив, заменив в исходном все элементы, кроме крайних, по...

Сформировать матрицу по формуле - Pascal ABC
спасибо заранее 1){a}_{ij}=\frac{ln(i*j)+2,3}{ln(i)+ln(j+1)} 2){x}_{i}=min({a}_{ij})+max({a}_{ij}) j=\bar{1n} 3)...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru