( ) 1 Windows HTML ( ) ( ) ( ) WWW 10 ( )

Size: px

Start display at page:

Download "( ) 1 Windows HTML ( ) ( ) ( ) WWW 10 ( )"

ともなりほがり
4 years ago
Views:

1 ( ) 1 Windows HTML ( ) ( ) ( ) WWW 10 ( )

2 3. ( ) Windows MS Word MS Excel 1. MS Word MS Excel

3 WWW(World Wide Web) WWW ( ) 4.1 WWW Internet Explorer( IE ) IE 3

4 (telnet ) WWW ( ) Telnet (2 ) kdeve ( kdeve ) login: Passwd: ( kdeve kdeve ) sg046@kdeve% ( ) 4

5 kdeve (... ) ( ) EUC OK exit ( exit ) session 4.3 mule test.txt sg046@kdeve% mule test.txt <--- test.txt x c y mule (mule ) sg046@kdeve% mailx sg046 <test.txt mailx sg046 (sg046 kdeve ) < test.txt kdeve kdeve 5

6 % mailx kdeve kj (kojirakawa) k j yamagata-u ac academy jp (japan) % mailx gunji@tkyosf1.phys.s.u-tokyo.ac.jp <mail.dat mule canna sg046@kdeve% mailx q ( ) 4.4 ftp ftp ftp Windows MS-DOS C:\WINDOWS>A: A\> ftp kdeve kdeve telnet FTP> (mule ) get put get put test.txt test1.txt FTP>get test.txt test1.txt 6

7 test.txt test1.txt FTP>put test.txt test1.txt mule Word put get binary ftp 5 WWW 2 ( Word ) HTML HTML WWW 5.1 WWW (Word HTML Word ) <HTML> <HEAD> <TITLE> 7

8 </TITLE> </HEAD> <BODY> </BODY> </HTML> <TILTE> </TITLE> <BODY> </BODY> Plain Text Explorer <HTML> </HTML> <BODY> </BODY> HTML <HTML> </HTML> HTML <BODY> </BODY> HTML HTML Explorer 5.2 HTML <BODY> </BODY> <BODY> <BODY> 2 <BODY> </BODY> 1 2 <BODY> </BODY> <BR> <BODY> </BODY> 1 8

9 2 3 <BR> <BR> <BODY> </BODY> <H1> 1 </H1><BR> <H2> 2 </H2><BR> <H3> 3 </H3><BR> <H4> 4 </H4> <H1> </H1> <HR> 1 <HR> <BLINK> 1 </BLINK> 1 <BLINK> </BLINK> 9

10 <A HREF=" ~phys/phys.html"> </A> phys/phys.html </A> <UL> <li> 1 <li> 2 <li> 3 </UL> <IMG SRC="test.gif"> test.gif GIF JPEG PICT ( ) 6 Fortran ( )? C 10

11 6.1 program program Windows program program Windows cd cd program program mule temp.f mule temp.f (.f ) mule (mule ) ( sauce source ) sg046@kdeve% frt -o temp temp.f temp.f temp ( ) temp ( temp ) temp.f temp 11

12 sample1.f sample1 ( ) 6.2 ( ( ) ) TEST c c test c Write(6,*) TEST End 1 3 c c Write 7 72 Write 7 Write(6,*) TEST 6 7 End End Write End End END 12

13 TEST 2 a,b,c 3 a b 2 c c c sample c Implicit none Real a,b,c Write(6,*) a= Read(5,*)a Write(6,*) b= Read(5,*)b c=a+b Write(6,*) c=,c End Implicit none 7 5 a,b,c 3 Real 7,9 a= b= Read a 10 b 11 a b c = 12 Write(6,*) c=,c c= c End sample1.f sample2.f.f sample1.f sample1 sample2.f sample2 mule 1. c End 13

14 4. 5. Implicit none 6. Write(6,*) 7. (, ) Real a,b a b Write(6,*) c=,c c= c 8. Read(5,*) ( ) Read(5,*)a a 9. = 6.3 ( ) Do Do mule c c sample do c Implicit none Integer i Integer sum sum=0 Do i=1,100 sum=sum+i End do Write(6,*) sum=,sum End Integer i sum 2 sum Do 14

15 Do End do Do i 1 sum=sum+i sum (0) i (1) sum sum 1 End do Do i 2 sum=sum+i sum (1) i (2) Do 2 sum 3 i 100 Do i 100 Write sum i Do Write Integer (...) Do End do Do End do (Mule ) ( )(1+ +11)+(2+ +12)+ +( ) Do If If a b 2 If c c sample If_1 c Implicit none Real a,b Write(6,*) a= Read(5,*)a Write(6,*) b= Read(5,*)b If(a.gt.b) Then Write(6,*) a>b End If If(a.lt.b) Then Write(6,*) a<b End If If(a.eq.b) Then Write(6,*) a=b 15

16 End If End If If End If a b If() Then... End If If( )a b (Then) a>b.gt..ge..eq..ne..le..lt..gt..ge..eq..ne..le..lt. Do If Else c c sample If_2 c Implicit none Real a,b Write(6,*) a= Read(5,*)a Write(6,*) b= Read(5,*)b If(a.gt.b) Then Write(6,*) a>b Else if(a.lt.b) Then Write(6,*) a<b Else Write(6,*) a=b End If End Else If a b a>b a b a<b a=b c

17 c sample If_3 c Implicit none Real a,b Write(6,*) a= Read(5,*)a Write(6,*) b= Read(5,*)b If(a.gt.b) Then Write(6,*) a>b Else If(a.lt.b) Then Write(6,*) a<b Else Write(6,*) a=b End If End If End sample If 2 sample If 3 If Else If If If((a.ge.c).AND.(a.le.b)) Then Write(6,*) a=,a End If <---a c b a If((a.ge.c).OR.(a.le.b)) Then Write(6,*) a=,a End If <---a c b a ( ) success 3 fail goto goto If Do c

18 c sample goto1 c Implicit none Real a Write(6,*) a= Read(5,*)a 10 Continue a=a If(a.lt.1.0) Then goto 10 End If Write(6,*) a=,a End <---a a 1 goto continue goto goto Continue 2 Continue 7 ( ) (N ) N<2 n n goto Implicit none Implicit none Implicit none Implicit none Implicit none Real Integer i,j,k,l,m,n Implicit none 2 c c implicit c Write(6,*) a1= Read(5,*)a1 Write(6,*) a2= Read(5,*)a2 18

19 Write(6,*) a1+a2=,al+a2 <---!! End al+a2 1 Implicit none Implicit none (+,-,*,/) c c test_func c Implicit none Real a,b Write(6,*) a= Read(5,*)a b=sin(a) <---a sin Write(6,*) sin(a),b End sin sind log log10 sin sind log log10 10!! ( )x 2 = y e x/0.3 = y a(6) a(2,3) a(3,4,5) c

20 sin(a),cos(a),tan(a) sind(a),cosd(a),tand(a) asin(a),acos(a),atan(a) asind(a),acosd(a),atand(a) exp(a) log(a),log10(a) sqrt(a) max(a,b,c),min(a,b,c) mod(a,b) int(a) float(a) abs(a) a sin,cos,tan a a sin,cos,tan a sin,cos,tan a sin,cos,tan a e a log e a,log 10 a a a,b,c a/b a a a 1: c matrix c Implicit none Real a(2,2),b(2,2),c(2,2) < Integer i,j Do i=1,2 Do j=1,2 Read(5,*)a(j,i) End do End do Do i=1,2 Do j=1,2 Read(5,*)b(j,i) End do End do Do i=1,2 Do j=1,2 c(j,i)=a(j,i)+b(j,i) Write(6,*) c(,j,i, )=,c(j,i) End do End do 20

21 End ( ) gunji@kspirit UNIX exit ls more filename cd dirname pwd mkdir dirname rmdir dirname cp file1 file2 mv file1 file2 rm filename frt man finger grep keyword filename mailx talk telnet ftp lpr lprm lpq ( ) file1 file2 file1 file2 2: UNIX man 21

22 8.2 Mule CTRL-x CTRL-c CTRL-n CTRL-p CTRL-f CTRL-b CTRL-a CTRL-e CTRL-v ESC-v ESC-> ESC-< ESC-x goto-line CTRL-d CTRL-k CTRL-SPACE CTRL-w CTRL-y CTRL-s CTRL-r ESC-% CTRL-x i CTRL-x CTRL-w CTRL-x 2 CTRL-x o CTRL-x 1 CTRL-x CTRL-b CTRL-x b ( ) include 2 ( q ) 3: Mule CTRL- ESC- 8.3 canna canna canna Mule canna mule 22

23 mule test.dat o ( CTRL-o ) watashihahajimetenihongowotsukaimasu canna yatsunokanojyohaiijimaaininiteiruna CTRL f CTRL f 2 watashikamone CTRL i CTRL o canna CTRL o CTRL f CTRL b CTRL i CTRL o 4: canna CTRL o 8.4 (-2000-) 23

24 Fortran 77 24

n 第1章　章立ての部分は、書式(PC入門大見出し)を使います

n 第1章　章立ての部分は、書式(PC入門大見出し)を使います FORTRAN FORTRAN FORTRAN ) DO DO IF IF FORTRAN FORTRAN(FORmula TRANslator)1956 IBM FORTRAN IV FORTRAN77 Fortran90 FORTRAN77 FORTRAN FORTARN IF, DO C UNIX FORTRAN PASCAL COBOL PL/I BASIC Lisp PROLOG Lisp