ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

(ื›ืจื˜ื™ืกื™ ื‘ืงืจื”)
(ืžื•ืงื“ืฉ ืœืฉื ื” ื”ื‘ื™ื ืœืื•ืžื™ืช ืฉืœ ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ืฉืœ ื™ืกื•ื“ื•ืช ื›ื™ืžื™ื™ื)
(ื”ื”ื•ืกืคื•ืช ื”ืื—ืจื•ื ื•ืช ื‘ื•ืฆืขื• ื‘-8 ื‘ืืคืจื™ืœ 2019. ืจืฉื™ืžืช ื”ืชื•ืกืคื•ืช ื ืžืฆืืช ืžื™ื“ ืžืชื—ืช ืœื’ื–ืจื”)

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ
(ื”ืคืจื— ืฉืœ ืžื ื“ืœื™ื™ื‘, ืžืงื•ืจ)

ืื ื™ ื–ื•ื›ืจ ืฉืขื‘ืจื ื• ืืช ื”ื‘ืจื•ื•ื–. ืืœื” ื”ื™ื• ืฉืœื•ืฉื” ืฉื™ืขื•ืจื™ื ื‘ื‘ืช ืื—ืช: ื’ื™ืื•ื’ืจืคื™ื”, ืžื“ืขื™ ื”ื˜ื‘ืข ื•ืจื•ืกื™ืช. ื‘ืฉื™ืขื•ืจ ืžื“ืขื™ื ืœืžื“ื• ื‘ืจื•ื•ื– ื‘ืชื•ืจ ื‘ืจื•ื•ื–, ืื™ืœื• ื›ื ืคื™ื™ื ื™ืฉ ืœื•, ืื™ืœื• ืจื’ืœื™ื™ื ื™ืฉ ืœื•, ืื™ืš ื”ื•ื ืฉื•ื—ื” ื•ื›ื•'. ื‘ืฉื™ืขื•ืจ ื’ื™ืื•ื’ืจืคื™ื”, ืื•ืชื• ื‘ืจื•ื•ื– ื ื—ืงืจ ื›ืชื•ืฉื‘ ื›ื“ื•ืจ ื”ืืจืฅ: ื”ื™ื” ืฆื•ืจืš ืœื”ืจืื•ืช ืขืœ ืžืคื” ื”ื™ื›ืŸ ื”ื•ื ื—ื™ ื•ืื™ืคื” ืœื. ื‘ืจื•ืกื™ืช, ืกืจืืคื™ืžื” ืคื˜ืจื•ื‘ื ื” ืœื™ืžื“ื” ืื•ืชื ื• ืœื›ืชื•ื‘ "u-t-k-a" ื•ืœืงืจื•ื ืžืฉื”ื• ืขืœ ื‘ืจื•ื•ื–ื™ื ืžื‘ืจื. ื‘ื“ืจืš ืื’ื‘ ื”ื™ื ื”ื•ื“ื™ืขื” ืœื ื• ืฉื‘ื’ืจืžื ื™ืช ื‘ืจื•ื•ื– ื–ื” ื›ื›ื”, ื•ื‘ืฆืจืคืชื™ืช ื›ื›ื”. ืื ื™ ื—ื•ืฉื‘ ืฉื–ื” ื ืงืจื ืื– "ื”ืฉื™ื˜ื” ื”ืžื•ืจื›ื‘ืช". ื‘ืื•ืคืŸ ื›ืœืœื™, ื”ื›ืœ ื™ืฆื "ื‘ื“ืจืš ืื’ื‘".

ื•ื ื™ืžื™ืŸ ืงืื‘ืจื™ืŸ, ืฉื ื™ ืงืคื˜ื ื™ื

ื‘ืฆื™ื˜ื•ื˜ ืœืขื™ืœ, ื•ื ื™ืžื™ืŸ ืงื•ื•ืจื™ืŸ ื”ืจืื” ื‘ืฆื•ืจื” ืžื•ืคืชื™ืช ืืช ื”ื—ืกืจื•ื ื•ืช ืฉืœ ืฉื™ื˜ืช ื”ื”ื•ืจืื” ื”ืžื•ืจื›ื‘ืช, ืื•ืœื ื‘ืžืงืจื™ื ืžืกื•ื™ืžื™ื (ืื•ืœื™ ื“ื™ ื ื“ื™ืจื™ื) ืžืจื›ื™ื‘ื™ื ืฉืœ ืฉื™ื˜ื” ื–ื• ืžื•ืฆื“ืงื™ื. ืžืงืจื” ืื—ื“ ื›ื–ื” ื”ื•ื ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ืฉืœ D.I. ืžื ื“ืœื™ื™ื‘ ื‘ืฉื™ืขื•ืจื™ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ. ื”ืžืฉื™ืžื” ืฉืœ ืื•ื˜ื•ืžืฆื™ื” ืชื•ื›ื ื” ืฉืœ ืคืขื•ืœื•ืช ื˜ื™ืคื•ืกื™ื•ืช ืขื ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ื‘ืจื•ืจื” ืœืชืœืžื™ื“ื™ ื‘ื™ืช ืกืคืจ ืฉื”ื—ืœื• ืœืœืžื•ื“ ื›ื™ืžื™ื”, ื•ืžื—ื•ืœืงืช ืœืžืฉื™ืžื•ืช ื›ื™ืžื™ื•ืช ื˜ื™ืคื•ืกื™ื•ืช ืจื‘ื•ืช. ื™ื—ื“ ืขื ื–ืืช, ื‘ืžืกื’ืจืช ืžื“ืขื™ ื”ืžื—ืฉื‘, ืžืฉื™ืžื” ื–ื• ืžืืคืฉืจืช ืœื ื• ืœื”ื“ื’ื™ื ื‘ืฆื•ืจื” ืคืฉื•ื˜ื” ืืช ืฉื™ื˜ืช ื›ืจื˜ื™ืกื™ ื”ื‘ืงืจื”, ืื•ืชื” ื ื™ืชืŸ ืœื™ื™ื—ืก ืœืชื›ื ื•ืช ื’ืจืคื™, ื”ืžื•ื‘ืŸ ื‘ืžื•ื‘ืŸ ื”ืจื—ื‘ ืฉืœ ื”ืžื™ืœื” ื›ืชื›ื ื•ืช ื‘ืืžืฆืขื•ืช ืืœืžื ื˜ื™ื ื’ืจืคื™ื™ื.

(8 ื‘ืืคืจื™ืœ 2019 ื‘ื•ืฆืขื• ืชื•ืกืคื•ืช:
ืชื•ืกืคืช 1: ื›ื™ืฆื“ ืคื•ืขืœ ืžื—ืฉื‘ื•ืŸ ื”ื›ื™ืžื™ื”
ื ืกืคื— 2: ื“ื•ื’ืžืื•ืช ืœืžืฉื™ืžื•ืช ืขื‘ื•ืจ ืžืกื ื ื™ื)

ื ืชื—ื™ืœ ื‘ืžืฉื™ืžื” ื”ื‘ืกื™ืกื™ืช. ื‘ืžืงืจื” ื”ืคืฉื•ื˜ ื‘ื™ื•ืชืจ, ื™ืฉ ืœื”ืฆื™ื’ ืืช ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ืขืœ ื”ืžืกืš ื‘ืฆื•ืจืช ื—ืœื•ืŸ, ื›ืืฉืจ ื‘ื›ืœ ืชื ื™ื”ื™ื” ื™ื™ืขื•ื“ ื›ื™ืžื™ ืฉืœ ื”ื™ืกื•ื“: H - ืžื™ืžืŸ, He - ื”ืœื™ื•ื ื•ื›ื•'. ืื ืกืžืŸ ื”ืขื›ื‘ืจ ืžืฆื‘ื™ืข ืขืœ ืชื, ื™ื™ืขื•ื“ ื”ืืœืžื ื˜ ื•ืžืกืคืจื• ืžื•ืฆื’ื™ื ื‘ืฉื“ื” ืžื™ื•ื—ื“ ื‘ื˜ื•ืคืก ืฉืœื ื•. ืื ื”ืžืฉืชืžืฉ ืœื•ื—ืฅ ืขืœ LMB, ื™ื™ืขื•ื“ื• ื•ืžืกืคืจื• ืฉืœ ืจื›ื™ื‘ ื ื‘ื—ืจ ื–ื” ื™ืฆื•ื™ื ื• ื‘ืฉื“ื” ืื—ืจ ื‘ื˜ื•ืคืก.

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

ื ื™ืชืŸ ืœืคืชื•ืจ ืืช ื”ื‘ืขื™ื” ื‘ืืžืฆืขื•ืช ื›ืœ ืฉืคื” ืื•ื ื™ื‘ืจืกืœื™ืช. ื ื™ืงื— ืืช ื“ืœืคื™-7 ื”ื™ืฉืŸ ื•ื”ืคืฉื•ื˜, ื”ืžื•ื‘ืŸ ื›ืžืขื˜ ืœื›ื•ืœื. ืื‘ืœ ืœืคื ื™ ื”ืชื›ื ื•ืช ื‘-PL, ื‘ื•ืื• ื ืฆื™ื™ืจ ืฉืชื™ ืชืžื•ื ื•ืช, ืœืžืฉืœ, ื‘ืคื•ื˜ื•ืฉื•ืค. ืจืืฉื™ืช, ื‘ื•ืื• ื ืฆื™ื™ืจ ืืช ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ื‘ืฆื•ืจื” ืฉืื ื• ืจื•ืฆื™ื ืœืจืื•ืช ืื•ืชื” ื‘ืชื•ื›ื ื™ืช. ืฉืžื•ืจ ืืช ื”ืชื•ืฆืื” ื‘ืงื•ื‘ืฅ ื’ืจืคื™ table01.bmp.

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

ืขื‘ื•ืจ ื”ืฆื™ื•ืจ ื”ืฉื ื™ ืื ื• ืžืฉืชืžืฉื™ื ื‘ืจืืฉื•ืŸ. ื ืžืœื ื‘ืจืฆืฃ ืืช ืชืื™ ื”ื˜ื‘ืœื”, ื ืงื™ื™ื ืžื›ืœ ื”ื’ืจืคื™ืงื”, ื‘ืฆื‘ืขื™ื ื™ื™ื—ื•ื“ื™ื™ื ื‘ืžื•ื“ืœ ื”ืฆื‘ืขื™ื RGB. R ื•-G ืชืžื™ื“ ื™ื”ื™ื• 0, ื•-B=1 ืœืžื™ืžืŸ, 2 ืœื”ืœื™ื•ื ื•ื›ื•'. ื”ืฉืจื˜ื•ื˜ ื”ื–ื” ื™ื”ื™ื” ื›ืจื˜ื™ืก ื”ื‘ืงืจื” ืฉืœื ื•, ืื•ืชื• ื ืฉืžื•ืจ ื‘ืงื•ื‘ืฅ ืฉื ืงืจื table2.bmp.

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

ื”ื•ืฉืœื ื”ืฉืœื‘ ื”ืจืืฉื•ืŸ ืฉืœ ืชื›ื ื•ืช ื’ืจืคื™ ื‘ืคื•ื˜ื•ืฉื•ืค. ื‘ื•ืื• ื ืขื‘ื•ืจ ืœืชื›ื ื•ืช GUI ื’ืจืคื™ ื‘-DELpi-7 IDE. ื›ื“ื™ ืœืขืฉื•ืช ื–ืืช, ืคืชื— ืคืจื•ื™ืงื˜ ื—ื“ืฉ, ืฉื‘ื• ื‘ื˜ื•ืคืก ื”ืจืืฉื™ ืื ื• ืžืฆื™ื‘ื™ื ื›ืคืชื•ืจ ื“ื•-ืฉื™ื— (tableDlg), ืฉื‘ื” ืชืชืงื™ื™ื ื”ืขื‘ื•ื“ื” ืขื ื”ืฉื•ืœื—ืŸ. ืœืื—ืจ ืžื›ืŸ ืื ื• ืขื•ื‘ื“ื™ื ืขื ื”ื˜ื•ืคืก tableDlg.

ื”ืฆื‘ ืจื›ื™ื‘ ืžื—ืœืงื” ื‘ื˜ื•ืคืก ื–ืžืŸ. ืื ื—ื ื• ืžืงื‘ืœื™ื Image1. ืฉื™ื ืœื‘ ืฉื‘ืื•ืคืŸ ื›ืœืœื™, ืขื‘ื•ืจ ืคืจื•ื™ืงื˜ื™ื ื’ื“ื•ืœื™ื, ื ื•ืฆืจื• ืื•ื˜ื•ืžื˜ื™ืช ืฉืžื•ืช ืฉืœ ื”ื˜ื•ืคืก ืชืžื•ื ื”Nืื™ืคื” N ื™ื›ื•ืœ ืœื”ื’ื™ืข ืœื›ืžื” ืขืฉืจื•ืช ืื• ื™ื•ืชืจ - ื–ื” ืœื ืกื’ื ื•ืŸ ื”ืชื›ื ื•ืช ื”ื˜ื•ื‘ ื‘ื™ื•ืชืจ, ื•ื™ืฉ ืœืชืช ืฉืžื•ืช ืžืฉืžืขื•ืชื™ื™ื ื™ื•ืชืจ. ืื‘ืœ ื‘ืคืจื•ื™ืงื˜ ื”ืงื˜ืŸ ืฉืœื ื•, ืื™ืคื” N ืœื ื™ืขืœื” ืขืœ 2, ืืชื” ื™ื›ื•ืœ ืœื”ืฉืื™ืจ ืื•ืชื• ื›ืคื™ ืฉื ื•ืฆืจ.

ืœืจื›ื•ืฉ ืชืžื•ื ื”1.ืชืžื•ื ื” ืœื”ืขืœื•ืช ืืช ื”ืงื•ื‘ืฅ table01.bmp. ืื ื—ื ื• ื™ื•ืฆืจื™ื Image2 ื•ื˜ืขืŸ ืืช ื›ืจื˜ื™ืก ื”ื‘ืงืจื” ืฉืœื ื• ืฉื table2.bmp. ื‘ืžืงืจื” ื–ื”, ืื ื• ื”ื•ืคื›ื™ื ืืช ื”ืงื•ื‘ืฅ ืœืงื˜ืŸ ื•ื‘ืœืชื™ ื ืจืื” ืœืžืฉืชืžืฉ, ื›ืคื™ ืฉืžื•ืฆื’ ื‘ืคื™ื ื” ื”ืฉืžืืœื™ืช ื”ืชื—ืชื•ื ื” ืฉืœ ื”ื˜ื•ืคืก. ืื ื• ืžื•ืกื™ืคื™ื ืจื›ื™ื‘ื™ ื‘ืงืจื” ื ื•ืกืคื™ื, ืฉืžื˜ืจืชื ื‘ืจื•ืจื”. ื”ืฉืœื‘ ื”ืฉื ื™ ืฉืœ ืชื›ื ื•ืช GUI ื’ืจืคื™ ื‘-DELpi-7 IDE ื”ื•ืฉืœื.

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

ื ืขื‘ื•ืจ ืœืฉืœื‘ ื”ืฉืœื™ืฉื™ - ื›ืชื™ื‘ืช ืงื•ื“ ื‘-DELpi-7 IDE. ื”ืžื•ื“ื•ืœ ืžื•ืจื›ื‘ ืžื—ืžื™ืฉื” ืžื˜ืคืœื™ ืื™ืจื•ืขื™ื ื‘ืœื‘ื“: ื™ืฆื™ืจืช ื˜ื•ืคืก (FormCreate), ืชื ื•ืขืช ื”ืกืžืŸ Image1 (Image1MouseMove), ืœื—ื™ืฆื” ืขืœ LMB ื‘ืชื (ืชืžื•ื ื” 1 ืงืœื™ืง) ื•ืฆื ืžืชื™ื‘ืช ื”ื“ื•-ืฉื™ื— ื‘ืืžืฆืขื•ืช ืœื—ืฆื ื™ ืื™ืฉื•ืจ (OKBtnClick) ืื• ื‘ื˜ืœ (CancelBtnClick). ื”ื›ื•ืชืจื•ืช ืฉืœ ื”ืžื˜ืคืœื™ื ื”ืœืœื• ื ื•ืฆืจื•ืช ื‘ืฆื•ืจื” ืกื˜ื ื“ืจื˜ื™ืช ื‘ืืžืฆืขื•ืช ื”-IDE.

ืงื•ื“ ืžืงื•ืจ ืžื•ื“ื•ืœ:

unit tableUnit;
// ะŸะตั€ะธะพะดะธั‡ะตัะบะฐั ั‚ะฐะฑะปะธั†ะฐ ั…ะธะผะธั‡ะตัะบะธั… ัะปะตะผะตะฝั‚ะพะฒ ะ”.ะ˜.ะœะตะฝะดะตะปะตะตะฒะฐ
//
// third112
// https://habr.com/ru/users/third112/
//
// ะžะณะปะฐะฒะปะตะฝะธะต
// 1) ัะพะทะดะฐะฝะธะต ั„ะพั€ะผั‹
// 2) ั€ะฐะฑะพั‚ะฐ ั ั‚ะฐะฑะปะธั†ะตะน: ัƒะบะฐะทะฐะฝะธะต ะธ ะฒั‹ะฑะพั€
// 3) ะฒั‹ั…ะพะด ะธะท ะดะธะฐะปะพะณะฐ

interface

uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, 
  Buttons, ExtCtrls;

const
 size = 104; // ั‡ะธัะปะพ ัะปะตะผะตะฝั‚ะพะฒ
 
type
 TtableDlg = class(TForm)
    OKBtn: TButton;
    CancelBtn: TButton;
    Bevel1: TBevel;
    Image1: TImage;  //ั‚ะฐะฑะปะธั†ะฐ ั…ะธะผะธั‡ะตัะบะธั… ัะปะตะผะตะฝั‚ะพะฒ
    Label1: TLabel;
    Image2: TImage;  //ัƒะฟั€ะฐะฒะปััŽั‰ะฐั ะบะฐั€ั‚ะฐ
    Label2: TLabel;
    Edit1: TEdit;
    procedure FormCreate(Sender: TObject); // ัะพะทะดะฐะฝะธะต ั„ะพั€ะผั‹
    procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);                        // ัƒะบะฐะทะฐะฝะธะต ะบะปะตั‚ะบะธ
    procedure Image1Click(Sender: TObject); // ะฒั‹ะฑะพั€ ะบะปะตั‚ะบะธ
    procedure OKBtnClick(Sender: TObject);  // OK
    procedure CancelBtnClick(Sender: TObject); // Cancel
  private
    { Private declarations }
    TableSymbols : array [1..size] of string [2]; // ะผะฐััะธะฒ ะพะฑะพะทะฝะฐั‡ะตะฝะธะน ัะปะตะผะตะฝั‚ะพะฒ
  public
    { Public declarations }
    selectedElement : string; // ะฒั‹ะฑั€ะฐะฝะฝั‹ะน ัะปะตะผะตะฝั‚
    currNo : integer;         // ั‚ะตะบัƒั‰ะธะน ะฝะพะผะตั€ ัะปะตะผะตะฝั‚ะฐ
  end;

var
  tableDlg: TtableDlg;

implementation

{$R *.dfm}

const
PeriodicTableStr1=
'HHeLiBeBCNOFNeNaMgAlSiPSClArKCaScTiVCrMnFeCoNiCuZnGaGeAsSeBrKrRbSrYZrNbMoTcRuRhPdAgCdInSnSbTeIXeCsBaLa';
PeriodicTableStr2='CePrNdPmSmEuGdTbDyHoErTmYbLu';
PeriodicTableStr3='HfTaWReOsIrPtAuHgTlPbBiPoAtRnFrRaAc';
PeriodicTableStr4='ThPaUNpPuAmCmBkCfEsFmMdNoLrKu ';

// ัะพะทะดะฐะฝะธะต ั„ะพั€ะผั‹  ==================================================

procedure TtableDlg.FormCreate(Sender: TObject);
// ัะพะทะดะฐะฝะธะต ั„ะพั€ะผั‹
var
  s : string;
  i,j : integer;
begin
  currNo := 0;
// ะธะฝะธั†ะธะฐะปะธะทะฐั†ะธั ะผะฐััะธะฒะฐ ะพะฑะพะทะฝะฐั‡ะตะฝะธะน ัะปะตะผะตะฝั‚ะพะฒ:
  s := PeriodicTableStr1+ PeriodicTableStr2+PeriodicTableStr3+PeriodicTableStr4;
  j := 1;
  for i :=1 to size do
   begin
     TableSymbols [i] := s[j];
     inc (j);
     if s [j] in ['a'..'z'] then
      begin
        TableSymbols [i] := TableSymbols [i]+ s [j];
        inc (j);
      end; // if s [j] in
   end; // for i :=1
end; // FormCreate ____________________________________________________

// ั€ะฐะฑะพั‚ะฐ ั ั‚ะฐะฑะปะธั†ะตะน: ัƒะบะฐะทะฐะฝะธะต ะธ ะฒั‹ะฑะพั€ =========================================

procedure TtableDlg.Image1MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
// ัƒะบะฐะทะฐะฝะธะต ะบะปะตั‚ะบะธ
var
  sl : integer;
begin
  sl := GetBValue(Image2.Canvas.Pixels [x,y]);
  if sl in [1..size] then
   begin
    Label1.Caption := intToStr (sl)+ ' '+TableSymbols [sl];
    currNo := sl;
   end
  else
    Label1.Caption := 'Select element:';
end; // Image1MouseMove   ____________________________________________________

procedure TtableDlg.Image1Click(Sender: TObject);
begin
  if currNo <> 0 then
   begin
    selectedElement := TableSymbols [currNo];
    Label2.Caption := intToStr (currNo)+ ' '+selectedElement+ ' selected';
    Edit1.Text := selectedElement;
   end;
end; // Image1Click  ____________________________________________________

// ะฒั‹ั…ะพะด ะธะท ะดะธะฐะปะพะณะฐ  ==================================================

procedure TtableDlg.OKBtnClick(Sender: TObject);
begin
    selectedElement := Edit1.Text;
    hide;
end;  // OKBtnClick ____________________________________________________

procedure TtableDlg.CancelBtnClick(Sender: TObject);
begin
  hide;
end;  // CancelBtnClick ____________________________________________________

end.

ื‘ื’ืจืกื” ืฉืœื ื•, ืœืงื—ื ื• ื˜ื‘ืœื” ืฉืœ 104 ืืœืžื ื˜ื™ื (ืงื‘ื•ืข ื’ื•ื“ืœ). ื‘ืจื•ืจ ืฉืืคืฉืจ ืœื”ื’ื“ื™ืœ ืืช ื”ื’ื•ื“ืœ ื”ื–ื”. ื™ื™ืขื•ื“ื™ ื™ืกื•ื“ (ืกืžืœื™ื ื›ื™ืžื™ื™ื) ื ื›ืชื‘ื™ื ืœืžืขืจืš ืกืžืœื™ ื˜ื‘ืœื”. ืขื ื–ืืช, ืžื˜ืขืžื™ ืงื•ืžืคืงื˜ื™ื•ืช ืฉืœ ืงื•ื“ ื”ืžืงื•ืจ, ื ืจืื” ืฉืžื•ืžืœืฅ ืœื›ืชื•ื‘ ืืช ืจืฆืฃ ื”ืกื™ืžื•ื ื™ื ื”ืœืœื• ื‘ืฆื•ืจื” ืฉืœ ืงื‘ื•ืขื™ ืžื—ืจื•ื–ืช PeriodicTableStr1..., PeriodicTableStr4ื›ืš ืฉื›ืืฉืจ ื”ื˜ื•ืคืก ื ื•ืฆืจ, ื”ืชื•ื›ื ื™ืช ืขืฆืžื” ืžืคื–ืจืช ืืช ื”ื™ื™ืขื•ื“ื™ื ื”ืœืœื• ื‘ื™ืŸ ืžืจื›ื™ื‘ื™ ื”ืžืขืจืš. ื›ืœ ื™ื™ืขื•ื“ ืืœืžื ื˜ ืžื•ืจื›ื‘ ืžืื•ืช ืœื˜ื™ื ื™ืช ืื—ืช ืื• ืฉืชื™ื™ื, ื›ืืฉืจ ื”ืื•ืช ื”ืจืืฉื•ื ื” ื”ื™ื ืื•ืช ื’ื“ื•ืœื” ื•ื”ืฉื ื™ื™ื” (ืื ื‘ื›ืœืœ) ืงื˜ื ื”. ื›ืœืœ ืคืฉื•ื˜ ื–ื” ืžื™ื•ืฉื ื‘ืขืช ื˜ืขื™ื ืช ืžืขืจืš. ืœืคื™ื›ืš, ื ื™ืชืŸ ืœื›ืชื•ื‘ ืืช ืจืฆืฃ ื”ืกื™ืžื•ื ื™ื ื‘ืฆื•ืจื” ืชืžืฆื™ืชื™ืช ืœืœื ืจื•ื•ื—ื™ื. ื—ืœื•ืงืช ืจืฆืฃ ืœืืจื‘ืขื” ื—ืœืงื™ื (ืงื‘ื•ืขื™ื PeriodicTableStr1..., PeriodicTableStr4) ื ื•ื‘ืข ืžืฉื™ืงื•ืœื™ื ืฉืœ ืงืœื•ืช ืงืจื™ืืช ืงื•ื“ ื”ืžืงื•ืจ, ืžื›ื™ื•ื•ืŸ ืงื• ืืจื•ืš ืžื“ื™ ืขืฉื•ื™ ืฉืœื ืœื”ืชืื™ื ืœื’ืžืจื™ ืขืœ ื”ืžืกืš.

ื›ืืฉืจ ืกืžืŸ ื”ืขื›ื‘ืจ ื ืข ืžืขืœ Image1 ืžื˜ืคืœ Image1MouseMove ืื™ืจื•ืข ื–ื” ืงื•ื‘ืข ืืช ื”ืขืจืš ืฉืœ ืจื›ื™ื‘ ื”ืฆื‘ืข ื”ื›ื—ื•ืœ ืฉืœ ืคื™ืงืกืœ ื›ืจื˜ื™ืก ื”ื‘ืงืจื” Image2 ืขื‘ื•ืจ ืงื•ืื•ืจื“ื™ื ื˜ื•ืช ื”ืกืžืŸ ื”ื ื•ื›ื—ื™ื•ืช. ืœืคื™ ื‘ื ื™ื™ื” Image2 ืขืจืš ื–ื” ืฉื•ื•ื” ืœืžืกืคืจ ื”ืืœืžื ื˜ ืื ื”ืกืžืŸ ื ืžืฆื ื‘ืชื•ืš ื”ืชื; ืืคืก ืื ืขืœ ื”ื’ื‘ื•ืœ, ื•-255 ื‘ืžืงืจื™ื ืื—ืจื™ื. ืฉืืจ ื”ืคืขื•ืœื•ืช ืฉืžื‘ืฆืขืช ื”ืชื•ื›ื ื™ืช ื”ืŸ ื˜ืจื™ื•ื•ื™ืืœื™ื•ืช ื•ืื™ื ืŸ ื“ื•ืจืฉื•ืช ื”ืกื‘ืจ.

ื‘ื ื•ืกืฃ ืœื˜ื›ื ื™ืงื•ืช ื”ืชื›ื ื•ืช ื”ืกื’ื ื•ื ื™ื•ืช ืฉืฆื•ื™ื ื• ืœืขื™ืœ, ื›ื“ืื™ ืœืฉื™ื ืœื‘ ืœืกื’ื ื•ืŸ ื”ืคืจืฉื ื•ืช. ื‘ืื•ืคืŸ ืงืคื“ื ื™, ื”ืงื•ื“ ืฉื ื“ื•ืŸ ื”ื•ื ื›ืœ ื›ืš ืงื˜ืŸ ื•ืคืฉื•ื˜ ืขื“ ืฉื”ื”ืขืจื•ืช ืœื ื ืจืื•ืช ื ื—ื•ืฆื•ืช ื‘ืžื™ื•ื—ื“. ืขื ื–ืืช, ื”ื ื ื•ืกืคื• ื’ื ืžืกื™ื‘ื•ืช ืžืชื•ื“ื•ืœื•ื’ื™ื•ืช - ื”ืงื•ื“ ื”ืงืฆืจ ืžืืคืฉืจ ืœื ื• ืœื”ืกื™ืง ื›ืžื” ืžืกืงื ื•ืช ื›ืœืœื™ื•ืช ื‘ืฆื•ืจื” ื‘ืจื•ืจื” ื™ื•ืชืจ. ื‘ืงื•ื“ ื”ืžื•ืฆื’ ืžื•ืฆื”ืจืช ืžื—ืœืงื” ืื—ืช (TtableDlg). ื ื™ืชืŸ ืœื”ื—ืœื™ืฃ ืฉื™ื˜ื•ืช ืฉืœ ืžื—ืœืงื” ื–ื• ื•ื–ื” ืœื ื™ืฉืคื™ืข ืขืœ ืชืคืงื•ื“ ื”ืชื•ื›ื ื™ืช ื‘ืฉื•ื ืฆื•ืจื”, ืืš ืขืฉื•ื™ ืœื”ืฉืคื™ืข ืขืœ ื”ืงืจื™ืื” ืฉืœื”. ืœื“ื•ื’ืžื”, ื“ืžื™ื™ื ื• ืืช ื”ืจืฆืฃ:

OKBtnClick, Image1MouseMove, FormCreate, Image1Click, CancelBtnClick.

ื–ื” ืื•ืœื™ ืœื ืžืื•ื“ ืžื•ืจื’ืฉ, ืื‘ืœ ื–ื” ื™ื”ืคื•ืš ืงืฆืช ื™ื•ืชืจ ืงืฉื” ืœืงืจื™ืื” ื•ืœื”ื‘ื ื”. ืื ืื™ืŸ ื—ืžืฉ, ืืœื ืขืฉืจื•ืช ืžื•ื ื™ื ื™ื•ืชืจ ืฉื™ื˜ื•ืช ื‘ืกืขื™ืฃ ื”ืคืขืœื” ื™ืฉ ืœื”ื ืกื“ืจ ืฉื•ื ื” ืœื—ืœื•ื˜ื™ืŸ ืžืืฉืจ ื‘ืชื™ืื•ืจื™ ื”ื›ื™ืชื”, ื•ืื– ื”ื›ืื•ืก ืจืง ื™ื’ื‘ืจ. ืœื›ืŸ, ืœืžืจื•ืช ืฉืงืฉื” ืœื”ื•ื›ื™ื— ื‘ืงืคื“ื ื•ืช ื•ืื•ืœื™ ืืคื™ืœื• ื‘ืœืชื™ ืืคืฉืจื™, ืืคืฉืจ ืœืงื•ื•ืช ืฉื”ื›ื ืกืช ืกื“ืจ ื ื•ืกืฃ ืชืฉืคืจ ืืช ืงืจื™ืื•ืช ื”ืงื•ื“. ื”ื–ืžื ื” ื ื•ืกืคืช ื–ื• ืžืชืืคืฉืจืช ืขืœ ื™ื“ื™ ืงื™ื‘ื•ืฅ ืœื•ื’ื™ ืฉืœ ืžืกืคืจ ืฉื™ื˜ื•ืช ื”ืžื‘ืฆืขื•ืช ืžืฉื™ืžื•ืช ืงืฉื•ืจื•ืช. ืœื›ืœ ืงื‘ื•ืฆื” ื™ืฉ ืœืชืช ื›ื•ืชืจืช, ืœืžืฉืœ:

// ั€ะฐะฑะพั‚ะฐ ั ั‚ะฐะฑะปะธั†ะตะน: ัƒะบะฐะทะฐะฝะธะต ะธ ะฒั‹ะฑะพั€

ื™ืฉ ืœื”ืขืชื™ืง ืืช ื”ื›ื•ืชืจื•ืช ื”ืœืœื• ืœืชื—ื™ืœืช ื”ืžื•ื“ื•ืœ ื•ืœืขืฆื‘ ืื•ืชืŸ ื›ืชื•ื›ืŸ ืขื ื™ื™ื ื™ื. ื‘ืžืงืจื™ื ืžืกื•ื™ืžื™ื ืฉืœ ืžื•ื“ื•ืœื™ื ืืจื•ื›ื™ื ืœืžื“ื™, ืชื•ื›ืŸ ืขื ื™ื™ื ื™ื ื›ื–ื” ืžืกืคืง ืืคืฉืจื•ื™ื•ืช ื ื™ื•ื•ื˜ ื ื•ืกืคื•ืช. ื‘ืื•ืคืŸ ื“ื•ืžื”, ื‘ื’ื•ืฃ ื”ืืจื•ืš ืฉืœ ืฉื™ื˜ื”, ื ื•ื”ืœ ืื• ืคื•ื ืงืฆื™ื” ืื—ืช, ื›ื“ืื™, ืจืืฉื™ืช, ืœืกืžืŸ ืืช ืกื•ืคื• ืฉืœ ื’ื•ืฃ ื–ื”:

end; // FormCreate

ื•ืฉื ื™ืช, ื‘ื”ืฆื”ืจื•ืช ืžืกื•ืขืคื•ืช ืขื ืกื•ื’ืจื™ื™ื ืฉืœ ืชื•ื›ื ื™ืช ืžืชื—ื™ืœ - ืกื•ืฃ, ืกืžืŸ ืืช ื”ื”ืฆื”ืจื” ืฉืืœื™ื” ืžืชื™ื™ื—ืก ื”ืกื•ื’ืจื™ื™ื ื”ืกื•ื’ืจื™ื:

      end; // if s [j] in
   end; // for i :=1
end; // FormCreate

ื›ื“ื™ ืœื”ื“ื’ื™ืฉ ืืช ื›ื•ืชืจื•ืช ื”ืงื‘ื•ืฆื•ืช ื•ืืช ื”ืงืฆื•ื•ืช ืฉืœ ื’ื•ืคื™ ื”ืฉื™ื˜ื”, ื ื™ืชืŸ ืœื”ื•ืกื™ืฃ ืฉื•ืจื•ืช ืืจื•ื›ื•ืช ืžืจื•ื‘ ื”ื”ืฆื”ืจื•ืช ื•ืžื•ืจื›ื‘ื•ืช, ืœืžืฉืœ, ืžื”ืชื•ื•ื™ื "=" ื•-"_", ื‘ื”ืชืืžื”.
ืฉื•ื‘, ืื ื—ื ื• ืฆืจื™ื›ื™ื ืœืขืฉื•ืช ื”ืกืชื™ื™ื’ื•ืช: ื”ื“ื•ื’ืžื” ืฉืœื ื• ืคืฉื•ื˜ื” ืžื“ื™. ื•ื›ืืฉืจ ื”ืงื•ื“ ืฉืœ ืฉื™ื˜ื” ืื™ื ื• ืžืชืื™ื ืœืžืกืš ืื—ื“, ื–ื” ื™ื›ื•ืœ ืœื”ื™ื•ืช ืงืฉื” ืœื”ื‘ื™ืŸ ืฉื™ืฉื” ืงืฆื•ื•ืช ืจืฆื•ืคื™ื ื›ื“ื™ ืœื‘ืฆืข ืฉื™ื ื•ื™ื™ื ื‘ืงื•ื“. ื‘ื›ืžื” ืžื”ื“ืจื™ื ื™ืฉื ื™ื, ืœืžืฉืœ, Pascal 8000 ืขื‘ื•ืจ OS IBM 360/370, ืขืžื•ื“ืช ืฉื™ืจื•ืช ื›ืžื• ื–ื• ื”ื•ื“ืคืกื” ื‘ืฆื“ ืฉืžืืœ ื‘ืจืฉื™ืžื”

B5
โ€ฆ
E5

ืžืฉืžืขื•ืช ื”ื“ื‘ืจ ื”ื™ื ืฉืกื•ื’ืจื™ ื”ืกื’ื™ืจื” ื‘ืฉื•ืจื” E5 ืชื•ืื ืืช ืกื•ื’ืจื™ ื”ืคืชื™ื—ื” ื‘ืฉื•ืจื” B5.

ื›ืžื•ื‘ืŸ, ืกื’ื ื•ืŸ ืชื›ื ื•ืช ื”ื•ื ื ื•ืฉื ืžืื•ื“ ืฉื ื•ื™ ื‘ืžื—ืœื•ืงืช, ื•ืœื›ืŸ ื™ืฉ ืœืงื—ืช ืืช ื”ืจืขื™ื•ื ื•ืช ื”ืžื•ื‘ืขื™ื ื›ืืŸ ื›ืœื ื™ื•ืชืจ ืžืืฉืจ ื—ื•ืžืจ ืœืžื—ืฉื‘ื”. ื–ื” ื™ื›ื•ืœ ืœื”ื™ื•ืช ืงืฉื” ืžืื•ื“ ืœืฉื ื™ ืžืชื›ื ืชื™ื ืžื ื•ืกื™ื ืœืžื“ื™, ืฉื”ืชืคืชื—ื• ื•ื”ืชืจื’ืœื• ืœืกื’ื ื•ื ื•ืช ืฉื•ื ื™ื ื‘ืžืฉืš ืฉื ื™ื ืจื‘ื•ืช ืฉืœ ืขื‘ื•ื“ื”, ืœื”ื’ื™ืข ืœื”ืกื›ืžื”. ื–ื” ืขื ื™ื™ืŸ ืื—ืจ ืœืชืœืžื™ื“ ื”ืœื•ืžื“ ืœืชื›ื ืช ืฉืขื“ื™ื™ืŸ ืœื ื”ืกืคื™ืง ืœืžืฆื•ื ืืช ื”ืกื’ื ื•ืŸ ืฉืœื•. ืื ื™ ื—ื•ืฉื‘ ืฉื‘ืžืงืจื” ื”ื–ื” ื”ืžื•ืจื” ืฆืจื™ืš ืœืคื—ื•ืช ืœื”ืขื‘ื™ืจ ืœืชืœืžื™ื“ื™ื• ืจืขื™ื•ืŸ ื›ื” ืคืฉื•ื˜, ืืš ืœื ื‘ืจื•ืจ ืœื”ื, ืฉื”ืฆืœื—ืชื” ืฉืœ ืชื•ื›ื ื™ืช ืชืœื•ื™ื” ื‘ืžื™ื“ื” ืจื‘ื” ื‘ืกื’ื ื•ืŸ ืฉื‘ื• ื›ืชื•ื‘ ืงื•ื“ ื”ืžืงื•ืจ ืฉืœื”. ื™ื™ืชื›ืŸ ืฉื”ืชืœืžื™ื“ ืœื ื™ืคืขืœ ืœืคื™ ื”ืกื’ื ื•ืŸ ื”ืžื•ืžืœืฅ, ืื‘ืœ ืชืŸ ืœื• ืœืคื—ื•ืช ืœื—ืฉื•ื‘ ืขืœ ื”ืฆื•ืจืš ื‘ืคืขื•ืœื•ืช "ื ื•ืกืคื•ืช" ืœืฉื™ืคื•ืจ ืขื™ืฆื•ื‘ ืงื•ื“ ื”ืžืงื•ืจ.

ื ื—ื–ื•ืจ ืœื‘ืขื™ื” ื”ื‘ืกื™ืกื™ืช ืฉืœื ื• ื‘ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช: ื”ืชืคืชื—ื•ืช ื ื•ืกืคืช ื™ื›ื•ืœื” ืœืœื›ืช ื‘ื›ื™ื•ื•ื ื™ื ืฉื•ื ื™ื. ืื—ื“ ื”ื”ื ื—ื™ื•ืช ื”ื•ื ืœืขื™ื•ืŸ: ื›ืืฉืจ ืืชื” ืžืจื—ืฃ ืขื ืกืžืŸ ื”ืขื›ื‘ืจ ืžืขืœ ืชื ื˜ื‘ืœื”, ืžื•ืคื™ืข ื—ืœื•ืŸ ืžื™ื“ืข ื”ืžื›ื™ืœ ืžื™ื“ืข ื ื•ืกืฃ ืขืœ ื”ืืœืžื ื˜ ืฉืฆื•ื™ืŸ. ืคื™ืชื•ื— ื ื•ืกืฃ ื”ื•ื ืคื™ืœื˜ืจื™ื. ืœื“ื•ื’ืžื”, ื‘ื”ืชืื ืœื”ืชืงื ื”, ื—ืœื•ืŸ ื”ืžื™ื“ืข ื™ื›ื™ืœ ืจืง: ื”ืžื™ื“ืข ื”ืคื™ื–ื™ืงืœื™ ื•ื”ื›ื™ืžื™ ื”ื—ืฉื•ื‘ ื‘ื™ื•ืชืจ, ืžื™ื“ืข ืขืœ ื”ื™ืกื˜ื•ืจื™ื™ืช ื”ื’ื™ืœื•ื™, ืžื™ื“ืข ืขืœ ืชืคื•ืฆื” ื‘ื˜ื‘ืข, ืจืฉื™ืžืช ื”ืชืจื›ื•ื‘ื•ืช ื”ื—ืฉื•ื‘ื•ืช ื‘ื™ื•ืชืจ (ื”ื›ื•ืœืœืช ื™ืกื•ื“ ื–ื”), ืชื›ื•ื ื•ืช ืคื™ื–ื™ื•ืœื•ื’ื™ื•ืช, ืฉื ื‘ืฉืคื” ื–ืจื” ื•ื›ื•'. ื”ื–ื›ืจื ื• ืืช ื”"ื‘ืจื•ื•ื–" ืฉืœ ืงื‘ืจื™ืŸ ืฉืื™ืชื• ืžืชื—ื™ืœ ืžืืžืจ ื–ื”, ืื ื• ื™ื›ื•ืœื™ื ืœื•ืžืจ ืฉืขื ืคื™ืชื•ื— ื–ื” ืฉืœ ื”ืชื•ื›ื ื™ืช ื ืงื‘ืœ ืžื›ืœื•ืœ ื”ื›ืฉืจื” ืฉืœื ื‘ืžื“ืขื™ ื”ื˜ื‘ืข: ื‘ื ื•ืกืฃ ืœืžื—ืฉื‘ ืžื“ืข, ืคื™ื–ื™ืงื” ื•ื›ื™ืžื™ื” - ื‘ื™ื•ืœื•ื’ื™ื”, ื’ื™ืื•ื’ืจืคื™ื” ื›ืœื›ืœื™ืช, ืชื•ืœื“ื•ืช ื”ืžื“ืข ื•ืืคื™ืœื• ืฉืคื•ืช ื–ืจื•ืช.

ืื‘ืœ ืžืกื“ ื ืชื•ื ื™ื ืžืงื•ืžื™ ื”ื•ื ืœื ื”ื’ื‘ื•ืœ. ื”ืชื•ื›ื ื™ืช ืžืชื—ื‘ืจืช ืœืื™ื ื˜ืจื ื˜ ื‘ืื•ืคืŸ ื˜ื‘ืขื™. ื›ืืฉืจ ืืชื” ื‘ื•ื—ืจ ืืœืžื ื˜, ื”ืงื™ืฉื•ืจ ืžื•ืคืขืœ, ื•ืžืืžืจ ื•ื™ืงื™ืคื“ื™ื” ืขืœ ืืœืžื ื˜ ื–ื” ื ืคืชื— ื‘ื—ืœื•ืŸ ื“ืคื“ืคืŸ ื”ืื™ื ื˜ืจื ื˜. ื•ื™ืงื™ืคื“ื™ื”, ื›ื™ื“ื•ืข, ืื™ื ื” ืžืงื•ืจ ืกืžื›ื•ืชื™. ืืชื” ื™ื›ื•ืœ ืœื”ื’ื“ื™ืจ ืงื™ืฉื•ืจื™ื ืœืžืงื•ืจื•ืช ืžื•ืกืžื›ื™ื, ืœืžืฉืœ, ื”ืื ืฆื™ืงืœื•ืคื“ื™ื” ื”ื›ื™ืžื™ืช, TSB, ื›ืชื‘ื™ ืขืช ืžื•ืคืฉื˜ื™ื, ืœื”ื–ืžื™ืŸ ืฉืื™ืœืชื•ืช ื‘ืžื ื•ืขื™ ื—ื™ืคื•ืฉ ืขื‘ื•ืจ ืืœืžื ื˜ ื–ื” ื•ื›ื•'. ื–ึถื”. ื”ืชืœืžื™ื“ื™ื ื™ื•ื›ืœื• ืœื‘ืฆืข ืžื˜ืœื•ืช ืคืฉื•ื˜ื•ืช ืืš ืžืฉืžืขื•ืชื™ื•ืช ื‘ื ื•ืฉืื™ DBMS ื•ืื™ื ื˜ืจื ื˜.

ื‘ื ื•ืกืฃ ืœืฉืื™ืœืชื•ืช ืขืœ ืืœืžื ื˜ ื‘ื•ื“ื“, ื ื™ืชืŸ ืœื™ืฆื•ืจ ืคื•ื ืงืฆื™ื•ื ืœื™ื•ืช ืฉืชืกืžืŸ, ืœืžืฉืœ, ืชืื™ื ื‘ื˜ื‘ืœื” ื”ืขื•ืžื“ื™ื ื‘ืงืจื™ื˜ืจื™ื•ื ื™ื ืžืกื•ื™ืžื™ื ื‘ืฆื‘ืขื™ื ืฉื•ื ื™ื. ืœืžืฉืœ, ืžืชื›ื•ืช ื•ืœื ืžืชื›ื•ืช. ืื• ืชืื™ื ืฉืžื•ืฉืœื›ื™ื ืœืžืงื•ื•ื™ ืžื™ื ืขืœ ื™ื“ื™ ืžืคืขืœ ื›ื™ืžื™ ืžืงื•ืžื™.

ืืชื” ื™ื›ื•ืœ ื’ื ืœื™ื™ืฉื ืืช ื”ืคื•ื ืงืฆื™ื•ืช ืฉืœ ืžืืจื’ืŸ ืžื—ื‘ืจืช. ืœื“ื•ื’ืžื”, ื”ื“ื’ืฉ ื‘ื˜ื‘ืœื” ืืช ื”ืžืจื›ื™ื‘ื™ื ื”ื›ืœื•ืœื™ื ื‘ื‘ื—ื™ื ื”. ืœืื—ืจ ืžื›ืŸ ื”ื“ื’ื™ืฉื• ืืช ื”ืืœืžื ื˜ื™ื ืฉื ืœืžื“ื•/ื—ื–ืจื• ืขืœ ื™ื“ื™ ื”ืชืœืžื™ื“ ืœืงืจืืช ื”ื‘ื—ื™ื ื”.

ื•ื”ื ื”, ืœืžืฉืœ, ืื—ืช ื”ื‘ืขื™ื•ืช ื”ืื•ืคื™ื™ื ื™ื•ืช ืœื›ื™ืžื™ื” ื‘ื‘ื™ืช ื”ืกืคืจ:

ื ื™ืชืŸ 10 ื’ืจื ื’ื™ืจ. ื›ืžื” ื—ื•ืžืฆืช ืžืœื— ืฆืจื™ืš ืœืงื—ืช ื›ื“ื™ ืœื”ืžื™ืก ืืช ื›ืœ ื”ื’ื™ืจ ื”ื–ื”?

ื›ื“ื™ ืœืคืชื•ืจ ื‘ืขื™ื” ื–ื•, ื™ืฉ ืฆื•ืจืš ืœืจืฉื•ื ืืช ื”ื›ื™ื. ืชื’ื•ื‘ื” ื•ื”ืฆื‘ืช ื”ืžืงื“ืžื™ื ื‘ืชื•ื›ื”, ื—ืฉื‘ ืืช ื”ืžืฉืงืœื™ื ื”ืžื•ืœืงื•ืœืจื™ื™ื ืฉืœ ืกื™ื“ืŸ ืคื—ืžืชื™ ื•ืžื™ืžืŸ ื›ืœื•ืจื™, ื•ืื– ื—ื‘ืจ ื•ืคืชื•ืจ ืืช ื”ืคืจื•ืคื•ืจืฆื™ื”. ืžื—ืฉื‘ื•ืŸ ื”ืžื‘ื•ืกืก ืขืœ ื”ืชื•ื›ื ื™ืช ื”ื‘ืกื™ืกื™ืช ืฉืœื ื• ื™ื›ื•ืœ ืœื—ืฉื‘ ื•ืœืคืชื•ืจ. ื ื›ื•ืŸ, ืขื“ื™ื™ืŸ ืชืฆื˜ืจื›ื• ืœืงื—ืช ื‘ื—ืฉื‘ื•ืŸ ืฉื—ื™ื™ื‘ื™ื ืœืงื—ืช ืืช ื”ื—ื•ืžืฆื” ื‘ืขื•ื“ืฃ ืกื‘ื™ืจ ื•ื‘ืจื™ื›ื•ื– ืกื‘ื™ืจ, ืื‘ืœ ื–ื• ื›ื™ืžื™ื”, ืœื ืžื“ืขื™ ื”ืžื—ืฉื‘.
ืชื•ืกืคืช 1: ื›ื™ืฆื“ ืคื•ืขืœ ืžื—ืฉื‘ื•ืŸ ื”ื›ื™ืžื™ื”ื”ื‘ื” ื ื ืชื— ืืช ืคืขื•ืœืช ื”ืžื—ืฉื‘ื•ืŸ ื‘ืืžืฆืขื•ืช ื”ื“ื•ื’ืžื” ืฉืœ ื”ื‘ืขื™ื” ืฉืœืขื™ืœ ืฉืœ ื’ื™ืจ ื•"ื”ื•ื“ื’'ืคื•ื“ื’'". ื ืชื—ื™ืœ ื‘ืชื’ื•ื‘ื”:

CaCO3 + 2HCl = CaCl2 + H2O

ืžื›ืืŸ ืื ื• ืจื•ืื™ื ืฉื ืฆื˜ืจืš ืืช ื”ืžืฉืงืœื™ื ื”ืื˜ื•ืžื™ื™ื ืฉืœ ื”ื™ืกื•ื“ื•ืช ื”ื‘ืื™ื: ืกื™ื“ืŸ (Ca), ืคื—ืžืŸ (C), ื—ืžืฆืŸ (O), ืžื™ืžืŸ (H) ื•ื›ืœื•ืจ (Cl). ื‘ืžืงืจื” ื”ืคืฉื•ื˜ ื‘ื™ื•ืชืจ, ื ื•ื›ืœ ืœื›ืชื•ื‘ ืžืฉืงืœื™ื ืืœื• ืœืžืขืจืš ื—ื“ ืžื™ืžื“ื™ ื”ืžื•ื’ื“ืจ ื›

AtomicMass : array [1..size] of real;

ื›ืืฉืจ ืื™ื ื“ืงืก ื”ืžืขืจืš ืžืชืื™ื ืœืžืกืคืจ ื”ืืœืžื ื˜. ืขื•ื“ ืขืœ ื”ืžืงื•ื ื”ืคื ื•ื™ ืฉืœ ื”ื˜ื•ืคืก tableDlg ืœืฉื™ื ืฉื ื™ ืฉื“ื•ืช. ื‘ืฉื“ื” ื”ืจืืฉื•ืŸ ื ื›ืชื‘ ื‘ืชื—ื™ืœื”: "ื”ืจื™ืื’ื ื˜ ื”ืจืืฉื•ืŸ ื ื™ืชืŸ", ื‘ืฉื ื™ื™ื” - "ื”ืจื™ืื’ื ื˜ ื”ืฉื ื™ ื”ื•ื ืœืžืฆื•ื x". ื‘ื•ืื• ื ืกืžืŸ ืืช ื”ืฉื“ื•ืช ืžื’ื™ื‘ 1, ืžื’ื™ื‘ 2 ื‘ื”ืชืืžื”. ืชื•ืกืคื•ืช ืื—ืจื•ืช ืœืชื•ื›ื ื™ืช ื™ืชื‘ืจืจื• ืžื”ื“ื•ื’ืžื” ื”ื‘ืื” ืฉืœ ื”ืžื—ืฉื‘ื•ืŸ.

ืื ื• ืžืงืœื™ื“ื™ื ืขืœ ืžืงืœื“ืช ื”ืžื—ืฉื‘: 10 ื’ืจื ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ื”ืจื™ืื’ื ื˜ ื”ืจืืฉื•ืŸ ืžืงื‘ืœ 10 ื’ืจื." ื›ืขืช ื ื–ื™ืŸ ืืช ื”ื ื•ืกื—ื” ืฉืœ ืžื’ื™ื‘ ื–ื”, ื•ื”ืžื—ืฉื‘ื•ืŸ ื™ื—ืฉื‘ ื•ื™ืจืื” ืืช ื”ืžืฉืงืœ ื”ืžื•ืœืงื•ืœืจื™ ืฉืœื• ืชื•ืš ื›ื“ื™ ื”ื–ื ืชื•.

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ืกืžืœ Ca. ื›ื™ืชื•ื‘ ื‘ืฉื˜ื— ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืจืืฉื•ืŸ Ca 40.078 ื ืชื•ืŸ 10 ื’ืจื."

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ื”ืกืžืœ C. ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืจืืฉื•ืŸ CaC 52.089 ื ืชื•ืŸ 10 ื’ืจื." ื”ึธื”ึตืŸ. ื”ืžื—ืฉื‘ื•ืŸ ื—ื™ื‘ืจ ืืช ื”ืžืฉืงืœื™ื ื”ืื˜ื•ืžื™ื™ื ืฉืœ ืกื™ื“ืŸ ื•ืคื—ืžืŸ.

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ื”ืกืžืœ O. ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืจืืฉื•ืŸ CaCO 68.088 ื ืชื•ืŸ 10 ื’ืจื." ื”ืžื—ืฉื‘ื•ืŸ ื”ื•ืกื™ืฃ ืืช ื”ืžืฉืงืœ ื”ืื˜ื•ืžื™ ืฉืœ ื”ื—ืžืฆืŸ ืœืกื›ื•ื.

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ื”ืกืžืœ O. ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืจืืฉื•ืŸ CaCO2 84.087 ื ืชื•ืŸ 10 ื’ืจื." ื”ืžื—ืฉื‘ื•ืŸ ื”ื•ืกื™ืฃ ืฉื•ื‘ ืืช ื”ืžืฉืงืœ ื”ืื˜ื•ืžื™ ืฉืœ ื”ื—ืžืฆืŸ ืœืกื›ื•ื.

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ื”ืกืžืœ O. ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 1 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืจืืฉื•ืŸ CaCO3 100.086 ื ืชื•ืŸ 10 ื’ืจื." ื”ืžื—ืฉื‘ื•ืŸ ื”ื•ืกื™ืฃ ืฉื•ื‘ ืืช ื”ืžืฉืงืœ ื”ืื˜ื•ืžื™ ืฉืœ ื”ื—ืžืฆืŸ ืœืกื›ื•ื.

ื”ืงืฉ Enter ื‘ืžืงืœื“ืช ื”ืžื—ืฉื‘ ืฉืœืš. ื”ื›ื ืกืช ื”ืžื’ื™ื‘ ื”ืจืืฉื•ืŸ ื”ื•ืฉืœืžื” ื•ืขื•ื‘ืจืช ืœืฉื˜ื— ืžื’ื™ื‘ 2. ืฉื™ืžื• ืœื‘ ืฉื‘ื“ื•ื’ืžื” ื–ื• ืื ื• ืžืกืคืงื™ื ื’ืจืกื” ืžื™ื ื™ืžืœื™ืช. ืื ืชืจืฆื•, ืชื•ื›ืœื• ืœืืจื’ืŸ ื‘ืงืœื•ืช ืžื›ืคื™ืœื™ื ืฉืœ ืื˜ื•ืžื™ื ืžืื•ืชื• ืกื•ื’, ื›ืš, ืœืžืฉืœ, ืœื ืชืฆื˜ืจื›ื• ืœืœื—ื•ืฅ ืฉื‘ืข ืคืขืžื™ื ื‘ืจืฆื™ืคื•ืช ืขืœ ืชื ื”ื—ืžืฆืŸ ื‘ื›ื ื™ืกื” ืœื ื•ืกื—ืช ื”ื›ืจื•ื (K2Cr2O7).

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ื”ืกืžืœ H. ื›ื™ืชื•ื‘ ื‘ืฉื“ื” ืžื’ื™ื‘ 2 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืฉื ื™ H 1.008 ืžืฆื x."

ืœื—ืฅ ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืขื ืกืžืœ Cl. ื›ื™ืชื•ื‘ ื‘ืฉื˜ื— ืžื’ื™ื‘ 2 ืฉื™ื ื•ื™ื™ื: "ืžื’ื™ื‘ ืฉื ื™ HCl 36.458 ืžืฆื x." ื”ืžื—ืฉื‘ื•ืŸ ื—ื™ื‘ืจ ืืช ื”ืžืฉืงืœื™ื ื”ืื˜ื•ืžื™ื™ื ืฉืœ ืžื™ืžืŸ ื•ื›ืœื•ืจ. ื‘ืžืฉื•ื•ืืช ื”ืชื’ื•ื‘ื” ืœืขื™ืœ, ืœืคื ื™ ืžื™ืžืŸ ื›ืœื•ืจื™ ืžืงื“ื 2. ืœื›ืŸ, ืœื—ืฅ ืขืœ LMB ื‘ืฉื“ื” ืžื’ื™ื‘ 2. ื”ืžืฉืงืœ ื”ืžื•ืœืงื•ืœืจื™ ืžื›ืคื™ืœ ืืช ืขืฆืžื• (ืžืฉื•ืœืฉ ื‘ืœื—ื™ืฆื” ืคืขืžื™ื™ื ื•ื›ื•'). ื›ื™ืชื•ื‘ ื‘ืฉื˜ื— ืžื’ื™ื‘ 2 ืฉื™ื ื•ื™ื™ื: "ืจื™ืื’ื ื˜ ืฉื ื™ 2HCl 72.916 ืžืฆื x."

ื”ืงืฉ Enter ื‘ืžืงืœื“ืช ื”ืžื—ืฉื‘ ืฉืœืš. ื”ื–ื ืช ื”ืžื’ื™ื‘ ื”ืฉื ื™ ื”ื•ืฉืœืžื”, ื•ื”ืžื—ืฉื‘ื•ืŸ ืžื•ืฆื ืืช x ืžื”ืคืจื•ืคื•ืจืฆื™ื”

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ

ื–ื” ืžื” ืฉื”ื™ื™ื ื• ืฆืจื™ื›ื™ื ืœืžืฆื•ื.

ื”ืขืจื” 1. ืžืฉืžืขื•ืช ื”ืคืจื•ืคื•ืจืฆื™ื” ื”ืžืชืงื‘ืœืช: ืœืคื™ืจื•ืง 100.086 Da ื’ื™ืจ ื“ื•ืจืฉ ื—ื•ืžืฆื” ืฉืœ 72.916 ื“ื, ื•ื›ื“ื™ ืœื”ืžื™ืก 10 ื’ืจื ื’ื™ืจ ืฆืจื™ืš x ื—ื•ืžืฆื”.

ื”ืขืจื” 2. ืื•ืกืคื™ื ืฉืœ ื‘ืขื™ื•ืช ื“ื•ืžื•ืช:

ื—ื•ืžืฆ'ื ืงื• I. G., ืื•ืกืฃ ื‘ืขื™ื•ืช ื•ืชืจื’ื™ืœื™ื ื‘ื›ื™ืžื™ื” 2009 (ื›ื™ืชื•ืช ื—'-ื™"ื).
Khomchenko G. P., Khomchenko I. G., ืื•ืกืฃ ื‘ืขื™ื•ืช ื‘ื›ื™ืžื™ื” ืœืžื•ืขืžื“ื™ื ืœืื•ื ื™ื‘ืจืกื™ื˜ืื•ืช, 2019.

ื”ืขืจื” 3. ื›ื“ื™ ืœืคืฉื˜ ืืช ื”ืžืฉื™ืžื”, ื ื™ืชืŸ ืœืคืฉื˜ ืืช ื”ื–ื ืช ื”ื ื•ืกื—ื” ื‘ื’ืจืกื” ื”ืจืืฉื•ื ื™ืช ื•ืคืฉื•ื˜ ืœื”ื•ืกื™ืฃ ืืช ืกืžืœ ื”ืืœืžื ื˜ ืœืกื•ืฃ ืฉื•ืจืช ื”ื ื•ืกื—ื”. ืื– ื”ื ื•ืกื—ื” ืฉืœ ืกื™ื“ืŸ ืคื—ืžืชื™ ืชื”ื™ื”:
CaCOOO
ืื‘ืœ ืœื ืกื‘ื™ืจ ืฉืžื•ืจื” ืœื›ื™ืžื™ื” ื™ืื”ื‘ ื”ืงืœื˜ื” ื›ื–ื•. ื–ื” ืœื ืงืฉื” ืœื”ื–ื™ืŸ ืืช ื”ืขืจืš ื”ื ื›ื•ืŸ - ื›ื“ื™ ืœืขืฉื•ืช ื–ืืช ืืชื” ืฆืจื™ืš ืœื”ื•ืกื™ืฃ ืžืขืจืš:

formula : array [1..size] of integer;

ื›ืืฉืจ ื”ืื™ื ื“ืงืก ื”ื•ื ืžืกืคืจ ื”ื™ืกื•ื“ ื”ื›ื™ืžื™, ื•ื”ืขืจืš ื‘ืื™ื ื“ืงืก ื–ื” ื”ื•ื ืžืกืคืจ ื”ืื˜ื•ืžื™ื (ื‘ืชื—ื™ืœื” ื›ืœ ื”ื™ืกื•ื“ื•ืช ืฉืœ ื”ืžืขืจืš ืžืื•ืคืกื™ื ืœืืคืก). ื™ืฉ ืœืงื—ืช ื‘ื—ืฉื‘ื•ืŸ ืืช ื”ืกื“ืจ ืฉื‘ื• ื ื›ืชื‘ื™ื ื”ืื˜ื•ืžื™ื ื‘ื ื•ืกื—ื”, ื›ืคื™ ืฉืื•ืžืฆื” ื‘ื›ื™ืžื™ื”. ืœื“ื•ื’ืžื”, ืžืขื˜ ืื ืฉื™ื ื™ืื”ื‘ื• ื’ื O3CaC. ื‘ื•ืื• ื ืขื‘ื™ืจ ืืช ื”ืื—ืจื™ื•ืช ืœืžืฉืชืžืฉ. ื™ืฆื™ืจืช ืžืขืจืš:

 formulaOrder : array [1..size] of integer; // ะผะพะถะฝะพ ะฒะทัั‚ัŒ ะฟะพะบะพั€ะพั‡ะต

ืฉื‘ื• ืื ื• ืจื•ืฉืžื™ื ืืช ืžืกืคืจ ื”ื™ืกื•ื“ ื”ื›ื™ืžื™ ืœืคื™ ืื™ื ื“ืงืก ื”ื•ืคืขืชื• ื‘ื ื•ืกื—ื”. ื”ื•ืกืคืช ืื˜ื•ื currNo ืœืชื•ืš ื”ื ื•ืกื—ื”:

if formula [currNo]=0 then //ัั‚ะพั‚ ะฐั‚ะพะผ ะฒัั‚ั€ะตั‚ะธะปัั ะฟะตั€ะฒั‹ะน ั€ะฐะท
 begin
 orderIndex := orderIndex+1;//ะฒ ะฝะฐั‡ะฐะปะต ะฒะฒะพะดะฐ ั„ะพั€ะผัƒะปั‹ orderIndex=0
 formulaOrder [orderIndex] :=  currNo;
 end;
formula [currNo]:=formula [currNo]+1;

ื›ืชื™ื‘ืช ื”ื ื•ืกื—ื” ืœืฉื•ืจื”:

s := ''; // ะฟัƒัั‚ะฐั ัั‚ั€ะพะบะฐ ะดะปั ั„ะพั€ะผัƒะปั‹
for i:=1 to  orderIndex do // ะดะปั ะฒัะตั… ั…ะธะผ.ัะธะผะฒะพะปะพะฒ ะฒ ั„ะพั€ะผัƒะปะต 
 begin
 s:=s+TableSymbols [ formulaOrder[i]];// ะดะพะฑะฐะฒะปัะตะผ ั…ะธะผ.ัะธะผะฒะพะป
 if formula [formulaOrder[i]]<>1 then //ะดะพะฑะฐะฒะปัะตะผ ะบะพะป-ะฒะพ ะฐั‚ะพะผะพะฒ
  s:=s+ intToStr(formula [formulaOrder[i]]);
 end;

ื”ืขืจื” 4. ื”ื’ื™ื•ื ื™ ืœืกืคืง ืืช ื”ื™ื›ื•ืœืช ืœื”ื–ื™ืŸ ืœื—ื™ืœื•ืคื™ืŸ ืืช ื ื•ืกื—ืช ื”ืžื’ื™ื‘ ืžื”ืžืงืœื“ืช. ื‘ืžืงืจื” ื–ื”, ืชืฆื˜ืจืš ืœื™ื™ืฉื ืžื ืชื— ืคืฉื•ื˜.

ืจืื•ื™ ืœืฆื™ื™ืŸ ื›ื™:

ื›ื™ื•ื, ื™ืฉ ื›ืžื” ืžืื•ืช ื’ืจืกืื•ืช ืฉืœ ื”ื˜ื‘ืœื”, ื•ืžื“ืขื ื™ื ืžืฆื™ืขื™ื ื›ืœ ื”ื–ืžืŸ ืืคืฉืจื•ื™ื•ืช ื—ื“ืฉื•ืช. (ื•ื™ืงื™ืคื“ื™ื”)

ืชืœืžื™ื“ื™ื ื™ื›ื•ืœื™ื ืœื”ืจืื•ืช ืืช ื›ื•ืฉืจ ื”ื”ืžืฆืื” ืฉืœื”ื ื‘ื›ื™ื•ื•ืŸ ื–ื” ืขืœ ื™ื“ื™ ื™ื™ืฉื•ื ืื—ืช ืžื”ืืคืฉืจื•ื™ื•ืช ืฉื›ื‘ืจ ื”ื•ืฆืขื• ืื• ืœื ืกื•ืช ืœื™ืฆื•ืจ ืื—ืช ืžืงื•ืจื™ืช ืžืฉืœื”ื. ืื•ืœื™ ื ืจืื” ืฉื–ื”ื• ื”ื›ื™ื•ื•ืŸ ื”ื›ื™ ืคื—ื•ืช ืฉื™ืžื•ืฉื™ ืœืฉื™ืขื•ืจื™ ืžื“ืขื™ ื”ืžื—ืฉื‘. ืขื ื–ืืช, ื‘ืฆื•ืจืช ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ื”ืžื™ื•ืฉืžืช ื‘ืžืืžืจ ื–ื”, ื™ื™ืชื›ืŸ ืฉื—ืœืง ืžื”ืชืœืžื™ื“ื™ื ืœื ื™ืจืื• ืืช ื”ื™ืชืจื•ื ื•ืช ื”ืžื™ื•ื—ื“ื™ื ืฉืœ ื›ืจื˜ื™ืกื™ ืฉืœื™ื˜ื” ืขืœ ืคื ื™ ื”ืคืชืจื•ืŸ ื”ื—ืœื•ืคื™ ื‘ืืžืฆืขื•ืช ืœื—ืฆื ื™ื ืกื˜ื ื“ืจื˜ื™ื™ื TBbutton. ืฆื•ืจืช ื”ืกืคื™ืจืœื” ืฉืœ ื”ืฉื•ืœื—ืŸ (ื›ืืฉืจ ื”ืชืื™ื ื‘ืขืœื™ ืฆื•ืจื•ืช ืฉื•ื ื•ืช) ืชื“ื’ื™ื ื‘ืฆื•ืจื” ื‘ืจื•ืจื” ื™ื•ืชืจ ืืช ื”ื™ืชืจื•ื ื•ืช ืฉืœ ื”ืคืชืจื•ืŸ ื”ืžื•ืฆืข ื›ืืŸ.

ื˜ื‘ืœื” ืžื—ื–ื•ืจื™ืช ืขืœ ืžื“ืขื™ ื”ืžื—ืฉื‘ ื‘ื‘ื™ืช ื”ืกืคืจ
(ืžืขืจื›ืช ืืœืžื ื˜ื™ื ื—ืœื•ืคื™ืช ืžืืช ืชื™ืื•ื“ื•ืจ ื‘ื ืคื™ื™, ืžืงื•ืจ)

ื”ื‘ื” ื ื•ืกื™ืฃ ื’ื ื›ื™ ืžืกืคืจ ืชื•ื›ื ื•ืช ืžื—ืฉื‘ ื”ืงื™ื™ืžื•ืช ื›ื™ื•ื ืขื‘ื•ืจ ื”ื˜ื‘ืœื” ื”ืžื—ื–ื•ืจื™ืช ืžืชื•ืืจื•ืช ื‘ื›ืชื‘ ื”ืขืช ืฉืคื•ืจืกื ืœืื—ืจื•ื ื” ืขืœ Habrรฉ ัั‚ะฐั‚ัŒะต.

ื ืกืคื— 2: ื“ื•ื’ืžืื•ืช ืœืžืฉื™ืžื•ืช ืœืžืกื ื ื™ืื‘ืืžืฆืขื•ืช ืžืกื ื ื™ื ืชื•ื›ืœ ืœืคืชื•ืจ, ืœืžืฉืœ, ืืช ื”ืžืฉื™ืžื•ืช ื”ื‘ืื•ืช:

1) ื‘ื—ืจ ื‘ื˜ื‘ืœื” ืืช ื›ืœ ื”ื™ืกื•ื“ื•ืช ื”ื™ื“ื•ืขื™ื ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื.

2) ื–ื”ื” ืืช ื›ืœ ื”ื™ืกื•ื“ื•ืช ื”ื™ื“ื•ืขื™ื ื‘ืขืช ื’ื™ืœื•ื™ ื”ื—ื•ืง ื”ืชืงื•ืคืชื™.

3) ื–ื”ื” ืฉื‘ืขื” ื™ืกื•ื“ื•ืช ืฉืืœื›ื™ืžืื™ื ื—ืฉื‘ื• ืœืžืชื›ื•ืช.

4) ื‘ื—ืจ ืืช ื›ืœ ื”ืืœืžื ื˜ื™ื ืฉื ืžืฆืื™ื ื‘ืžืฆื‘ ื’ื–ื™ ื‘ืชื ืื™ื ืจื’ื™ืœื™ื (ื .ืฉ).

5) ื‘ื—ืจ ืืช ื›ืœ ื”ืืœืžื ื˜ื™ื ืฉื ืžืฆืื™ื ื‘ืžืฆื‘ ื ื•ื–ืœื™ ื‘- no.

6) ื‘ื—ืจ ืืช ื›ืœ ื”ืืœืžื ื˜ื™ื ืฉื ืžืฆืื™ื ื‘ืžืฆื‘ ืžื•ืฆืง ื‘- no.

7) ื‘ื—ืจ ืืช ื›ืœ ื”ืืœืžื ื˜ื™ื ืฉื™ื›ื•ืœื™ื ืœื”ื™ื—ืฉืฃ ืœืื•ื•ื™ืจ ืœืื•ืจืš ื–ืžืŸ ืœืœื ืฉื™ื ื•ื™ื™ื ื ื™ื›ืจื™ื ื‘ืชื ืื™ื ืจื’ื™ืœื™ื.

8) ื‘ื—ืจ ืืช ื›ืœ ื”ืžืชื›ื•ืช ื”ืžืชืžื•ืกืกื•ืช ื‘ื—ื•ืžืฆื” ื”ื™ื“ืจื•ื›ืœื•ืจื™ืช.

9) ื‘ื—ืจ ืืช ื›ืœ ื”ืžืชื›ื•ืช ื”ืžืชืžื•ืกืกื•ืช ื‘ื—ื•ืžืฆื” ื’ื•ืคืจืชื™ืช ื‘ืžืงื•ื ืžืก'.

10) ื‘ื—ืจ ืืช ื›ืœ ื”ืžืชื›ื•ืช ืฉืžืชืžื•ืกืกื•ืช ื‘ื—ื•ืžืฆื” ื’ื•ืคืจืชื™ืช ื‘ืขืช ื—ื™ืžื•ื.

11) ื‘ื—ืจ ืืช ื›ืœ ื”ืžืชื›ื•ืช ืฉืžืชืžื•ืกืกื•ืช ื‘ื—ื•ืžืฆื” ื—ื ืงืชื™ืช.

12) ืœื‘ื•ื“ื“ ืืช ื›ืœ ื”ืžืชื›ื•ืช ื”ืžื’ื™ื‘ื•ืช ื‘ืืœื™ืžื•ืช ืขื ืžื™ื ื‘ืชื ืื™ ื”ืกื‘ื™ื‘ื”.

13) ื‘ื—ืจ ืืช ื›ืœ ื”ืžืชื›ื•ืช.

14) ื–ื™ื”ื•ื™ ืืœืžื ื˜ื™ื ื”ื ืคื•ืฆื™ื ื‘ื˜ื‘ืข.

15) ื–ื™ื”ื•ื™ ื™ืกื•ื“ื•ืช ืฉื ืžืฆืื™ื ื‘ื˜ื‘ืข ื‘ืžืฆื‘ ื—ื•ืคืฉื™.

16) ื–ื”ื” ืืช ื”ืืœืžื ื˜ื™ื ื”ืžืžืœืื™ื ืืช ื”ืชืคืงื™ื“ ื”ื—ืฉื•ื‘ ื‘ื™ื•ืชืจ ื‘ื’ื•ืฃ ื”ืื“ื ื•ื”ื—ื™.

17) ื‘ื—ืจ ืืœืžื ื˜ื™ื ืฉื ืžืฆืื™ื ื‘ืฉื™ืžื•ืฉ ื ืจื—ื‘ ื‘ื—ื™ื™ ื”ื™ื•ืžื™ื•ื (ื‘ืฆื•ืจื” ื—ื•ืคืฉื™ืช ืื• ื‘ืฉื™ืœื•ื‘ื™ื).

18) ื–ื™ื”ื•ื™ ืืœืžื ื˜ื™ื ืฉื”ื›ื™ ืžืกื•ื›ื ื™ื ืœืขื‘ื•ื“ ืื™ืชื ื•ื“ื•ืจืฉื™ื ืืžืฆืขื™ื ืžื™ื•ื—ื“ื™ื ื•ืฆื™ื•ื“ ืžื™ื’ื•ืŸ.

19) ื–ื”ื” ืืช ื”ื™ืกื•ื“ื•ืช ืืฉืจ, ื‘ืฆื•ืจื” ื—ื•ืคืฉื™ืช ืื• ื‘ืฆื•ืจื” ืฉืœ ืชืจื›ื•ื‘ื•ืช, ืžื”ื•ื•ื™ื ืืช ื”ืื™ื•ื ื”ื’ื“ื•ืœ ื‘ื™ื•ืชืจ ืขืœ ื”ืกื‘ื™ื‘ื”.

20) ื‘ื—ืจ ืžืชื›ื•ืช ื™ืงืจื•ืช.

21) ื–ื”ื” ืืœืžื ื˜ื™ื ื™ืงืจื™ื ื™ื•ืชืจ ืžืžืชื›ื•ืช ื™ืงืจื•ืช.

ื”ืขืจื•ืช

1) ื”ื’ื™ื•ื ื™ ืœืกืคืง ืžืกื ื ื™ื ืžืจื•ื‘ื™ื. ืœื“ื•ื’ืžื”, ืื ืชืคืขื™ืœ ืžืกื ืŸ ื›ื“ื™ ืœืคืชื•ืจ ื‘ืขื™ื” 1 (ื›ืœ ื”ื™ืกื•ื“ื•ืช ื”ืžื•ื›ืจื™ื ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื) ื•-20 (ืžืชื›ื•ืช ื™ืงืจื•ืช), ืื– ืชืื™ื ืขื ืžืชื›ื•ืช ื™ืงืจื•ืช ื”ื™ื“ื•ืขื•ืช ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื ื™ื•ื“ื’ืฉื• (ืœื“ื•ื’ืžื”, ืœืคื™ ืฆื‘ืข) ( ืœื“ื•ื’ืžื”, ืคืœื“ื™ื•ื ืœื ื™ื•ื“ื’ืฉ, ื ืคืชื— ื‘ืฉื ืช 1803).

2) ื”ื’ื™ื•ื ื™ ืœื•ื•ื“ื ืฉืžืกืคืจ ืžืกื ื ื™ื ื™ืคืขืœื• ื‘ืžืฆื‘ ื›ื–ื” ืฉื›ืœ ืžืกื ืŸ ื‘ื•ื—ืจ ืชืื™ื ืขื ืฆื‘ืข ืžืฉืœื•, ืืš ืœื ืžืกื™ืจ ืœื—ืœื•ื˜ื™ืŸ ืืช ื”ื‘ื—ื™ืจื” ืฉืœ ืžืกื ืŸ ืื—ืจ (ื—ืœืง ืžื”ืชื ื‘ืฆื‘ืข ืื—ื“, ื—ืœืง ื‘ืฆื‘ืข ืื—ืจ). ืœืื—ืจ ืžื›ืŸ, ื‘ืžืงืจื” ืฉืœ ื”ื“ื•ื’ืžื” ื”ืงื•ื“ืžืช, ื™ื™ืจืื• ืืœืžื ื˜ื™ื ืฉืœ ื”ืฆื˜ืœื‘ื•ืช ืฉืœ ืงื‘ื•ืฆื•ืช ืฉื”ืชื’ืœื• ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื ื•ืžืชื›ื•ืช ื™ืงืจื•ืช, ื›ืžื• ื’ื ื™ืกื•ื“ื•ืช ื”ืฉื™ื™ื›ื™ื ืจืง ืœืงื‘ื•ืฆื” ื”ืจืืฉื•ื ื” ื•ืจืง ืœืงื‘ื•ืฆื” ื”ืฉื ื™ื™ื”. ื”ึธื”ึตืŸ. ืžืชื›ื•ืช ื™ืงืจื•ืช ืœื ื™ื“ื•ืขื•ืช ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื, ื•ื™ืกื•ื“ื•ืช ื™ื“ื•ืขื™ื ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื ืืš ืœื ืžืชื›ื•ืช ื™ืงืจื•ืช.

3) ื”ื’ื™ื•ื ื™ ืœืื—ืจ ื”ื—ืœืช ื”ืžืกื ืŸ ืœื”ื‘ื˜ื™ื— ืืช ื”ืืคืฉืจื•ืช ืœืขื‘ื•ื“ื” ืื—ืจืช ืขื ื”ืชื•ืฆืื•ืช ืฉื”ื•ืฉื’ื•. ืœื“ื•ื’ืžื”, ืœืื—ืจ ืฉื ื‘ื—ืจื• ืืœืžื ื˜ื™ื ื™ื“ื•ืขื™ื ื‘ื™ืžื™ ื”ื‘ื™ื ื™ื™ื, ื”ืžืฉืชืžืฉ ืœื•ื—ืฅ ืขืœ LMB ืขืœ ื”ืืœืžื ื˜ ื”ื ื‘ื—ืจ ื•ืžื•ืขื‘ืจ ืœืžืืžืจ ื‘ื•ื•ื™ืงื™ืคื“ื™ื” ืขืœ ืืœืžื ื˜ ื–ื”.

4) ื”ื’ื™ื•ื ื™ ืœืกืคืง ืœืžืฉืชืžืฉ ืืช ื”ื™ื›ื•ืœืช ืœื‘ื˜ืœ ืืช ื”ื‘ื—ื™ืจื” ืขืœ ื™ื“ื™ ืœื—ื™ืฆื” ืขืœ LMB ื‘ืชื ื”ื˜ื‘ืœื” ืฉื ื‘ื—ืจ. ืœื“ื•ื’ืžื”, ื›ื“ื™ ืœื”ืกื™ืจ ืคืจื™ื˜ื™ื ืฉื›ื‘ืจ ื ืฆืคื•.

5) ื”ื’ื™ื•ื ื™ ืœื•ื•ื“ื ืฉืจืฉื™ืžืช ื”ืชืื™ื ืฉื ื‘ื—ืจื• ื ืฉืžืจืช ื‘ืงื•ื‘ืฅ ื•ืฉืงื•ื‘ืฅ ื›ื–ื” ื ื˜ืขืŸ ื‘ื‘ื—ื™ืจื” ืื•ื˜ื•ืžื˜ื™ืช ืฉืœ ืชืื™ื. ื–ื” ื™ื™ืชืŸ ืœืžืฉืชืžืฉ ืืช ื”ื”ื–ื“ืžื ื•ืช ืœืงื—ืช ื”ืคืกืงื” ืžื”ืขื‘ื•ื“ื”.

ื”ืฉืชืžืฉื ื• ื‘ืžืคืช ื‘ืงืจื” ืกื˜ื˜ื™ืช, ืฉื ืงื‘ืขื” ืžืจืืฉ, ืืš ื™ืฉื ืŸ ืžืฉื™ืžื•ืช ื—ืฉื•ื‘ื•ืช ืจื‘ื•ืช ืฉื‘ื”ืŸ ื ื™ืชืŸ ืœื”ืฉืชืžืฉ ื‘ืžืคื•ืช ื‘ืงืจื” ื“ื™ื ืžื™ื•ืช ื”ืžืฉืชื ื•ืช ืขื ืจื™ืฆืช ื”ืชื•ื›ื ื™ืช. ื“ื•ื’ืžื” ืœื›ืš ืชื”ื™ื” ืขื•ืจืš ื’ืจืคื™ื, ืฉื‘ื• ื”ืžืฉืชืžืฉ ืžืฉืชืžืฉ ื‘ืขื›ื‘ืจ ื›ื“ื™ ืœืฆื™ื™ืŸ ืืช ืžื™ืงื•ืžื™ ื”ืงื•ื“ืงื•ื“ื™ื ื‘ื—ืœื•ืŸ ื•ืœืฆื™ื™ืจ ืงืฆื•ื•ืช ื‘ื™ื ื™ื”ื. ื›ื“ื™ ืœืžื—ื•ืง ืงื•ื“ืงื•ื“ ืื• ืงืฆื”, ืขืœ ื”ืžืฉืชืžืฉ ืœื”ืฆื‘ื™ืข ืขืœื™ื”ื. ืื‘ืœ ืื ื“ื™ ืงืœ ืœื”ืฆื‘ื™ืข ืขืœ ืงื•ื“ืงื•ื“ ื”ืžืกื•ืžืŸ ื‘ืขื™ื’ื•ืœ, ืื– ื™ื”ื™ื” ืงืฉื” ื™ื•ืชืจ ืœื”ืฆื‘ื™ืข ืขืœ ืงืฆื” ืžืฆื•ื™ืจ ื‘ืงื• ื“ืง. ืžืคืช ื‘ืงืจื” ืชืขื–ื•ืจ ื›ืืŸ, ื›ืืฉืจ ืงื•ื“ืงื•ื“ื™ื ื•ืงืฆื•ื•ืช ืชื•ืคืกื™ื ืฉื›ื•ื ื•ืช ืจื—ื‘ื•ืช ื™ื•ืชืจ ืžืืฉืจ ื‘ืื™ื•ืจ ื”ื ืจืื” ืœืขื™ืŸ.

ืฉืืœืช ืฆื“ ืžืขื ื™ื™ื ืช ื”ืงืฉื•ืจื” ืœืฉื™ื˜ื” ื–ื• ืฉืœ ืื™ืžื•ืŸ ืžื•ืจื›ื‘ ื”ื™ื: ื”ืื ืฉื™ื˜ื” ื–ื• ื™ื›ื•ืœื” ืœื”ื™ื•ืช ืฉื™ืžื•ืฉื™ืช ื‘ืื™ืžื•ืŸ AI?

ืžืงื•ืจ: www.habr.com

ื”ื•ืกืคืช ืชื’ื•ื‘ื”