Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.04.2011, 16:33   #1
Simak63
 
Регистрация: 30.03.2011
Сообщений: 7
Сообщение В текстовом файле найти максимальное число и после него числы полиндромы

Помогите пожалуйста

Вот код

Код:
#include <stdio.h>
#include <iostream.h>
#include <conio.h>
#include <fstream.h>

int main ()
{
clrscr();
FILE *f;
ofstream F;
int i,j,n,imax,max;
int *a;
f=fopen ("C:\\ABC.dat","rb");
F.open ("C:\\ABC1.txt",ios::out);
fread (&n, sizeof(int), 1, f);
cout << "n= "<<n<<"\n";
a = new int[n];
fread (a,sizeof(int),n,f);
cout<<"Ishodnyi massiv:"<<"\n";
for (i=0; i<n; i++)
{
cout<<a[i]<<"\t";
}
cout<<"\n";
cout <<"Modificirovannyi massiv:" << "\n";
imax=0;
max=a[0];
for (i=1;i<n;i++)
{
if (a[i]>max)
{
max=a[i];
imax=i;
}
}
cout <<"imax= "<<imax;
cout<<a[i]<<"\t";
F<<a[i]<<" ";
cout<<a[i]<<"\t";
F<<a[i]<<" ";
cout<<endl;
fclose (f);
F.close ();
delete []a;
getch ();
return 0;
}
Simak63 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти максимальное число в последовательности vladoscom93 Паскаль, Turbo Pascal, PascalABC.NET 11 14.12.2010 21:43
PHP (Вывести сколько раз встречается число 100 в текстовом файле) sinobithug Помощь студентам 2 24.11.2010 00:30
Поиск данных в текстовом файле (в самом файле! а не в Memo и не загружая всю инфу из файла в одну строку glagoff Помощь студентам 1 05.05.2010 13:00
Найти максимальное число.Паскаль. Karabas Паскаль, Turbo Pascal, PascalABC.NET 2 16.12.2008 21:13