akaGM
Platinum Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору kkuuhhaa никакой идеи здесь нет, в виндах всю жизнь так, т.к. write(101,*) 10, 20 _всегда_ шлёт CR-LF если не просить обратное и никакого финального райта не требуется... и судя по всему, ты под Линем сидишь? Цитата: есть определённая специфика для фортрана | какая? "избавление" же от последнего райта более чем тривиально: do i = 1, N-1 write(101,*) i, " ", X(i) enddo write(101,*) N, " ", X(N), char(13), char(10) | Всего записей: 24055 | Зарегистр. 06-12-2002 | Отправлено: 20:11 18-07-2014 | Исправлено: akaGM, 20:46 18-07-2014 |
|