Для гр.113_1-5_Информатика ч.2 / Лекции / Лекции_фортран_текст / Лекция 5

2­5@54 2:064K< 2?>2B>@5=85< 2B5;0 2F8:;0 27=0G5=85 2?0@0<5B@0 2F8:;0 2N2 2A@02=8205BAO 2A 2:>=5G=K< 27=0G5=85< 2M222,2 2:0: 2B>;L:> 2N2 2AB0=>28BLAO 21>;LH5 2M222,2 2F8:; 27025@H05BAO 2(2N2=2M222 2 2?>A;54=55 2?>2B>@5=85 2B5;0 2F8:;0)2.2

2 20@8D<5B8G5A:>< 2F8:;5 22>7<>6=K 2420 220@80=B0 287<5=5=8O 2AG5BG8:0 2(2?0@0<5B@0 2F8:;0)2:2 2?> 22>7@0AB0=8N 28 2?> 2C1K20=8N 27=0G5=8O.2 2!;54C5B 2B0:65 2>B<5B8BL,2 2GB> 2M212,2 2M222,2 2M232 2<>3CB 21KBL 20@8D<5B8G5A:8<8 22K@065=8O<8.2 2ﾧA;8 2H03 287<5=5=8O 2AG5BG8:0 2@025= 2M232=212,2 253> 2<>6=> 2>?CAB8BL,2 2B.25.2 2=0G0;> 2F8:;0 21C45B 270?8A0=> 2B0::2 2D2O2 2N2=2M212,2 2M222.2

2025@H05B 2F8:; 2>?5@0B>@ 2E2N2D2 2D2O2,2 270B5< 2C?@02;5=85 2?@>3@0<<>9 2?5@5405BAO 2=0 2A;54CNICN 270 2:>=F>< 2F8:;0 2AB@>:C.2

2D2O2 2 2M2 2 2N2=2M212,2 2M222,2 2M232 2 2 2 2 2 2 2!2 2=0G0;> 2F8:;0

2& & "ﾧ‑

2& & &

2M2 2 2E2N2D2 2D2O2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2!2 2:>=5F 2F8:;0

2D2O2 2 2M2 2 2N2=2M212,2 2M222,2 2M232 2 2 2 2 2 2 2!2 2=0G0;> 2F8:;0

2& & "ﾧ‑

2& & &

2M2 2 2C2O2N2T2I2N2U2E2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2!2 2:>=5F 2F8:;0

2D2O2 2 2M2 2 2N2=2M212,2 2M222,2 2M232 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2!2 2=0G0;> 2F8:;0

2& & "ﾧ‑

2& & &

2M2 2 2[2?>A;54=89 2>?5@0B>@ 2B5;0 2F8:;0]2 2 2 2!2 2:>=5F 2F8:;0

2> 22A5E 2B@5E 2A;CG0OE 2(2?.2 222.2 2 242.2)2 2M2 2 2<5B:0 2>?5@0B>@0 2(2F5;>5 2G8A;>)2,2 2:>B>@0O 24>;6=0 21KBL 2>48=0:>20 22 2=0G0;5 28 22 2:>=F5 2F8:;0 28 21KBL 2C=8:0;L=>9 22 2>4=>< 2<>4C;5 2?@>3@0<<K.2

2 2?.232 2F8:; 270:0=G8205BAO 2>?5@0B>@>< 2M2 2C2O2N2T2I2N2U2E2 2(2?5@.2 2A 30=3;.3 3 3?@>4>;68BL)3,3 3:>B>@K9 3O2;O5BAO 3?CABK< 3(3=5B 3=8:0:8E 3459AB289)3 38 34>;65= 31KBL 3>1O70B5;L=> 3A 3<5B:>9 3>?5@0B>@0,3 3C:07K20NI59 3:>=5F 3>?5@0B>@0 3F8:;0.3

3"01C;8@>20=85 3DC=:F88

3!0<K9 3@0A?@>AB@0=5==K9 3?@8<5@ 3F8:;8G5A:>3> 30;3>@8B<0 3 3B01C;8@>20=85 3DC=:F88,3 3:>340 3B@51C5BAO 3=5A:>;L:> 3@07 34;O 3@07=KE 37=0G5=89 3x3 3@0AAG8B0BL 37=0G5=8O 3DC=:F88 3y3(3x3)3,3 3B.35.3 3?> 3ACB8,3 3A>AB028BL 3B01;8FC 37=0G5=89 3DC=:F88 3=0 37040==>< 3?@><56CB:5 30@3C<5=B0 3x3.3 3 0AA<>B@8< 3MBC 37040GC 3=0 3?@8<5@5.3

33­@8<5@ 313.3 3KG8A;8BL 37=0G5=8O 3DC=:F88 3y3(3x3)3,3 35A;8 3x3 3>?@545;5= 3=0 3?@><56CB:5 3[303,313;313,303]3 3A 387<5=ONI8<AO 3H03>< 3?5@5<5==>9 3x3 3@02=K< 3h3=303,313.3

3

3

4;>:-4AE5<0 40;3>@8B<0:4

4 4

4­@>3@0<<0:4

4

4P4r4o4g4r4a4m4 4P4r4i4m4e4r4_414

4x414=404.414;4 4 4x424=414.404;4 4 4h4=404.414

4k4 4=4 4i4n4t4(4(4x424-4x414)4/4h4

4D4O4 4n4 4=4 414,4 4k4

4 4 4 4 4y4 4=4a4t4a4n4(4(414 4 4x4)4 4/4 4(414 4+4 4x4)4)4

4 4 4 4 4p4r4i4n4t4 4*4,4 x4=4 ,4x4,4 4 4y4=4 ,4y4

4 4 4 4 4x4 4=4 4x4+4 4h4

4E4N4D4 4D4O4

4p4r4i4n4t4 4*4,4 4 4k4=4 ,4k4

4e4n4d4

4

5­@028;0 58A?>;L7>20=8O 5>?5@0B>@0 5F8:;0

5=CB@8 5F8:;0 5=5;L7O 5?@8=C48B5;L=> 587<5=OBL 5?5@5<5==K5 5F8:;0 5N5,5 5M515,5 5M525,5 5M535.5