|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.04.2009, 21:40 | #1 |
Пользователь
Регистрация: 27.11.2008
Сообщений: 16
|
Найдите ошибку пожалуйста..рекурсия
#include <iostream.h>
#include <fstream.h> #include <math.h> #include <conio.h> int n; int s,sum,d,q; fstream l; int PrTab=-1; void InpF() { ifstream q; q.open("C:\\BORLANDC\\1.txt"); q>>n; d=n; //cout<<n; q.close(); } void OutF() { ofstream p; p.open("C:\\BORLANDC\\2.txt"); p<<s; cout<<s; p.close(); } int Cikl(int n) { int j,i=2; cout<<"'"<<n<<"'"; if (n==1) { s+=1; return 1; } else { //i++; if (i<) { cout<<"\n"<<n<<"->"; PrTab++; for (q;q<PrTab;q++) l<<'\t'; l<<"Open Cikl\n"; while (i!=n) { s+=Cikl(n/i); cout<<"||"<<i<<"||"; cout<<s<<'!'; i++; if (i>d) { PrTab--; //cout<<PrTab; for (q;q<rTab;q++) l<<'\t'; l<<"Close Cikl\n"; return 1; } } PrTab--; //cout<<PrTab; for (q;q<rTab;q++) l<<'\t'; l<<"Close Cikl\n"; } else cout<<"i bolshe d"; return n; } } void main() { clrscr(); s; l.open("C:\\BORLANDC\\protokol.txt" ,ios:ut); InpF(); Cikl(n); OutF(); l.close(); } ошибка при расчете формулы вроде...я ее не могу найти вот задание http://files.mail.ru/2XYNHI |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
найдите ошибку | Сова | Паскаль, Turbo Pascal, PascalABC.NET | 9 | 11.02.2009 18:46 |
НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ | svetah | Помощь студентам | 8 | 03.12.2008 15:19 |
Найдите Ошибку. Работа с файлами | Lord_Rufus | Помощь студентам | 2 | 03.10.2008 11:44 |
Найдите ошибку! | geniy | JavaScript, Ajax | 4 | 04.12.2007 16:22 |