Swanheart написал(а):

как вывести в строку переменную вещественного типа по формату e11.4

полнейший бред написан)

можно вопрос по конкретней поставить! ели я всёже правильно понял вопрос, то:
1       format (e11.4)
         write (*,1)a

a - некоторая переменная, вместо * можно поставить номер ранее открытого файла

Исправлено MikNix (12.03.09 02:18)

нее смысл в том что надо стравнивать всего 4 цифры мантиссы оч маленьких чисел...
можно это сделать через строки

Исправлено Swanheart (12.03.09 02:19)

Swanheart написал(а):

мда спасибо очень содержательные ответы...просто тупо присваивание в символьную переменную вещественной не работает...причем мне надо тока четыре знач цифры

какой вопрос - такой ответ...

я не понимаю, что за бред ты пишешь, если тебе надо 4 значащих цифры, а предоставляешь нам формат представления в экспоненциальной форме?

давай ты все же напишешь вопрос(задачу) корректнее и подробнее...

А нельзя просто вычесть и посмотреть, на сколько порядков разность отличается от меньшего из исходных чисел? Если больше, чем на 4, то значит их можно считать ранвыми при выводе таблицы. Ну там ещё покопаться, потестить.

В пр выч, кстати, много всяких фишек. Если сделаешь их без подсказки препода, получишь доп баллы) Ну это вы наверно и так знаете.

всё-всё, молчу)

Swanheart, ну, ждем-с тогда

Swanheart, молодец... а вывод-то дашь? чего в этих строках находится

вау)) порчитала Бритча наконец-то))

Swanheart, бугаг)

в общем суть в чем:
выводится таблица значений в формате E10.4, т.е. всего 10 символов, 4 значащих (например 0.1234Е+12).
при таком формате могут возникнуть проблеммы, т.е. 2 числа близких по значению, отличающиеся в 5 разряде например будут выглядеть одинаково (числа 0.12345000000 и 0.12346000000 будут выглядеть как 0.1234Е-Х). Вот собсно для их сравнения и поиска какие же числа будут выглядеть одинаково при форматном выводе используется

Swanheart написал(а):

character *11 st1,st2
     key=0
     write(st1(1:11),'(E11.4)') x
     write(st2(1:11),'(E11.4)') y
     if(st1.eq.st2) key=1

ибо никак подругому их не сравнить :)