Форум программистов, компьютерный форум CyberForum.ru

Text file - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Text file http://www.cyberforum.ru/cpp-beginners/thread300756.html
Здравствуйте. помогите программу переделать на Паскаль.
C++ Перестановка диагоналей в матрице Нужно переставить диагонали в матрице, сори если было не нашел: Вот тут написал уже кое-что: #include <iostream> #include <cstdlib> using namespace std; void change(int b, int N); const int n=5; http://www.cyberforum.ru/cpp-beginners/thread300750.html
непрямоугольная матрица C++
Всем доброго времени суток. Помогите, пожалуйста доделать прогу. Вот условие задачи: Дана динамическая непрямоугольная матрица. Рассортировать строки матрицы по возрастанию их средних значений. Вот код который у меня написан (там проблема с передачей в ф-цию AverageValueOfRow параметров, сейчас прога работает неправильно): #include <iostream> using namespace std; int* InitArray(int);...
C++ Элементы файла записать в список
Есть текстовый файл с некоторой информацией расположенной в виде таблицы. int main() { FILE *fi; int age; fi=fopen("text.txt","r"); Как информацию каждой "ячейки" таблицы записать соответственно в узлы однонаправленного связанного списка?
C++ Запись/чтение структуры через fstream http://www.cyberforum.ru/cpp-beginners/thread300745.html
Доброго времени суток! у меня есть несколько вопросов по поводу файловых потоков. 1. Как можно записать/прочитать массив структур в бинарный файл пользуясь fstreamом? (если можно пример маленький). 2. Если я , например , работаю с двусвязным списком (не через STL) я могу как ни будь сохранить его вместе с линками, что бы в следующий раз при запуске программе не пришлось строить его заново?...
C++ файлы в С++ 1)Создать текстовый файл, состоящий из 2-3 предложений. Определить количество слов в нем. 2)Вывести максимальное число из файла in.txt. подробнее

Показать сообщение отдельно
MerlinLegend
1 / 1 / 0
Регистрация: 11.04.2011
Сообщений: 109

Text file - C++

20.05.2011, 21:19. Просмотров 404. Ответов 0
Метки (Все метки)

Здравствуйте. помогите программу переделать на Паскаль.

puts("Ошибка! Используйте ./text1 filename N M");
puts("Где filename - название входного файла");
puts("Где M-макс.длина строки N-абзацный отступ");
clock=time(NULL);
fprintf(flog,"%s:Ошибка открытия входного файла\n",ctime(&clock));
clock=time(NULL);
fprintf(flog,"%s:Работа завершена\n",ctime(&clock));
fclose(flog);
puts("Нажмите Enter!");
getchar();
exit(0);
N=atoi(argv[2]);
M=atoi(argv[3]);
}

if(N<3 || N>10) N=8;
if(M<30 || M>100) M=60;
fprintf(flog,"%s:Неверно введены данные\n");

if ((fin=fopen(argv[1],"r"))==NULL)
{

clock=time(NULL);
fprintf(flog,"%s:Ошибка открытия входного файла %s\n",ctime(&clock),argv[1]);
fclose(flog);
puts("Ошибка открытия входного файла");
exit(0);
}
else
{
clock=time(NULL);
fprintf(flog,"%s:Входной файл %s открыт успешно\n",ctime(&clock),argv[1]);
}
if ((fout=fopen("out.txt","w"))==NULL)
{
clock=time(NULL);
fprintf(flog,"%s:Ошибка открытия выходного файла\n",ctime(&clock));
puts("Ошибка открытия выходного файла");
exit(0);
}
else
{
clock=time(NULL);
fprintf(flog,"%s:Выходной файл открыт успешно\n",ctime(&clock));
}
while (!feof(fin))
{
fgets(ch,298,fin);
clock=time(NULL);
kol_vo=strlen(ch);j=0;
if(strncmp(ch," ",3)==0){j=N;
for(i=1;i<=N-3;i++)
fprintf(fout," ");}


for(i=j;i<kol_vo;i++)
{fprintf(fout,"%c",ch[i]);if(((i%M)==0)&&i!=0)fprintf(fout,"\n");}




}

fprintf(flog,"%s:- out.txt\n",ctime(&clock),ch);
fclose(fin);
clock=time(NULL);
fprintf(flog,"%s:Входной файл закрыт\n",ctime(&clock));
fclose(fout);
clock=time(NULL);
fprintf(flog,"%s:Выходной файл закрыт\n",ctime(&clock));
clock=time(NULL);
fprintf(flog,"%s:Работа завершена\n",ctime(&clock));
fclose(flog);
puts("Нажмите Enter!");
getchar();
exit(0);
}
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru