Periodic table sa computer science sa eskwelahan

(Управляющие карты)
(Gipahinungod sa Internasyonal nga Tuig sa Periodic Table of Chemical Elements)
(Ang pinakabag-o nga mga pagdugang gihimo kaniadtong Abril 8, 2019. Ang listahan sa mga pagdugang anaa dayon sa ubos sa cut)

(bulak ni Mendeleev, Tinubdan)

Nakahinumdom ko nga nilabay mi sa itik. Kini mao ang tulo ka mga leksyon sa makausa: geograpiya, natural nga siyensiya ug Russian. Sa usa ka leksyon sa siyensya, gitun-an ang usa ka itik isip usa ka itik, unsa ang mga pako niini, unsa ang mga bitiis niini, giunsa kini paglangoy, ug uban pa. Sa usa ka leksyon sa geograpiya, ang parehas nga itik gitun-an ingon usa ka lumulupyo sa kalibutan: kinahanglan nga ipakita sa mapa kung diin kini nagpuyo ug kung diin kini wala. Sa Russian, si Serafima Petrovna nagtudlo kanamo sa pagsulat sa "u-t-k-a" ug pagbasa og usa ka butang mahitungod sa mga itik gikan sa Brem. Sa paglabay, siya nagpahibalo kanamo nga sa German nga itik ingon niini, ug sa Pranses ingon niini. Sa akong hunahuna kini gitawag nga "komplikadong pamaagi" kaniadto. Sa kinatibuk-an, ang tanan migawas nga "sa paglabay."

Veniamin Kaverin, Duha ka kapitan

Sa kinutlo sa ibabaw, si Veniamin Kaverin batid nga nagpakita sa mga kakulangan sa komplikadong pamaagi sa pagtudlo, bisan pa, sa pipila (tingali talagsaon) nga mga kaso, ang mga elemento niini nga pamaagi gipakamatarung. Usa sa maong kaso mao ang periodic table ni D.I. Mendeleev sa mga leksyon sa computer science sa eskwelahan. Ang tahas sa software automation sa mga tipikal nga aksyon nga adunay periodic table klaro alang sa mga estudyante nga nagsugod sa pagtuon sa chemistry, ug gibahin sa daghang mga tipikal nga buluhaton sa kemikal. Sa samang higayon, sulod sa gambalay sa computer science, kini nga buluhaton nagtugot kanato sa pagpakita sa usa ka yano nga porma sa pamaagi sa pagkontrolar sa mga kard, nga mahimong ikapasangil sa graphical programming, nasabtan sa halapad nga diwa sa pulong ingon nga programming gamit ang graphic elemento.

(Abril 8, 2019 mga pagdugang nga gihimo:
Addendum 1: Giunsa Paglihok ang Chemistry Calculator
Apendise 2: mga pananglitan sa mga buluhaton para sa mga filter)

Magsugod ta sa batakang buluhaton. Sa pinakasimple nga kaso, ang periodic table kinahanglang ipakita sa screen sa usa ka window form, diin sa matag cell adunay kemikal nga designation sa elemento: H - hydrogen, He - helium, etc. Kung ang cursor sa mouse nagpunting sa usa ka cell, nan ang pagtawag sa elemento ug ang numero niini gipakita sa usa ka espesyal nga uma sa among porma. Kung gipugos sa tiggamit ang LMB, nan ang pagtawag ug numero sa kini nga napili nga elemento ipakita sa lain nga natad sa porma.

Задачу можно решать на любом универсальном ЯП. Мы возмем простой старый Delpi-7, понятный почти всем. Но прежде чем программировать на ЯП, нарисуем две картинки, например, в Фотошопе. Во-первых, нарисуем Периодическую таблицу в том виде, как мы хотим ее видеть в программе. Сохраним результат в графическом файле table01.bmp.

Alang sa ikaduha nga drowing gigamit namon ang una. Sunud-sunod namon nga pun-on ang mga selyula sa lamesa, gitangtang sa tanan nga mga graphic, nga adunay talagsaon nga mga kolor sa modelo sa kolor sa RGB. Ang R ug G kanunay nga 0, ug B=1 alang sa hydrogen, 2 alang sa helium, ug uban pa. Kini nga drowing mao ang atong control card, nga atong i-save sa file nga gitawag table2.bmp.

Ang unang yugto sa graphic programming sa Photoshop nahuman. Mopadayon kita sa graphical GUI programming sa Delpi-7 IDE. Aron mahimo kini, pag-abli sa usa ka bag-ong proyekto, diin sa panguna nga porma gibutang namon ang usa ka buton sa diyalogo (lamesaDlg), diin ang trabaho uban sa lamesa mahitabo. Sunod nagtrabaho kami sa porma lamesaDlg.

Ibutang ang usa ka sangkap sa klase sa porma THulagway. Получаем Image1. Timan-i nga sa kinatibuk-an, alang sa dagkong mga proyekto, awtomatik nga namugna ang mga ngalan sa porma HulagwayNdiin N mahimong moabot sa pipila ka dosena o labaw pa - dili kini ang pinakamaayo nga estilo sa pagprograma, ug mas makahuluganon nga mga ngalan ang kinahanglan ihatag. Apan sa among gamay nga proyekto, diin N dili molapas sa 2, mahimo nimong ibilin kini ingon nga nahimo.

В свойство Hulagway1. Hulagway i-upload ang file table01.bmp. Kami nagmugna Image2 ug i-load ang among control card didto table2.bmp. Sa kini nga kaso, gihimo namon ang file nga gamay ug dili makita sa tiggamit, ingon sa gipakita sa ubos nga wala nga suok sa porma. Nagdugang kami og dugang nga mga elemento sa pagkontrol, ang katuyoan niini klaro. Ang ikaduhang yugto sa graphical GUI programming sa Delpi-7 IDE nahuman.

Mopadayon kita sa ikatulo nga yugto - pagsulat code sa Delpi-7 IDE. Ang module naglangkob lamang sa lima ka mga tigdumala sa panghitabo: paghimo sa porma (PormaPaghimo), paglihok sa cursor Image1 (Image1MouseMove), нажатие ЛКМ на клетку (Hulagway1 Pag-klik) ug paggawas sa dialog gamit ang OK nga buton (OKBtnClick) o Pagkansela (CancelBtnClick). Ang mga ulohan niini nga mga tigdumala gihimo sa usa ka standard nga paagi gamit ang IDE.

Source code sa module:

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.

Sa among bersyon, nagkuha kami usa ka lamesa sa 104 nga mga elemento (kanunayon gidak-on). Dayag nga kini nga gidak-on mahimong madugangan. Ang mga ngalan sa elemento (mga simbolo sa kemikal) gisulat sa usa ka laray Mga Simbolo sa Talaan. Bisan pa, alang sa mga hinungdan sa pagkakomplikado sa source code, daw maayo nga isulat ang pagkasunod-sunod niini nga mga notasyon sa porma sa mga string constants. PeriodicTableStr1..., PeriodicTableStr4, чтобы при событии создания формы программа сама раскидала эти обозначения по элементам массива. Каждое обозначение элемента состоит из одной или двух латинских букв, причем первая буква прописная, а вторая (если есть) строчная. Это несложное правило реализуется при загрузке массива. Таким образом, последовательность обозначений удается записать сжатым образом без пробелов. Разбивка последовательности на четыре части (константы PeriodicTableStr1..., PeriodicTableStr4) tungod sa mga konsiderasyon sa kasayon ​​sa pagbasa sa source code, tungod kay Ang usa ka linya nga taas kaayo mahimong dili hingpit nga mohaum sa screen.

Sa diha nga ang mouse cursor molihok sa ibabaw sa Image1 handler Image1MouseMove kini nga panghitabo nagtino sa bili sa asul nga kolor nga component sa control card pixel Image2 alang sa kasamtangan nga cursor coordinates. Pinaagi sa pagtukod Image2 kini nga kantidad katumbas sa numero sa elemento kung ang cursor naa sa sulod sa cell; zero kon sa utlanan, ug 255 sa ubang mga kaso. Ang nahabilin nga mga aksyon nga gihimo sa programa walay hinungdan ug wala magkinahanglan og katin-awan.

В дополнение к отмеченным выше стилистическим приемам программирования стоит отметить стиль комментариев. Строго говоря, рассмотренный код настолько маленький и простой, что комментарии выглядят не особо нужными. Однако они были добавлены в том числе и по методическим соображениям — короткий код позволяет сделать нагляднее некоторые общие выводы. В представленном коде декларирован один класс (TtableDlg). Ang mga pamaagi niini nga klase mahimong ibaylo ug dili kini makaapekto sa pagpaandar sa programa sa bisan unsang paagi, apan mahimong makaapekto sa pagkabasa niini. Pananglitan, hunahunaa ang pagkasunod-sunod:

OKBtnClick, Image1MouseMove, FormCreate, Image1Click, CancelBtnClick.

Mahimong dili kini kaayo mamatikdan, apan kini mahimong mas lisud nga basahon ug sabton. Kung wala'y lima, apan napulo ka beses nga mas daghang mga pamaagi sa seksyon pagpatuman sila adunay usa ka bug-os nga lain-laing mga han-ay kay sa mga klase nga mga deskripsyon, unya ang kagubot modugang lamang. Busa, bisan tuod lisud ang estriktong pamatud-an ug mahimo pa gani nga imposible, ang usa makalaum nga ang pagpaila sa dugang nga han-ay makapauswag sa pagkabasa sa code. Kining dugang nga han-ay gipasayon ​​​​sa lohikal nga paggrupo sa daghang mga pamaagi nga nagpahigayon sa mga may kalabutan nga buluhaton. Ang matag grupo kinahanglang hatagan ug titulo, pananglitan:

// работа с таблицей: указание и выбор

Kini nga mga ulohan kinahanglan nga kopyahon sa sinugdanan sa module ug pormat ingon usa ka talaan sa mga sulud. Sa pipila ka mga kaso sa medyo taas nga mga module, ang ingon nga mga talaan sa sulud naghatag dugang nga mga kapilian sa pag-navigate. Sa susama, sa taas nga lawas sa usa ka pamaagi, pamaagi o gimbuhaton, kini angay, una, pagtimaan sa katapusan sa kini nga lawas:

end; // FormCreate

ug, ikaduha, sa mga branched nga mga pahayag nga adunay mga bracket sa programa nagsugod - katapusan, markahi ang pahayag nga gipasabut sa panapos nga bracket:

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

Для выделения заголовков групп и концов тел методов можно добавить строки, превышающие длину большинства операторов и состоящие, например, из символов «=» и «_» соответственно.
Sa makausa pa, kinahanglan nga maghimo kami usa ka reserbasyon: ang among panig-ingnan yano ra kaayo. Ug kung ang code sa usa ka pamaagi dili mohaum sa usa ka screen, mahimong lisud sabton ang unom ka sunod-sunod nga katapusan aron makahimo mga pagbag-o sa code. Sa pipila ka karaan nga mga compiler, pananglitan, ang Pascal 8000 para sa OS IBM 360/370, usa ka kolum sa serbisyo nga sama niini giimprinta sa wala sa listahan

B5
…
E5

Kini nagpasabot nga ang panapos nga parentesis sa linya E5 katumbas sa pangbukas nga parentesis sa linya B5.

Siyempre, ang estilo sa pagprograma usa ka kontrobersyal nga isyu, mao nga ang mga ideya nga gipahayag dinhi kinahanglan nga isipon nga wala’y lain kaysa pagkaon alang sa hunahuna. Mahimong lisud kaayo alang sa duha ka medyo eksperyensiyado nga mga programmer, nga naugmad ug naanad sa lainlaing mga istilo sa daghang mga tuig sa trabaho, nga magkauyon. Kini usa ka lahi nga butang alang sa usa ka estudyante nga nagkat-on sa pagprograma nga wala pa panahon sa pagpangita sa iyang kaugalingon nga istilo. Sa akong hunahuna nga sa kini nga kaso ang magtutudlo kinahanglan nga labing menos ipahayag sa iyang mga estudyante ang ingon ka yano, apan dili klaro nga ideya alang kanila nga ang kalampusan sa usa ka programa nagdepende sa istilo diin gisulat ang gigikanan nga code. Mahimong dili sundon sa estudyante ang girekomenda nga istilo, apan tugoti siya nga maghunahuna sa panginahanglan alang sa "dugang" nga mga aksyon aron mapaayo ang disenyo sa source code.

Pagbalik sa among sukaranan nga problema sa Periodic Table: ang dugang nga pag-uswag mahimong moadto sa lainlaing mga direksyon. Usa sa mga direksyon alang sa pakisayran: kung imong i-hover ang mouse cursor sa ibabaw sa usa ka cell sa lamesa, usa ka window sa impormasyon ang makita nga adunay dugang nga kasayuran sa piho nga elemento. Ang dugang nga pag-uswag mao ang mga pagsala. Pananglitan, depende sa pag-instalar, ang window sa impormasyon maglangkob lamang: ang labing importante nga pisikal ug kemikal nga impormasyon, impormasyon sa kasaysayan sa pagkadiskobre, impormasyon sa pag-apod-apod sa kinaiyahan, usa ka lista sa labing importante nga mga compound (nga naglakip niini nga elemento), pisyolohikal nga mga kabtangan, ngalan sa usa ka langyaw nga pinulongan, ug uban pa e. Ang paghinumdom sa "itik" ni Kaverin diin nagsugod kini nga artikulo, makaingon kita nga sa kini nga pag-uswag sa programa makakuha kita usa ka kompleto nga komplikado sa pagbansay sa natural nga siyensya: dugang sa kompyuter siyensiya, pisika ug chemistry - biology, ekonomikanhong geograpiya, kasaysayan sa siyensiya ug bisan sa langyaw nga mga pinulongan.

Apan ang usa ka lokal nga database dili ang limitasyon. Ang programa natural nga nagkonektar sa Internet. Kung magpili ka ug elemento, ang link gi-aktibo, ug ang artikulo sa Wikipedia bahin niini nga elemento giablihan sa bintana sa web browser. Ang Wikipedia, ingon sa imong nahibal-an, dili usa ka awtoritatibo nga gigikanan. Mahimo nimong itakda ang mga link sa mga awtoritatibo nga gigikanan, pananglitan, ang kemikal nga ensiklopedia, TSB, abstract nga mga journal, mga pangutana sa pag-order sa mga search engine alang niini nga elemento, ug uban pa. Nga. Ang mga estudyante makahimo sa pagkompleto sa yano apan makahuluganon nga mga buluhaton sa DBMS ug mga hilisgutan sa Internet.

Agi og dugang sa mga pangutana sa usa ka indibidwal nga elemento, makahimo ka og mga gamit nga, pananglitan, magmarka sa mga selula sa lamesa nga nakab-ot sa pipila ka mga criteria nga adunay lain-laing mga kolor. Pananglitan, metal ug non-metal. O mga selula nga gilabay ngadto sa mga tubigan sa usa ka lokal nga kemikal nga planta.

Mahimo usab nimo ipatuman ang mga gimbuhaton sa usa ka organizer sa notebook. Pananglitan, i-highlight sa lamesa ang mga elemento nga gilakip sa eksaminasyon. Dayon i-highlight ang mga elemento nga gitun-an/gisubli sa estudyante agig pagpangandam sa eksaminasyon.

Ug dinhi, pananglitan, usa sa kasagaran nga mga problema sa chemistry sa eskwelahan:

Gihatag 10 g sa chalk. Pila ka hydrochloric acid ang kinahanglan nga kuhaon aron matunaw kining tanan nga chalk?

Aron masulbad kini nga problema, kinahanglan nga isulat ang chem. reaksyon ug pagbutang sa mga coefficient niini, kuwentaha ang mga molekular nga gibug-aton sa calcium carbonate ug hydrogen chloride, dayon i-compose ug sulbaron ang proporsyon. Ang usa ka calculator nga gibase sa among sukaranan nga programa mahimong makalkula ug masulbad. Tinuod, kinahanglan nimo nga tagdon nga ang acid kinahanglan nga makuha sa makatarunganon nga sobra ug sa usa ka makatarunganon nga konsentrasyon, apan kini usa ka chemistry, dili siyensya sa kompyuter.
Addendum 1: Giunsa Paglihok ang Chemistry CalculatorРазберем работу калькулятора на примере приведенной выше задачи мела и “солянки”. Начнем с реакции:

CaCO3 + 2HCl = CaCl2 + H2O

Gikan niini atong makita nga atong gikinahanglan ang atomic nga gibug-aton sa mosunod nga mga elemento: calcium (Ca), carbon (C), oxygen (O), hydrogen (H) ug chlorine (Cl). Sa pinakasimple nga kaso, mahimo natong isulat kini nga mga gibug-aton ngadto sa usa ka dimensyon nga han-ay nga gihubit ingon

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

где индекс массива соответствует номеру элемента. Еще на свободное место формы lamesaDlg ibutang ang duha ka field. Sa una nga natad kini sa sinugdan gisulat: "Ang una nga reagent gihatag", sa ikaduha - "Ang ikaduha nga reagent mao ang pagpangita sa x". Atong itudlo ang mga uma reagent1, reagent2 matag usa. Ang ubang mga pagdugang sa programa mahimong klaro gikan sa mosunod nga pananglitan sa calculator.

Nag-type kami sa keyboard sa kompyuter: 10 g. Inskripsiyon sa uma reagent1 mga kausaban: "Ang unang reagent gihatag 10 g." Karon atong gisulod ang pormula niini nga reagent, ug ang calculator magkalkulo ug magpakita sa gibug-aton sa molekula niini sa imong pagsulod niini.

I-klik ang LMB sa table cell nga adunay simbolo nga Ca. Inskripsiyon sa kapatagan reagent1 mga kausaban: "Unang reagent Ca 40.078 gihatag 10 g."

I-klik ang LMB sa table cell nga adunay simbolo nga C. Inscription sa field reagent1 меняется: “Первый реагент CaC 52.089 дано 10 г”. Т.е. калькулятор сложил атомные веса кальция и углерода.

I-klik ang LMB sa table cell nga adunay simbolo nga O. Inscription sa field reagent1 mga kausaban: "Unang reagent CaCO 68.088 gihatag 10 g." Gidugang sa calculator ang atomic nga gibug-aton sa oxygen sa suma.

I-klik ang LMB sa table cell nga adunay simbolo nga O. Inscription sa field reagent1 mga kausaban: "Unang reagent CaCO2 84.087 gihatag 10 g." Gidugang na usab sa calculator ang atomic nga gibug-aton sa oxygen sa suma.

I-klik ang LMB sa table cell nga adunay simbolo nga O. Inscription sa field reagent1 меняется: “Первый реагент CaCO3 100.086 дано 10 г”. Калькулятор снова добавил к сумме атомный вес кислорода.

Pindota ang Enter sa keyboard sa imong computer. Ang pagpaila sa una nga reagent nahuman ug gibalhin sa uma reagent2. Timan-i nga sa kini nga pananglitan naghatag kami usa ka gamay nga bersyon. Kung gusto, dali nimo maorganisar ang mga multiplier sa mga atomo sa parehas nga tipo, aron, pananglitan, dili nimo kinahanglan nga mag-klik sa pito ka beses nga sunud-sunod sa oxygen cell kung mosulod sa pormula sa chromium (K2Cr2O7).

I-klik ang LMB sa table cell nga adunay simbolo nga H. Inscription sa field reagent2 kausaban: "Ikaduhang reagent H 1.008 pangitaa x."

I-klik ang LMB sa table cell nga adunay simbolo nga Cl. Inskripsiyon sa kapatagan reagent2 mga kausaban: "Ikaduhang reagent HCl 36.458 pangitaa x." Gidugang sa calculator ang atomic nga gibug-aton sa hydrogen ug chlorine. Sa ibabaw nga equation sa reaksyon, ang hydrogen chloride giunhan sa usa ka coefficient nga 2. Busa, i-klik ang LMB sa field reagent2. Молекулярный вес удваивается (при двойном нажатии утраивается и т.д.). Надпись в поле reagent2 меняется: “Второй реагент 2HCl 72.916 найти х”.

Pindota ang Enter sa keyboard sa imong computer. Ang pagsulod sa ikaduhang reagent nahuman, ug ang calculator nakakaplag x gikan sa proporsyon

Mao kana ang kinahanglan namon nga pangitaon.

Nota 1. Ang kahulogan sa resulta nga proporsiyon: para sa dissolution 100.086 Da chalk nagkinahanglan 72.916 Da acid, ug sa dissolve 10 g sa chalk kinahanglan x acid.

Nota 2. Mga koleksyon sa parehas nga mga problema:

Khomchenko I. G., Koleksyon sa mga problema ug mga ehersisyo sa chemistry 2009 (grado 8-11).
Khomchenko G. P., Khomchenko I. G., Koleksyon sa mga problema sa chemistry alang sa mga aplikante sa unibersidad, 2019.

Nota 3. Для упрощения задачи можно в начальной версии упростить ввод формулы и просто дописывать символ элемента в конец строки формулы. Тогда формула карбоната кальция будет иметь вид:
CaCOOO
Apan ang magtutudlo sa chemistry dili tingali ganahan sa ingon nga rekording. Dili lisud ang paghimo sa husto nga pagsulod - aron mahimo kini kinahanglan nimo nga magdugang usa ka laray:

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

diin ang indeks mao ang gidaghanon sa kemikal nga elemento, ug ang bili niini nga indeks mao ang gidaghanon sa mga atomo (sa sinugdan ang tanang elemento sa array gi-reset sa zero). Ang han-ay diin ang mga atomo gisulat sa usa ka pormula, ingon nga gisagop sa chemistry, kinahanglan nga tagdon. Pananglitan, pipila ka mga tawo ang ganahan sa O3CaC. Atong ibalhin ang responsibilidad sa tiggamit. Paghimo og array:

 formulaOrder : array [1..size] of integer; // можно взять покороче

diin atong isulat ang gidaghanon sa kemikal nga elemento sumala sa indeks sa dagway niini sa pormula. Pagdugang og atomo 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;

Nota 4. Makataronganon ang paghatag sa abilidad sa alternatibong pagsulod sa pormula sa reagent gikan sa keyboard. Sa kini nga kaso, kinahanglan nimo nga ipatuman ang usa ka yano nga parser.

Angay nga matikdan nga:

Karon, adunay daghang gatusan nga mga bersyon sa lamesa, ug ang mga siyentipiko kanunay nga nagtanyag mga bag-ong kapilian. (Wikipedia)

Ученики могут проявить смекалку и в этом направлении, реализуя какой-нибудь из уже предложенных вариантов или попробовать сделать свой оригинальный. Может показаться, что это наименее полезное для уроков информатики направление. Однако в реализованной в этой статье форме Периодической таблицы некоторые ученики могут не разглядеть особых преимуществ управляющих карт перед альтернативным решением с помощью стандартных кнопок TButton. Ang spiral nga porma sa lamesa (diin ang mga selula lain-laing mga porma) mas tin-aw nga magpakita sa mga bentaha sa solusyon nga gisugyot dinhi.

(Alternatibong sistema sa mga elemento ni Theodore Benfey, Tinubdan)

Idugang usab nato nga ang ubay-ubay nga kasamtangan nga mga programa sa kompyuter alang sa Periodic Table gihulagway sa bag-o lang nga gipatik sa Habré artikulo.

Дополнение 2: примеры задач для фильтровС помощью фильтров можно решать, например, такие задачи:

1) Pilia sa lamesa ang tanan nga mga elemento nga nahibal-an sa Middle Ages.

2) Выделить все элементы, известные к моменту открытия Периодического закона.

3) Ilha ang pito ka elemento nga giisip sa mga alchemist nga metal.

4) Выделить все элементы, которые находятся в газообразном состоянии при нормальных условиях (н.у.).

5) Pilia ang tanan nga mga elemento nga naa sa likido nga kahimtang sa no.

6) Pilia ang tanang elemento nga naa sa solid state sa no.

7) Выделить все элементы, которые могут долгое время находиться на воздухе без заметных изменений при н.у.

8) Выделить все металлы, которые растворяются в соляной кислоте.

9) Pilia ang tanang metal nga matunaw sa sulfuric acid sa no.

10) Pilia ang tanang metal nga matunaw sa sulfuric acid kon init.

11) Pilia ang tanang metal nga matunaw sa nitric acid.

12) Ihimulag ang tanang metal nga kusog mo-react sa tubig sa palibot nga mga kondisyon.

13) Pilia ang tanan nga mga metal.

14) Pag-ila sa mga elemento nga kaylap sa kinaiyahan.

15) Ilha ang mga elemento nga makita sa kinaiyahan sa usa ka gawasnon nga kahimtang.

16) Ilha ang mga elemento nga adunay labing importante nga papel sa lawas sa tawo ug mananap.

17) Pagpili sa mga elemento nga kaylap nga gigamit sa adlaw-adlaw nga kinabuhi (sa libre nga porma o sa kombinasyon).

18) Выделить элементы, работы с которыми наиболее опасны и требуют специальных мер и средств защиты.

19) Ilha ang mga elemento nga, sa libre nga porma o sa porma sa mga compound, naghatag sa labing dako nga hulga sa kinaiyahan.

20) Pagpili ug bililhong mga metal.

21) Ilha ang mga elemento nga mas mahal kay sa mahal nga mga metal.

Mga nota

1) Makataronganon ang paghatag og daghang mga pagsala. Pananglitan, kung imong i-on ang usa ka filter aron masulbad ang problema 1 (tanan nga mga elemento nga nahibal-an sa Middle Ages) ug 20 (mahal nga mga metal), nan ang mga cell nga adunay mahal nga mga metal nga nahibal-an sa Middle Ages ipasiugda (pananglitan, pinaagi sa kolor) ( pananglitan, ang palladium dili ipasiugda, giablihan sa 1803).

2) Makataronganon ang pagsiguro nga daghang mga pagsala ang naglihok sa ingon nga mode nga ang matag filter nagpili sa mga selyula nga adunay kaugalingon nga kolor, apan dili hingpit nga makuha ang pagpili sa lain nga filter (bahin sa cell sa usa ka kolor, bahin sa lain). Dayon, sa kaso sa miaging pananglitan, ang mga elemento sa intersection sa mga set nga nadiskobrehan sa Middle Ages ug mga mahal nga metal, ingon man ang mga elemento nga iya lamang sa una ug sa ikaduha lamang nga mga set, makita. Mga. bililhon nga mga metal nga wala mailhi sa Middle Ages, ug mga elemento nga nailhan sa Middle Ages apan dili mahal nga mga metal.

3) Makataronganon kini human magamit ang filter aron maseguro ang posibilidad sa ubang trabaho sa mga resulta nga nakuha. Pananglitan, nga adunay pinili nga mga elemento nga nahibal-an sa Middle Ages, ang tiggamit nag-klik sa LMB sa pinili nga elemento ug gidala ngadto sa artikulo sa Wikipedia mahitungod niini nga elemento.

4) Имеет смысл обеспечить возможность пользователю снимать выделение нажатием ЛКМ на выделенную клетку таблицы. Например, чтобы убрать уже просмотренные элементы.

5) Makataronganon ang pagsiguro nga ang lista sa mga pinili nga mga selyula gitipigan sa usa ka file ug nga ang ingon nga file puno sa awtomatikong pagpili sa mga selyula. Makahatag kini sa tiggamit ug higayon nga makapahulay gikan sa trabaho.

Gigamit namo ang usa ka static, gitino nang daan nga mapa sa pagkontrol, apan adunay daghang importante nga mga buluhaton diin ang mga dinamikong kontrol nga mga mapa nga mausab samtang ang programa mahimong magamit. Usa ka pananglitan mao ang usa ka graph editor, diin ang user naggamit sa mouse aron ipakita ang mga posisyon sa mga vertices sa usa ka bintana ug magdrowing og mga ngilit tali kanila. Aron matangtang ang usa ka vertex o ngilit, ang tiggamit kinahanglan nga magtudlo niini. Apan kung sayon ​​​​ra ang pagtudlo sa usa ka vertex nga gimarkahan og usa ka lingin, nan kini mahimong mas lisud nga itudlo ang usa ka ngilit nga gilaraw nga adunay manipis nga linya. Ang usa ka kontrol nga mapa makatabang dinhi, diin ang mga vertices ug mga ngilit nag-okupar sa mas lapad nga mga kasilinganan kaysa sa makita nga numero.

Usa ka makapaikag nga bahin nga pangutana nga may kalabutan sa kini nga pamaagi sa komplikado nga pagbansay mao ang: mahimo ba kini nga pamaagi nga mapuslanon sa pagbansay sa AI?

Source: www.habr.com