Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Программирование циклических вычислительных процессов Вычислить: Z=\sqrt{\frac{ln|1+x|}{|tg\frac{x}{2}|}}+\sqrt{|x|+{e}^{3x}} где х - больший корень квадратного уравнения a{x}^{2}+bx+c=0, если уравнение имеет решение и х=а, если действительных корней... https://www.cyberforum.ru/ pascalabc/ thread1269796.html Найти среднее арифметическое чисел, неравных заданному числу С Pascal ABC
Program SRARIFM; Var N, K, I: integer; S, SA: real; x: array of real; begin write (‘Введите границы интервала ’); readln (a, b); write (‘Введите кол-во элементов в массиве ’);...
Pascal ABC Для натурального числа n вычислить двойной факториал Пусть n натуральное число и пусть n!! означает 1*3*5*...*n для нечетного n и 2*4*...*n для четного n. Вычислить: {(-1)}^{n+1}n!! https://www.cyberforum.ru/ pascalabc/ thread1269726.html Pascal ABC В подпрограмме, находящейся в модуле, вычислить сумму всех целых чисел от A до B включительно https://www.cyberforum.ru/ pascalabc/ thread1269617.html
Опишите подпрограмму, находящуюся в модуле, вычисляющую сумму всех целых чисел от A до B включительно (A и B — целые). Если A > B, то вывести на экран 0. С помощью этой подпрограммы найти суммы чисел...
Сформировать одномерный массив, элементы которого являются членами ряда Pascal ABC
Необходимо сформировать одномерный массив, элементы которого являются членами ряда 1 + 1/2 + 2/3 + … + N-1/N. Элементы полученного массива отсортировать по возрастанию методом отбора.
Pascal ABC Движение, вращение, управление движением, управление вращением фигуры Написать программу, выполняющую четыре операции над графическим объектом("фигурой"):движение,вращение,управление движением,управление вращением Движение - перемещение фигуры в одном из 8ми... https://www.cyberforum.ru/ pascalabc/ thread1269422.html
Pascal ABC Создать матрицу заданного графа https://www.cyberforum.ru/ pascalabc/ thread1269329.html
пользователь вводит количество ребер, вершин графа, а программа должна создать матрицу этого графа
Заменить в массиве X значения тех элементов Xi, для который выполняется условие Pascal ABC
ПРи заданных X1,X2,....,Xn и Y1, Y2,...,Yn; заменить в массиве X значения тех элементов Xi, для который выполняется условие \left|Xi-Yi \right|<E значениями элементов Yi и подсчитать кол-во замен....
Pascal ABC Вывести все гласные буквы, которые входят в каждое слово Дан текст, состоящий из слов, содержащих только строчные русские буквы; между соседними словами – запятая, после последнего слова – точка. все гласные буквы, которые входят в каждое слово https://www.cyberforum.ru/ pascalabc/ thread1269288.html Pascal ABC Вывести на экран слова, содержащие одновременно буквы ‘а’ и ’о’ https://www.cyberforum.ru/ pascalabc/ thread1269287.html
Дан текст, состоящий из слов: между словами произвольное число пробелов, после последнего слова точка. Вывести на экран слова, содержащие одновременно буквы ‘а’ и ’о’
Pascal ABC Построить и напечатать множество, элементами которого являются встречающиеся в строке
Дана непустая строка символов. Требуется построить и напечатать множество, элементами которого являются встречающиеся в строке: буквы от ‘а ‘ до ‘ж’ и цифры от ‘4’ до ‘9’
Pascal ABC Вывести сумму денег, получаемую авиакомпанией от продажи билетов на рейс Три четверти пассажиров самолета имеют билеты второго класса стоимостью Х рублей каждый. Остальные пассажиры имеют билеты первого класса, которые стоят в два раза дороже билетов второго класса.... https://www.cyberforum.ru/ pascalabc/ thread1269228.html
903 / 751 / 833
Регистрация: 06.09.2013
Сообщений: 1,561
06.10.2014, 20:58 0

Написать рекурсивную функцию нахождения n-го члена прогрессии, суммы N первых членов прогрессии - Pascal ABC - Ответ 6688713

06.10.2014, 20:58. Показов 9485. Ответов 2
Метки (Все метки)

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

Решение

Цитата Сообщение от smv4 Посмотреть сообщение
1)нахождения n-го члена прогрессии
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
{ Даны первый член и знаменатель геометрической прогрессии. 
Написать рекурсивную функцию нахождения n-го члена прогрессии }
 
function Number(b1, q: real; n: word): real;
begin
  if n > 1 then result := Number(b1, q, n - 1) * q
  else begin 
    result := b1; 
    exit 
  end
end;
 
var
  b1, q: real;
  n: word;
  
begin
  write('Первый член: ');
  readln(b1);
  write('Знаменатель: ');
  readln(q);
  write('Введите номер n: ');
  readln(n);
  writeln;
  writeln(n, '-й член прогрессии: ', Number(b1, q, n))
end.


Вернуться к обсуждению:
Написать рекурсивную функцию нахождения n-го члена прогрессии, суммы N первых членов прогрессии Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.10.2014, 20:58
Готовые ответы и решения:

Описать рекурсивную функцию для нахождения n-го члена геометрической прогрессии по первому члену прогрессии
Описать рекурсивную функцию для нахождения n-го члена геометриче- ской прогрессии по первому члену...

Составить программу вычисления суммы m первых членов арифметич. прогрессии, если известны значения первого члена и разность арифметической прогрессии
прошу помиочь составить программу вычисления суммы 150 первых членов арифметической прогрессии если...

Написать рекурсивную функцию для нахождения n-го члена прогрессии
Помогите пожалуйста решить, а то я что то не понимаю. 9) 1. Даны первый член и разность...

Написать рекурсивную функцию нахождения n-го члена геометрической прогрессии
Здравствуйте, помогите, пожалуйста решить вот эти задачи: 1. Даны первый член и знаменатель...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.10.2014, 20:58

Написать рекурсивную функцию для нахождения n - го члена арифметическое прогрессии.
Даны первый член и разность арифметическое прогрессии. Написать рекурсивную функцию для нахождения...

Рекурсия: вывод и нахождения суммы первых N членов арифметической прогрессии, заданной формулой
2. Создать процедуру для вывода и нахождения суммы первых N членов арифметической прогрессии,...

Составить рекурсивную функцию вычисления n-го члена геометрической прогрессии
Составить рекурсивную функцию вычисления n-го члена геометрической 1, 2, … и вывести первые...

Составить рекурсивную функцию вычисления n-го члена арифметической прогрессии
Составить рекурсивную функцию вычисления n-го члена арифметической прогрессии 3, 7, … и вывести...

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