| ²é¿´: 425 | »Ø¸´: 1 | |||
| µ±Ç°Ö÷ÌâÒѾ´æµµ¡£ | |||
zyj8119ľ³æ (ÖøÃûдÊÖ)
|
[½»Á÷]
¡¾ÇóÖú¡¿FORTRAN 90³ÌÐòÎÊÌ⡾Òѽâ¾ö¡¿ ÒÑÓÐ1È˲ÎÓë
|
||
|
PROGRAM array_section IMPLICIT NONE INTEGER,DIMENSION(3,4)::p INTEGER,DIMENSION(5)::u=(/3,2,1,4,3/) p=RESHAPE((/1,2,3,4,5,6,7,8,9,10,11,12/),(/3,4/)) PRINT'(5I3)',p(1:3:2,1:4:2) PRINT'(I3)',SIZE(p(u(1:5:4),u(2:5:3))) END PROGRAM array_section Õâ¸ö³ÌÐòÊä³öµÄµÚÒ»ÐÐΪʲôÊÇ 1 3 7 9£¿£¿ [ Last edited by jjdg on 2010-4-22 at 03:37 ] |
» ²ÂÄãϲ»¶
²ÄÁÏÇóµ÷¼Á Ò»Ö¾Ô¸¹þ¹¤´ó×Ü·Ö298·Ö£¬Ç°Èý¿Æ223·Ö
ÒѾÓÐ5È˻ظ´
085600 286·Ö ²ÄÁÏÇóµ÷¼Á
ÒѾÓÐ6È˻ظ´
086502»¯Ñ§¹¤³Ì342Çóµ÷¼Á
ÒѾÓÐ4È˻ظ´
²ÄÁÏÇóµ÷¼ÁÒ»Ö¾Ô¸¹þ¹¤´ó324
ÒѾÓÐ7È˻ظ´
328Çóµ÷¼Á
ÒѾÓÐ7È˻ظ´
340Çóµ÷¼Á
ÒѾÓÐ5È˻ظ´
Ò»Ö¾Ô¸Äϲý´óѧ324Çóµ÷¼Á
ÒѾÓÐ4È˻ظ´
Çóµ÷¼ÁÍÆ¼ö ²ÄÁÏ 304
ÒѾÓÐ15È˻ظ´
291Çóµ÷¼Á
ÒѾÓÐ19È˻ظ´
331»·¾³¿ÆÑ§Ó빤³ÌÇóµ÷¼Á
ÒѾÓÐ3È˻ظ´

zyj8119
ľ³æ (ÖøÃûдÊÖ)
- Ó¦Öú: 65 (³õÖÐÉú)
- ¹ó±ö: 0.003
- ½ð±Ò: 915.1
- É¢½ð: 1440
- ºì»¨: 35
- Ìû×Ó: 2936
- ÔÚÏß: 1329.4Сʱ
- ³æºÅ: 664177
- ×¢²á: 2008-11-29
- ÐÔ±ð: GG
- רҵ: ÀíÂۺͼÆË㻯ѧ

2Â¥2010-04-21 20:56:34














»Ø¸´´ËÂ¥