akaGM
Platinum Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору non100p обрати внимание на свою и на мою (красную строчку), надеюсь всё станет ясно... Код: real*8 myZ real*8 zzz ZZZ = 500.3333458/1873.2547e-20 myZ = 500.3333458d+0/1873.2547d-20 write(*,*) 'ZZZ = ', ZZZ write(*,*) 'myZ = ', myZ end //maple 0.2670930684e20 //intel fortran 9.0 ZZZ = 2.670930567560901E+019 myZ = 2.670930684439228E+019 | Цитата: Не, ну что за манера, а! Если спрашиваю, то надо! | извини за манеры, вобще молчу... | Всего записей: 24056 | Зарегистр. 06-12-2002 | Отправлено: 16:54 10-11-2006 | Исправлено: akaGM, 20:32 17-01-2007 |
|