Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal для жука прога: uses crt,modul; type Tmass=arrayof integer; var a:Tmass;n,i:integer; begin clrscr; write('n=');readln(n); writeln('Ishod massiv'); https://www.cyberforum.ru/ turbo-pascal/ thread252610.html цикл с параметром Turbo Pascal
Ребят, помогите написать простенькую программку. условие. Составить текст программы для вычисление вырожения i/x+a/b (a,b,x вводится с клавы) при условии, что i увеличивается на 1 двадцать раз с шагом 1 и каждый последующий ответ цикла должен пребовлятся к предыдущему. окончательный ответ вывести за циклом т.е прогнать эту формулу 20 раз и все ответы сложить.
Turbo Pascal Модуль CRT. Программа по составленной программе. https://www.cyberforum.ru/ turbo-pascal/ thread252549.html
Работа предусматривает использование модуля CRT. Требуется изменить программу введя многооконный интерфейс. Надо в программе создать 3 окна: одно для вывода текста задания(№№№№№) и автора программы, второе – для ввода,отображения исходных данных, третье – для отображения результатов. При этом необходимо раскрасить экран и выбрать цвет символов. Переход между окнами осуществлять по нажатию на...
Turbo Pascal Рекуррентная формула https://www.cyberforum.ru/ turbo-pascal/ thread252541.html
Вот есть программа и рекуррентная формула и программа которая должна считать эту формулу, но считает неправильно http://www.cs-extra-exe.net.ru/Myxammedik/funkcija.jpg program lab4_oleg; var x,eps,u0,un,s:real; n:integer; f:text;
Turbo Pascal Вычисление n-ого члена последовательности по рекуррентной формуле
Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле:
Turbo Pascal Выделить подстроку длиной 5 символов, которая начинаеться с первой встретившейся в строке буквы "f" https://www.cyberforum.ru/ turbo-pascal/ thread252511.html
из заданой строки выделить подстроку длинной 5 символов (либо до конца строки, если осталось меньше), которая начинаеться с первой встретившейся в строке буквы "f". Распечатать эту подстроку или сообщение о том что ее нет. Добавлено через 11 минут решение через строковые процедуры и функции
Turbo Pascal Ввести строку латинских букв и цифр за которыми следует точка. Ввести строку латинских букв и цифр за которыми следует точка. Если точки в конце нет, продолжать ввод строки. Распечатать красным цветом гласные буквы(a,e,i,o), входящие в эту строку, синим цветом все цифры, а белым цветом остальные символы. Заранее спасибо! https://www.cyberforum.ru/ turbo-pascal/ thread252494.html Turbo Pascal Решить пример
(2*с/d+2)/(d-a*a-1)
Turbo Pascal Заполнить массив В(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатать зн https://www.cyberforum.ru/ turbo-pascal/ thread252429.html
Заполнить массив В(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатать значения четных значений элементов массива. Присвоить указателю адрес 10-го элемента, напечатать его значение, используя текущий базовый адрес сегмента и смещение с преобразованием в значение типа указатель. Заменить его содержимое на уменьшенное в...
Turbo Pascal Составьте программу вычисления количества размещений по формуле 26. Составьте программу вычисления количества размещений по формуле: R(n,m) =n!/(n-m)! .Вычисление факториалов числа оформить как рекурсивную функцию. https://www.cyberforum.ru/ turbo-pascal/ thread252412.html
строки, реализации функции Turbo Pascal
Всем привет. задача: Реализовать функцию instr из бэйсика в паскаль. Для примера нахождения количества вхождении подстроки b в строку a
Turbo Pascal В заданном массиве A(N) вычислите среднее геометрическое и среднее арифметическое значения для положительных элементов В заданном массиве A(N) вычислите среднее геометрическое и среднее арифметическое значения для положительных элементов. https://www.cyberforum.ru/ turbo-pascal/ thread252410.html
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
05.03.2011, 22:10 0

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле: - Turbo Pascal - Ответ 1424227

05.03.2011, 22:10. Показов 888. Ответов 1
Метки (Все метки)

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

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
function Rec(n:integer):longint;
begin
if n<3 then Rec:=1
else Rec:=Rec(n-1)*n+Rec(n-2);
end;
var i:integer;
begin
clrscr;
write('i=');
readln(i);
write(Rec(i));
readln
end.
Считает нормально до n=13.

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

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле:
заранее спасибо

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

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле: аi =i* аi-1 + аi-2
27. Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной...

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

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

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

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле:
Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной...

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

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

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