Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
HoocH r76
2 / 2 / 1
Регистрация: 21.09.2013
Сообщений: 34
#1

Вычислить выражение для заданных n, x - Pascal ABC

23.10.2013, 19:08. Просмотров 665. Ответов 6
Метки нет (Все метки)

Вычислить выражение для заданных n, x:
Название: af3f00a517a53f428f761703d05c0c64.jpg
Просмотров: 8

Размер: 2.4 Кб
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.10.2013, 19:08
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислить выражение для заданных n, x (Pascal ABC):

Вычислить выражение для заданных n, m, p, k; решить, используя процедуру
Помогите написать программу через процедуру, пожалуйста. Вот условия -...

Для заданных а и b, с вычислить z = max (min (a, b), с)
Решите,пожалуйста, задачу на языке Pascal ABC и составьте к ней блок-схему. ...

Для заданных чисел m и n вычислить число сочетаний
Пожалуйста, помогите решить задачу! Для заданных чисел m и n вычислить число...

Для заданных границ интегрирования a b вычислить значение определённого интеграла
Для заданных границ интегрирования а и b вычислите значение определенного...

Вычислить заданное выражение для типа integer
Используя оператор if, вычислить заданное выражение для типа integer B=2x-y+5...

Вычислить заданное целочисленное выражение для данных a, b в формате INTEGER
Вычислить заданное целочисленное выражение для данных a, b в формате INTEGER,...

6
VSI
Модератор
Эксперт по математике/физике
3893 / 3054 / 942
Регистрация: 30.07.2012
Сообщений: 8,501
23.10.2013, 19:26 #2
Держите...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
var x,y:real;
    k,n:integer;
    c:array[1..100] of real;
BEGIN
write('X = '); readln(x);
write('K = '); readln(k);
write('N = '); readln(n);
for k:=1 to n do
  c[k]:=random(1)+1;
y:=0;
for k:=1 to n do
  y:=y+power(x,k)/power(c[n],k);
writeln('Y = ',y:6:3)
END.
1
HoocH r76
2 / 2 / 1
Регистрация: 21.09.2013
Сообщений: 34
23.10.2013, 19:33  [ТС] #3
Спасибо большое.
0
L_e_g_i_o_n
100 / 100 / 86
Регистрация: 20.10.2013
Сообщений: 186
23.10.2013, 19:34 #4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var  x,n,i,k: integer;
      y: real;
function fact(n: integer): integer;
 var f:integer;
begin
f:=1;
for i:=2 to n do
f:= f*i;
Fact:=f;
end;
begin
read(x);
readln(n);
for k:=1 to n do
 y:=y+power(x,k)*fact(k)*fact(n-k)/fact(n);
 writeln('y= ',y);
end.
0
L_e_g_i_o_n
100 / 100 / 86
Регистрация: 20.10.2013
Сообщений: 186
23.10.2013, 19:42 #5
Число сочетаний из n по k вычисляется по формуле:
0
Изображения
 
L_e_g_i_o_n
100 / 100 / 86
Регистрация: 20.10.2013
Сообщений: 186
23.10.2013, 19:46 #6
Цитата Сообщение от VSI Посмотреть сообщение
for k:=1 to n do
* c[k]:=random(1)+1;
а почему здесь массив?
0
Denis3961
1 / 1 / 0
Регистрация: 21.09.2015
Сообщений: 41
13.06.2016, 16:26 #7
а можно этот же код только в c#
0
13.06.2016, 16:26
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.06.2016, 16:26
Привет! Вот еще темы с решениями:

Посчитать выражение при заданных значениях
Дано выражение B:= (w/v)+sqrt(abs((sin(t)*w)/cos(t)*v)) при w:=tg^2 t; v:=...

Используя оператор if, вычислить заданное выражение для данных типа Real
Помогите пожалуйста,если можно с устной пометкой) y=x^a\cdot \ln...

Используя оператор if, вычислить заданное выражение для данных типа Integer:
Используя оператор if, вычислить заданное выражение для данных типа Integer:

Используя оператор if, вычислить заданное выражение для данных типа Integer
Используя оператор if, вычислить заданное выражение для данных типа Integer:


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

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

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