Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Найти максимальный и минимальный элементы массива https://www.cyberforum.ru/ turbo-pascal/ thread1279291.html
Одномерный массив, состоящий из 9 элементов, заполнен случайными числами в диапазоне от 0 до 30. Найти максимальный и минимальный элементы массива. Помогите пожалуйста)))
Turbo Pascal Составить программу для вычисления значения функции. Проверка ,значение аргумента выбрать самостоятельно
Нужно в кротчайшие сроки, буду очень признателен. Заранее спасибо.
Turbo Pascal Заполнить массив случайными числами и вывести его в прямом и обратном порядке Написать программу, выполняющую заполнение массива из 10 элементов случайными числами, лежащими в пределах 0.0 до 1.0 с шагом 0.1 После заполнения весь массив вывести на дисплей в прямом и обратном... https://www.cyberforum.ru/ turbo-pascal/ thread1279266.html Turbo Pascal Подсчитать, сколько элементов последовательности делятся без остатка на 2 и на 5 Дана последовательность из N натуральных чисел. Подсчитать сколько элементов последовательности удовлетворяют условию ( a % 2==0 && a % 5==0 ) Помогите пожалуйста, я так понимаю тут надо написать все... https://www.cyberforum.ru/ turbo-pascal/ thread1279262.html
Turbo Pascal Найти все четырехзначные числа, не превосходящие заданного N
Помогите написать программу найти все четырехзначные числа , не превосходящие заданного N, цифры в которых образуют строго возрастающую последовательность 10^3<=N<10^4
Turbo Pascal Вывести на дисплей сообщения о значениях функции при различных значениях аргумента https://www.cyberforum.ru/ turbo-pascal/ thread1279187.html
Разработать программу, которая выводит на экран дисплея сообщения о значениях функции при различных значениях аргумента. Вид простейшего меню: введите номер функции: 2) y=sin(pi/2) 3) y=sin(pi/3)...
Turbo Pascal Решение нелинейных уравнений https://www.cyberforum.ru/ turbo-pascal/ thread1279179.html
1.Построить график функции. 2.Отделить каждый из корней функции f(x) определив для каждого из корней интервал, на котором этот корень гарантировано находится. f(x)=x6-15x4+45x2-14.5
Найти произведение трех наименьших элементов массива, используя программу ранжирования Turbo Pascal
Используя программу ранжирования, найти произведение 3-х наименьших элементов массива: Т= (-2,1,3,-4,2,0,1,-3,5) Распечатать массив до и после ранжирования.
Turbo Pascal Вывести наибольшую цифру числа https://www.cyberforum.ru/ turbo-pascal/ thread1279155.html
Дано n-значное число longint. Произвести с ним действия согласно номеру варианта, со-ставить алгоритм и программу. Вывести наибольшую цифру числа.
Turbo Pascal Выход за границы диапазона изменения индекса var df1,df2,df3:array of char; i,j,zx:byte; begin for i:=1 to 5 do read (df1,df2); for i:=1 to 50 do for j:=1 to 50 do if df1=df2 then begin df3:=df1; inc(zx); end; end. Подзадача: вывести... https://www.cyberforum.ru/ turbo-pascal/ thread1279146.html
Turbo Pascal Сколько клеток перечеркивает окружность
Дана окружность начерченная на листике в клетку. Считается, что окружность проходит через клетку, если клетка со- держит хотя бы одну точку окружности. Каждая клетка – это квад- рат со стороной,...
Turbo Pascal В выходной файл требуется вывести одно целое число — количество букв, которые Лёше нравятся https://www.cyberforum.ru/ turbo-pascal/ thread1279089.html
Имя входного файла: input.txt Имя выходного файла: output.txt Ограничение по времени: 1 секунда Ограничение по памяти: 256 мегабайт Совсем недавно Лёша начал изучать в школе английский язык. Как...
Модератор
9597 / 4921 / 3246
Регистрация: 17.08.2012
Сообщений: 15,357
20.10.2014, 01:04 0

Составить программу, которая реализует алгоритм вычисления суммы данного ряда - Turbo Pascal - Ответ 6742856

20.10.2014, 01:04. Показов 1400. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено TzilizT как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
const n = 10;
var k: integer;
    x, s: real;
begin
  write('x = ');
  readln(x);
  s := 0;
  for k := 1 to n do s := s + sqrt(k * x) * cos(k * x);
  writeln('s = ', s:0:6);
  readln
end.


Вернуться к обсуждению:
Составить программу, которая реализует алгоритм вычисления суммы данного ряда Turbo Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.10.2014, 01:04
Готовые ответы и решения:

Составить программу для вычисления суммы данного ряда
Составить программу для вычисления суммы данного ряда, задано значение аргумента. Сумма ряда: ...

Составить алгоритм и программу вычисления суммы ряда.Справа от знака равенства дано для контроля математическое значения ряда
Прошу помогите решить Составить алгоритм и программу вычисления суммы ряда.Справа от знака...

Программа, реализующая алгоритм вычисления суммы данного ряда
Составьте программу, реализующую алгоритм вычисления суммы данного ряда. ...

Программа, реализующая алгоритм вычисления суммы данного ряда
Составьте программу, реализующую алгоритм вычисления суммы данного ряда. Записать результат работы...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.10.2014, 01:04
Помогаю со студенческими работами здесь

Составить алгоритм вычисления суммы и произведения ряда
Изобразить данную задачку в виде блок-схем. В общем,я сколько ни старался,ничего не вышло.Надеюсь...

Составить алгоритм вычисления суммы и произведения ряда
Составить алгоритм вычисления суммы и произведения ряда 1, корень кубический из 2, корень...

Составьте программу, реализующую алгоритм вычисления суммы данного ряда. Записать результат работы программы при заданн
Составьте программу, реализующую алгоритм вычисления суммы данного ряда. ...

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru