Строчки поменять

> Вроде школьная задачка - есть файл .нужно сделать из него второй, где строки шли бы в обратном порядке (от последней в исходном файле к первой).

Мне почему-то сразу представился стек. Может как-то так и стоит делать?

NAME
tac - concatenate and print files in reverse

;)

в питоне читаешь строчки в лист foo и делаешь foo.reverse()

foo = open («test»)
bar = foo.readlines()
bar.reverse()
foo.close()

(define (reverse x)
  (define (reverse-iter src res)
    (cond ((null? src) res)
	  (else (reverse-iter (cdr src) (cons (car src) res )))))
  (reverse-iter x nil))

И будьте добры в Developement

господи, что это?

>в питоне читаешь строчки в лист foo и делаешь foo.reverse()
O_O

а потому будет, как недавно с iconv, что это больше 1Гб я не могу конвертнуть файлик.

Ох, лисперы

кто говорил, что файлик большой?

Ну, во-первых, это scheme :)
А во-вторых, в условии ничего не сказано про то, как делать :)

- кто говорил, что файлик большой? - удивленно спросили разработчики ICONV.
- ну да, кто-то говорил, что 640 Кб ОЗУ хватит всем.

Кстати, ты common lisp знаешь? А то тут вопросик есть (технический, но раз автор начал)

В условии ничего не сказано. Было бы сказано, придумал бы лучше

да понятно конечно, я ведь утрирую.

>Кстати, ты common lisp знаешь?

Нет, к моему сожалению.

Кажись, я уже сам нашел ответ.

#include <iostream>
#include <fstream>
#include <string>
#include <vector>

using namespace std;

int main(int argc, char **argv)
{
    string s;
    vector<string> v;
    if(argc >= 2)
    {
	ifstream fin;
	for(int i=1;i<argc;i++)
	{
	    fin.open(argv[i]);
	    if(!fin.is_open())
	    {
		cout << "Error. Can't open file\n";
		return 0;
	    }
	    while(!fin.eof())
	    {
		getline(fin,s);
		v.push_back(s);
	    }
	    fin.close();
	}
    }
    else while(!cin.eof())
	{
	    getline(cin,s);
	    v.push_back(s);
	}
        for(int j = v.size()-1; j>=0; j--)
	    cout << v[j] << endl;
    return 0;
}

В простейшем случае как-то так.

Хм, в mcedit форматирование куда более пристойное.

STL для такой ерунды? Путь Сиплюсплюсников. Кстати, не в jed текст писал?

<fat>это смайлик, или там и вправду стока скобок?</fat>

LISP — Lots of Idiotic Silly Parentheses

Но парсить для компьютера очень удобно

>STL для такой ерунды?

ну так количество строк же заранее неизвестно - нужен хороший контейнер

Ну ладно) В принципе да, нужен

>STL для такой ерунды? Путь Сиплюсплюсников.
Да, надо в лоркоде вводить тег [сарказм].

Кстати, не в jed текст писал?

unikoid>Хм, в mcedit форматирование куда более пристойное.

mcedit

На перле:

#!/usr/bin/perl
print reverse <>;

Ага, я просто не успел прочитать. Jed такое же форматирование дает

>>в питоне читаешь строчки в лист foo и делаешь foo.reverse()

O_O

А разве не логично? Как говорили классики в программировании главное - правильно выбрать тип данных

Лучший ответ!

>господи, что это?

Кыш, неверный!

>Первая созданная тема: 23.02.2006 16:24:17
ты штоаааа?..

А если файл будет на 2000 гигов? Почему все сразу пишут код который только и ждет чтоб заглючить, даже не подумав что за га*но они написали?

Повозмущайся, детка! Где написано, что файл большой?

Сразу срать, даже не подумав, твоё предназначение?

ну хоть кто то на православном лиспе...

Где в условие написано что размер файла ограничен? Сказано «файл», почему вы решили что файл больше чем 2000 гигов уже не относится к категории файлов?