ΠΠ°ΡΡΠΈΠ² ΠΊΠΎΠΌΠΏΠ»Π΅ΠΊΡΠ½ΡΡ ΡΠΈΡΠ΅Π»
ΠΠ±ΡΡΠ²Π»Π΅Π½ΠΈΠ΅, Π·Π°ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΈ ΡΡΠ΅Π½ΠΈΠ΅ ΠΌΠ°ΡΡΠΈΠ²Π° Π·Π½Π°ΡΠ΅Π½ΠΈΠΉ ΡΠΈΠΏΠ° ΠΊΠΎΠΌΠΏΠ». ΠΠ½ΠΈΠΌΠ°Ρ Π΅Π΄ΠΈΠ½ΠΈΡΠ° i ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΡΡ Π΄Π»Ρ Π·Π°Π΄Π°Π½ΠΈΡ Im-ΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½ΡΡ ΠΏΡΡΠΌΠΎ Π² ΠΏΡΠΈΡΠ²Π°ΠΈΠ²Π°Π½ΠΈΠΈ.
Π Π°Π·Π±ΠΎΡ
ΠΠ±ΡΡΠ²Π»Π΅Π½ΠΈΠ΅
ΠΊΠΎΠΌΠΏΠ» ΡΠ°Π± arr[0:4]
ΠΠ°ΡΡΠΈΠ² ΠΈΠ· 5 ΠΊΠΎΠΌΠΏΠ»Π΅ΠΊΡΠ½ΡΡ ΡΠΈΡΠ΅Π» Ρ ΠΈΠ½Π΄Π΅ΠΊΡΠ°ΠΌΠΈ ΠΎΡ 0 Π΄ΠΎ 4.
ΠΠ°ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ i
Π½Ρ Π΄Π»Ρ j ΠΎΡ 0 Π΄ΠΎ 4
arr[j] := j * 1.5 + 4.1 * i * j
ΠΊΡ
ΠΡΡΠ°ΠΆΠ΅Π½ΠΈΠ΅ 4.1 * i * j Π²ΡΡΠΈΡΠ»ΡΠ΅Ρ ΠΌΠ½ΠΈΠΌΡΡ ΡΠΎΡΡΠ°Π²Π»ΡΡΡΡΡ ΡΠ΅ΡΠ΅Π· ΠΌΠ½ΠΈΠΌΡΡ Π΅Π΄ΠΈΠ½ΠΈΡΡ i. ΠΠΏΠ΅ΡΠ°ΡΠΎΡ * ΡΠ°Π±ΠΎΡΠ°Π΅Ρ Π½Π°Π΄ ΠΊΠΎΠΌΠΏΠ» ΠΈ Π²Π΅Ρ Ρ Π°Π²ΡΠΎΠΌΠ°ΡΠΈΡΠ΅ΡΠΊΠΈΠΌ ΠΊΠ°ΡΡΠΎΠΌ.
Π§ΡΠ΅Π½ΠΈΠ΅
Π½Ρ Π΄Π»Ρ j ΠΎΡ 0 Π΄ΠΎ 4
Π²ΡΠ²ΠΎΠ΄ "arr[", j, "]: Re=", Re(arr[j]), " Im=", Im(arr[j]), Π½Ρ
ΠΊΡ
arr[j] ΠΏΠ΅ΡΠ΅Π΄Π°ΡΡΡΡ Π² Re/Im ΠΊΠ°ΠΊ Π°ΡΠ³ΡΠΌΠ΅Π½Ρ ΡΠΈΠΏΠ° ΠΊΠΎΠΌΠΏΠ».
ΠΠΎΠ»Π½Π°Ρ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠ°
ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΡ ΠΠΎΠΌΠΏΠ»Π΅ΠΊΡΠ½ΡΠ΅ ΡΠΈΡΠ»Π°
Π°Π»Π³ main
Π½Π°Ρ
ΠΊΠΎΠΌΠΏΠ» ΡΠ°Π± arr[0:4]
ΡΠ΅Π» j
Π²Π΅Ρ x
Π½Ρ Π΄Π»Ρ j ΠΎΡ 0 Π΄ΠΎ 4
x := j * 1.5
arr[j] := x + 4.1 * i * j
ΠΊΡ
Π½Ρ Π΄Π»Ρ j ΠΎΡ 0 Π΄ΠΎ 4
Π²ΡΠ²ΠΎΠ΄ "arr[", j, "]: Re=", Re(arr[j]), " Im=", Im(arr[j]), Π½Ρ
ΠΊΡ
ΠΊΠΎΠ½