Π€ΡΠ½ΠΊΡΠΈΡ sqr() pascal.
sqr() pascal.
ΠΠ²Π°Π΄ΡΠ°Ρ ΡΠΈΡΠ»Π° Π² ΠΠ°ΡΠΊΠ°Π»Π΅: ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
Read pascal Π΄Π»Ρ Π²Π²ΠΎΠ΄Π° Π² ΠΌΠ°ΡΡΠΈΠ², ΠΏΡΠΈΠΌΠ΅Ρ.
Read pascal Π΄Π»Ρ Π²Π²ΠΎΠ΄Π° Π² ΠΌΠ°ΡΡΠΈΠ², ΠΏΡΠΈΠΌΠ΅Ρ.
ΠΠ»Ρ Π²Π²ΠΎΠ΄Π° ΡΠΈΡΠ΅Π» Π² ΠΌΠ°ΡΡΠΈΠ² Π»ΡΡΡΠ΅ ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
ΠΠΎΠ΄ΡΡΠΈΡΠ°ΡΡ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ ΠΎΡΡΠΈΡΠ°ΡΠ΅Π»ΡΠ½ΡΡ ΠΈ ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΡΡ ΡΠ»Π΅ΠΌΠ΅Π½ΡΠΎΠ² ΠΌΠ°ΡΡΠΈΠ²Π°, Π·Π°Π΄Π°Π½Π½ΠΎΠ³ΠΎ Π΄Π°ΡΡΠΈΠΊΠΎΠΌ ΡΠ»ΡΡΠ°ΠΉΠ½ΡΡ ΡΠΈΡΠ΅Π». ΠΠ°ΡΠΊΠ°Π»Ρ.
ΠΠΎΠ΄ΡΡΠΈΡΠ°ΡΡ ΠΊΠΎΠ»ΠΈΡΠ΅ΡΡΠ²ΠΎ ΠΎΡΡΠΈΡΠ°ΡΠ΅Π»ΡΠ½ΡΡ
ΠΈ ΠΏΠΎΠ»ΠΎΠΆΠΈΡΠ΅Π»ΡΠ½ΡΡ
ΡΠ»Π΅ΠΌΠ΅Π½ΡΠΎΠ² ΠΌΠ°ΡΡΠΈΠ²Π°, Π·Π°Π΄Π°Π½Π½ΠΎΠ³ΠΎ Π΄Π°ΡΡΠΈΠΊΠΎΠΌ ΡΠ»ΡΡΠ°ΠΉΠ½ΡΡ
ΡΠΈΡΠ΅Π». ΠΠ°ΡΠΊΠ°Π»Ρ.
ΠΠΎΠ΄ΡΠΎΠ±Π½ΡΠΉ ΠΊΠΎΠ΄, Π±Π΅Π· ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
ΠΠ²ΠΎΠ΄ ΠΌΠ°ΡΡΠΈΠ²Π° Π² ΠΠ°ΡΠΊΠ°Π»Π΅ Ρ ΠΊΠ»Π°Π²ΠΈΠ°ΡΡΡΡ.
ΠΠ²ΠΎΠ΄ ΠΌΠ°ΡΡΠΈΠ²Π° Π² ΠΠ°ΡΠΊΠ°Π»Π΅ Ρ ΠΊΠ»Π°Π²ΠΈΠ°ΡΡΡΡ. ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
ΠΠ°ΡΡΠΈΠ² Π² ΠΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
ΠΠ°ΡΡΠΈΠ² Π² ΠΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
ΠΠ°ΡΡΠΈΠ² — Π½Π°Π±ΠΎΡ ΡΠ»Π΅ΠΌΠ΅Π½ΡΠΎΠ², ΠΊΠΎΡΠΎΡΡΠ΅ ΠΎΠ±ΡΠ°Π·ΡΡΡ ΡΠΎΠ²ΠΎΠΊΡΠΏΠ½ΠΎΡΡΡ ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
ΠΡΠ²ΠΎΠ΄ ΠΌΠ°ΡΡΠΈΠ²Π° Π² ΠΏΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
ΠΡΠ²ΠΎΠ΄ ΠΌΠ°ΡΡΠΈΠ²Π° Π² ΠΏΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
Π ΠΌΠ°ΡΡΠΈΠ²Π΅ Π΄ΠΎΡΡΡΠΏ ΠΊ ΠΊΠ°ΠΆΠ΄ΠΎΠΌΡ ΡΠ»Π΅ΠΌΠ΅Π½ΡΡ ΠΌΠ°ΡΡΠΈΠ²Π° ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
ΠΠ°ΠΊ Π² ΠΠ°ΡΠΊΠ°Π»Π΅ Π·Π°ΠΏΠΈΡΠ°ΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ?
ΠΠ°ΠΊ Π² ΠΠ°ΡΠΊΠ°Π»Π΅ Π·Π°ΠΏΠΈΡΠ°ΡΡ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ?
Π‘Π»Π΅Π²Π° ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ, Π·Π°ΡΠ΅ΠΌ Π΄Π²ΠΎΠ΅ΡΠΎΡΠΈΠ΅ ΠΈ Π·Π½Π°ΠΊ ΡΠ°Π²Π΅Π½ΡΡΠ²Π°, ΠΏΠΎΡΠΎΠΌ Π½ΠΎΠ²ΠΎΠ΅ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ.
ΠΡΡΡΡ i_Num ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½Π°Ρ, ΡΠΎΠ³Π΄Π°
i_Num :=45;
Pascal (ΠΠ°ΡΠΊΠ°Π»Ρ). ΠΡΡΠΈΡΠ»ΠΈΡΡ ΠΏΠ΅ΡΠΈΠΌΠ΅ΡΡ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΈΠΊΠ° ΡΠΎ ΡΡΠΎΡΠΎΠ½Π°ΠΌΠΈ A,B.
Pascal (ΠΠ°ΡΠΊΠ°Π»Ρ). ΠΡΡΠΈΡΠ»ΠΈΡΡ ΠΏΠ΅ΡΠΈΠΌΠ΅ΡΡ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΈΠΊΠ° ΡΠΎ ΡΡΠΎΡΠΎΠ½Π°ΠΌΠΈ A,B.
ΠΠ΅ΡΠΈΠΌΠ΅ΡΡ ΡΠ°Π²Π΅Π½ ΡΡΠΌΠΌΠ΅ Π²ΡΠ΅Ρ
ΡΡΠΎΡΠΎΠ½ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΈΠΊΠ°. ΠΡΠ»ΠΈ A ΠΈ B — ΡΡΠΎΡΠΎΠ½Ρ ΠΏΡΡΠΌΠΎΡΠ³ΠΎΠ»ΡΠ½ΠΈΠΊΠ°, ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
Π€ΡΠ½ΠΊΡΠΈΡ inc (A, B), dec (A, B) Π² ΠΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
Π€ΡΠ½ΠΊΡΠΈΡ inc (A, B), dec (A, B) Π² ΠΠ°ΡΠΊΠ°Π»Π΅ (Pascal).
Π€ΡΠ½ΠΊΡΠΈΡ inc (A, B) — ΡΠ²Π΅Π»ΠΈΡΠΈΠ²Π°Π΅Ρ Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ A Π½Π° Π·Π½Π°ΡΠ΅Π½ΠΈΠ΅ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ B. ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »
Pascal (ΠΠ°ΡΠΊΠ°Π»Ρ). ΠΠ°Π½Ρ Π΄Π²Π° ΡΠΈΡΠ»Π°, Π½Π°ΠΉΡΠΈ Π½Π°ΠΈΠ±ΠΎΠ»ΡΡΠ΅Π΅ ΠΈΠ· Π½ΠΈΡ .
Pascal (ΠΠ°ΡΠΊΠ°Π»Ρ). ΠΠ°Π½Ρ Π΄Π²Π° ΡΠΈΡΠ»Π°, Π½Π°ΠΉΡΠΈ Π½Π°ΠΈΠ±ΠΎΠ»ΡΡΠ΅Π΅ ΠΈΠ· Π½ΠΈΡ .
ΠΠΎΠ΄: ΠΡΠΎΡΠΈΡΠ°ΡΡ ΠΎΡΡΠ°Π»ΡΠ½ΡΡ ΡΠ°ΡΡΡ Π·Π°ΠΏΠΈΡΠΈ »