디시인사이드 갤러리

갤러리 이슈박스, 최근방문 갤러리

갤러리 본문 영역

아 포트란 존내 어렵네.. 행렬 AB이거 곱왜 안될까..?

1212(119.17) 2011.10.25 01:39:32
조회 48 추천 0 댓글 0

     
      write(*,*) \'What is A matrix dimension? = m,n\'
 read(*,*) m,n
 write(*,*) \'What is B matrix dimension? = n,p\'
 read(*,*) n,p
      dimension a(m,n),b(n,p),c(m,p)

       do 20 i = 1, m
           do 10 j = 1, n
               read *, a(i,j)
   10      continue
   20  continue
 
      do 40 i = 1, n
           do 30 j = 1, p
               read *, b(n, p)
   30      continue
   40  continue
 
       do 70 i = 1, m
           do 60 j = 1, p
               c(m, p) = 0.0
               do 50 k = 1, 3
                   c(m, p) = c(m, p) + a(m, n) * b(n, p)
   50          continue
   60      continue
   70  continue

내가 하고싶은건 행렬 A 크기 처음에 받아서 dimiesion에 넣고
행렬 A m,n숫자값 다 받고
행렬 B n,p숫자값 다 받고
마지막으로 AB곱한 C행렬 구하고싶은데 이건 지금 인터넷에서 본거 수정작업들어간건데 미치도록 안대네.. 뒤에꺼 에러많이 난거 아는데
처음 dimension 값을 read로 받은 다음에 그걸 숫자로 인식 못하는것 같은데..
그럼 m이랑 n을 숫자취급을 해준다는 수식이 붙어야하는건가..?
제발 좀 도아줘 아놔 미치겠네..

추천 비추천

0

고정닉 0

0

댓글 영역

전체 댓글 0
등록순정렬 기준선택
본문 보기

하단 갤러리 리스트 영역

왼쪽 컨텐츠 영역

갤러리 리스트 영역

갤러리 리스트
번호 제목 글쓴이 작성일 조회 추천
설문 축의금 적게 내면 눈치 줄 것 같은 스타는? 운영자 24/11/11 - -
283989 근데 농협 사건 정말 북한 소행이라고 하고 넘어간거냐? ㅇㅇ(58.102) 11.10.27 46 0
283988 내가 근무중인 회사 빅바!갤로그로 이동합니다. 11.10.27 42 0
283987 정녕 내가 근무 하고 싶은 회사 [6] 이메지네이션(116.124) 11.10.27 89 0
283986 근무해 보고 싶은 회사 천회장(221.149) 11.10.27 50 0
283985 샘숭 온더 비치 [1] 빅바!갤로그로 이동합니다. 11.10.27 44 0
283984 저번주 병원에 입원 했는데 이메지네이션(116.124) 11.10.27 42 0
283982 아악~~ 내일이 삼성 sw 개발자 마감이랑께~~ [1] 거칠게갤로그로 이동합니다. 11.10.27 92 0
283981 샘숭에 들어가면 어르신들이 좋아하신다. 거칠게갤로그로 이동합니다. 11.10.27 81 0
283980 저축 왜함? 빅바!갤로그로 이동합니다. 11.10.27 30 0
283978 취직하고 싶다 [5] 천회장(221.149) 11.10.27 82 0
283977 여친도 없는데 이메지네이션(116.124) 11.10.27 33 0
283975 디비하니까 예전부터 고민하던거 [1] 빅바!갤로그로 이동합니다. 11.10.27 36 0
283974 웹프 공부 해볼겸해서 게시판이라도 만들어 운영해보려는데. [1] 거칠게갤로그로 이동합니다. 11.10.27 62 0
283973 샘성 sw 개발자 접수가 내일 끝난다 얼렁 접수해라~~ [2] 거칠게갤로그로 이동합니다. 11.10.27 66 0
283972 데꼬올 여자도 없으면 걍 싸구려 원룸 얻어도 돼 [1] 꼬꼬월드갤로그로 이동합니다. 11.10.27 62 0
283971 횽들 이거 간단한코드 하나만 봐주세요 ㅠㅠ [6] C갮초보(211.193) 11.10.27 68 0
283970 독립한횽들은 한달 생활비얼마나들어옇?? [2] 즐쿰갤로그로 이동합니다. 11.10.27 57 0
283969 재산 공개 합시다. [3] 이메지네이션(116.124) 11.10.27 88 0
283967 저축하니까 생각난건데 [1] Dawnwalkre갤로그로 이동합니다. 11.10.27 49 0
283966 누가 이거 프갤 버전으로 만들어봐 줄 수 없음요? ㅇㅇㅇ(121.144) 11.10.27 47 0
283964 프로젝트 막바지 1주일 남았습니다. [3] +어게인갤로그로 이동합니다. 11.10.27 82 0
283959 아 시발 개발하기 귀찮다 [5] 개쉛기갤로그로 이동합니다. 11.10.27 142 0
283958 MYSQL 오라클 ... 쿄스케갤로그로 이동합니다. 11.10.27 66 0
283957 횽들 자료구조 왜 배움? [2] 다림줄갤로그로 이동합니다. 11.10.27 83 0
283955 아 MYSQL 졸라 후졌어 -_- [4] 쿄스케갤로그로 이동합니다. 11.10.27 100 0
283953 제시카 [1] 이모군(175.114) 11.10.27 57 0
283952 나경원 깨졌군 이모군(175.114) 11.10.27 41 0
283951 아오 심심하구만 ㅋㅋ [3] 나리링갤로그로 이동합니다. 11.10.27 62 0
283950 모르는거 많이 물어봐도돼? [4] schizoid322갤로그로 이동합니다. 11.10.27 90 0
283949 아쉬벌레 얘는 프로그램도 못짜면서 왜자꾸 여기서 노는거임? [1] blackd갤로그로 이동합니다. 11.10.27 76 0
283948 횽들 나 이거 만드는데 두시간이나 걸렸는데 머리나쁜거임? [8] schizoid322갤로그로 이동합니다. 11.10.27 169 0
283946 초급자를 탈출하는 가장 첫 단계. [1] RR(218.54) 11.10.27 91 0
283944 근데 액티브X 없이 온라인게임 실행 가능함? [20] ㅇㅇㅇ(121.144) 11.10.27 181 0
283943 @blackd // 내가 dba는 아니고 한낱 웹개발자에 불과하지만 [7] monoless갤로그로 이동합니다. 11.10.27 146 0
283942 이걸 여기 물어봐도 되는지는 모르겠는데.. [5] schizoid322갤로그로 이동합니다. 11.10.27 67 0
283939 테러좀 도와줘요 형님들(119.197) 11.10.27 19 0
283938 C언어 파일입출력에 대해 질문있습니다ㅠㅠ [1] 늅늅이(220.70) 11.10.27 52 0
283937 mysql 콜룸형 질문좀.. [25] blackd갤로그로 이동합니다. 11.10.27 131 0
283936 C언어 초보입니다 size of 에 대해 [11] 눈팅2.6갤로그로 이동합니다. 11.10.27 136 0
283935 이게 참 이해가 안됨... [1] iljeomobolt갤로그로 이동합니다. 11.10.27 57 0
283934 Objective C 존나 병신같에... 1(121.182) 11.10.27 77 0
283932 재고 관리를 크롬에서 보도록 해놨어. [2] blackd갤로그로 이동합니다. 11.10.27 77 0
283931 마소는 인터넷으로 OS 업글하는 거 도입하려나? [1] 분당살람갤로그로 이동합니다. 11.10.27 50 0
283930 자바(이벤트처리)좀 도와주세요 ~!! 고수형아들ㅠ [4] Tachy갤로그로 이동합니다. 11.10.27 46 0
283929 프갤러님들아 제가 잠자는시간+약간의 휴식시간 빼고 전부 [29] 백수(218.147) 11.10.27 192 0
283928 나 간보는거면 Adelposs갤로그로 이동합니다. 11.10.27 50 0
283927 마이크레딧 서연화님은 봅니다. 다림줄갤로그로 이동합니다. 11.10.27 37 0
283926 헬로형은 봅니다 [3] Dawnwalkre갤로그로 이동합니다. 11.10.27 38 0
283924 깜박이는 함수 [3] 도와주십시오(124.136) 11.10.27 66 0
283921 좋은아침 굿출근 [1] AS3.0갤로그로 이동합니다. 11.10.27 28 0
갤러리 내부 검색
제목+내용게시물 정렬 옵션

오른쪽 컨텐츠 영역

실시간 베스트

1/8

뉴스

디시미디어

디시이슈

1/2