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

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
mashka4190
2 / 2 / 1
Регистрация: 02.12.2013
Сообщений: 175
#1

Заполнить одномерный массив по формуле - Turbo Pascal

02.12.2013, 17:01. Просмотров 561. Ответов 2
Метки нет (Все метки)

Заполнить одномерный массив a[1..10] по формуле: X[k+1]=ln(1+x[k]), x[0]=1
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.12.2013, 17:01
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Заполнить одномерный массив по формуле (Turbo Pascal):

Одномерный массив, заполнить и преобразовать по формуле - Turbo Pascal
Для заданного массива А(6), найти D=sqrt(a1^2+a2^2+..+a6^2) и получить массив В(6) по правилу: B=ai/D, i=1..6 ...

Одномерный массив. Вычисление по формуле - Turbo Pascal
Элементы вещественного массива X вычисляются по формуле X=1+(-1)n/n!, n=1,...,N. Напишите программу вычисления элементов массива: а) с...

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

Составить одномерный массив по формуле - Turbo Pascal
a={3.1;6.1;-0.2;-1.5;15} b={0.1;0.25;-4.1;-0.6;4.3} S = \sin \left(\sum_{i=1}^{5}({{a}_{i}+{b}_{i}})^{2}\right)

Одномерный массив. Заполнить массив из двенадцати элементов следующим образом: 1,2...12 - Turbo Pascal
Заполнить массив из двенадцати элементов следующим образом: 1,2...12

Заполнить линейный массив, элементы которого вычисляются по формуле - Turbo Pascal
Заполнить линейный массив, элементы которого вычисляются по формуле a=(5i!-d)/i!-1. Вычисление по формуле оформить процедурой

2
oanton
5 / 5 / 1
Регистрация: 03.10.2012
Сообщений: 41
02.12.2013, 17:19 #2
Не совсем понял задание.Так что ли?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
const
     n = 10;
var
    x: array [1..N] of real;
    k: integer;
Begin
     x[1]:=1;
     for k:=1 to n-1 do
     Begin
          X[k+1]:=ln(1+x[k]);
               writeln('x[',k,']=',x[k]);
     end;
     writeln('x[10]=',x[10]);
     readln;
End.
1
mashka4190
2 / 2 / 1
Регистрация: 02.12.2013
Сообщений: 175
02.12.2013, 17:22  [ТС] #3
Цитата Сообщение от oanton Посмотреть сообщение
Не совсем понял задание.Так что ли?
const
n = 10;
var
x: array [1..N] of real;
k: integer;
Begin
x[1]:=1;
for k:=1 to n-1 do
Begin
X[k+1]:=ln(1+x[k]);
writeln('x[',k,']=',x[k]);
end;
writeln('x[10]=',x[10]);
readln;
End.
да, спасибо)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.12.2013, 17:22
Привет! Вот еще темы с ответами:

Сформировать одномерный массив B(k) элементы которого вычисляются по формуле - Turbo Pascal
Сформировать одномерный массив B(k) элементы которого вычисляются по формуле zx=(s1+s2)/(k1+k2), где s1 и k1-сумма и количество чётных по...

Заполнить одномерный массив по правилу - Turbo Pascal
Заполнить одномерный массив В(n) так, чтобы каждый элемент с четным индексом был равен половине своего номера, а каждый элемент с нечетным...

Дан одномерный массив, выбрать из него элементы удовлетворяющие формуле - Turbo Pascal
Дан одномерный массив из n элементов, выбрать из него элементы удовлетворяющие формуле а=i+1, если таких элементов не найдется вывести...

Заполнить одномерный массив простыми числами - Turbo Pascal
Выручайте. На этом форуме неправильное решение


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

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

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