Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Напишите пропущенные команды ответьте на что можете на 5 и 6 номер если можете https://www.cyberforum.ru/ pascal/ thread1568056.html	Pascal Определить значения, которые будут содержаться во всех элементах матрицы, после выполнения фрагмента программы Задана целочисленная квадратная матрица со значениями, показанными на рисунке: Определить значения, которые будут содержаться во всех элементах матрицы, после выполнения следующего фрагмента: Var s,i,j: integer; A:array of integer;
Pascal Определите значения элементов массива https://www.cyberforum.ru/ pascal/ thread1568045.html Определите значения следующих элементов массива: 1\|3\|5\|7\|9 2\|4\|6\|8\|10 11\|13\|15\|17\|19 12\|14\|16\|18\|20 21\|23\|25\|27\|29 22\|24\|26\|28\|30 A=_____ ,	Pascal Составить блок-схему по заданному фрагменту программы блок схема нужна IF a=0 THEN Begin X:=l; Y:=l; End ELSE Begin X:=2; Y:=2; https://www.cyberforum.ru/ pascal/ thread1568016.html
Выберите правильный ответ по заданному фрагменту программы Pascal Дан фрагмент программы, обрабатывающей двухмерный массив A размера n×n. Выберите правильный ответ, когда данный алгоритм меняет местами: k:=1; for i:=1 to n do begin c:=A; A:=A;	Pascal Даны натуральные числа М и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N https://www.cyberforum.ru/ pascal/ thread1567923.html Даны натуральные числа М и N. Вывести старшую цифру дробной части и младшую цифру целой части числа M/N.Pascal
Pascal Найти значение суммы Пользователь вводит целое положительное число n. Найти значение суммы 1^1 + 2^2 + 3^3 + ... + n^n Вывести на экран таблицу всех значений суммы, которые не выходят за пределы диапазона типа longint. https://www.cyberforum.ru/ pascal/ thread1567884.html	*Процедуры и функции: решить через процедуры S=ax+by+cz. Pascal** Пожалуста помогите решить через процедуры S=ax+by+c*z.
Pascal В массиве определить количество элементов, которые при делении на 3 дают остаток 2 Ввести одномерный массив A из 11 элементов. Определить в нём количество тех элементов, которые при делении на 3 дают остаток 2. https://www.cyberforum.ru/ pascal/ thread1567606.html	Pascal В квадратной матрице переставить строки В квадратной матрице переставить строки так, чтобы количество ненулевых элементов в строках росла от первой строки до последней. https://www.cyberforum.ru/ pascal/ thread1567596.html
Укажите числовой диапазон: Pascal Укажите числовой диапазон: a) A:=random(61) b) B:=random(35) с) C:=random(14) d) B:=random(45) e) A:=random(28)	Pascal Арифметические действия с тремя матрицами Дано три матрицы:W,F,E. Найдите W+E*3F .помогите пожалуйста,сам не могу(:cry: https://www.cyberforum.ru/ pascal/ thread1567296.html

Puporev

Почетный модератор

64291 / 47589 / 32740

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

Сообщений: 115,181

01.11.2015, 14:37

При некоторых заданных x, N и E, определяемых вводом, вычислить: - Pascal - Ответ 8275996

01.11.2015, 14:37. Показов 2411. Ответов 1

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

Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal

var x,e,t,s:real;
    n,i:integer;
begin
write('x=');
readln(x);
write('n=');
readln(n);
t:=1;
s:=t;
for i:=1 to n do
 begin
  t:=t*x*x/(2*i*(2*i-1));
  s:=s+t;
 end;
writeln('При n=',n,' суммма=',s:0:4);
e:=0.0001;
n:=0;
t:=1;
s:=t;
while abs(t)>e do
 begin
  n:=n+1;
  t:=t*x*x/(2*n*(2*n-1));
  s:=s+t;
 end;
writeln('При точности e=0.0001 сумма=',s:0:4);
writeln('аналитически=',(exp(x)+exp(-x))/2:0:4);
end.

Вернуться к обсуждению:
При некоторых заданных x, N и E, определяемых вводом, вычислить: Pascal

Programming

Эксперт

94731 / 64177 / 26122

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

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

01.11.2015, 14:37

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

При некоторых заданных x, N и E, определяемых вводом, вычислить
При некоторых заданных x, N и E, определяемых вводом, вычислить: a)сумму N слагаемых заданного...

Вычислить выражение при заданных значениях - 2
Помогите пожалуйста с задачами::hysteric: f\left(y \right)={e}^{-z}*\left(\tan...

При некоторых заданных x, N и Е, определяемых вводом, вычислите сумму N слагаемых заданного вида
«Разработка программ с циклами» При некоторых заданных x, N и Е, определяемых вводом, вычислите...

При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N
При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида,...

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

01.11.2015, 14:37

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

При некоторых заданных x, N и E, определяемых вводом, вы- числите сумму N слагаемых заданного вида
При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида,...

При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида
При некоторых заданных x, N и E, определяемых вводом, вы-числите сумму N слагаемых заданного вида,...

Вычислить приближенное значение функции в некоторых заданных точках x
Требуется вычислить приближенное значение функции в некоторых заданных точках x на основе...

Вычислить значение у при заданных а и х
Вычислить значение у при заданных а и х Изображение

Наверх