Çàî÷íîå äèñòàíöèîííîå îáðàçîâàíèå ñ ïîëó÷åíèåì ãîñóäàðñòâåííîãî äèïëîìà ÷åðåç Internet










Ïîëó÷èòü èíôîðìàöèþ î ïîñòóïëåíèè
 
Ãëàâíàÿ Íîâîñòè Êàðòà ñàéòà Ôîòîàëüáîì Ãîñòåâàÿ êíèãà Êîíòàêòû

 

Óïðàæíåíèå 1

Èëëþñòðàöèåé îïèñàíèÿ ìíîæåñòâ è îïåðàöèé íàä íèìè ìîæåò ñëóæèòü ïðîãðàììà Dem_Mno, â êîòîðîé îïèñàíû ìíîæåñòâà ÷èñåë D, D1, D2, D3. Çàòåì îíè çàïîëíåíû ñëåäóþùèì îáðàçîì: ìíîæåñòâî D1 – ÷åòíûìè ÷èñëàìè 2, 4, 6, 8; ìíîæåñòâî D2 – ÷èñëàìè 0, 1, 2, 3, 5; ìíîæåñòâî D3 – íå÷åòíûìè ÷èñëàìè 1, 3, 5, 7, 9. Ïîñëå ýòîãî íàä ìíîæåñòâàìè âûïîëíåíû îïåðàöèè îáúåäèíåíèÿ, ðàçíîñòè è ïåðåñå÷åíèÿ.

program Dem_Mno: {Äåìîíñòðàöèÿ îïåðàöèé íàä ìíîæåñòâàìè}

type Digits = set of 0..9:

var

Dl. D2. D3. D : Digits:

begin

Dl:=[2,4,6,8]: {Çàïîëíåíèå ìíîæåñòâ}

D2:=[0..3,5]:

D3:=[1.3.5.7,9];

D:=D1 + D2; {Îáúåäèíåíèå ìíîæåñòâ 01 è 02}

D:=D + D3; {Îáúåäèíåíèå ìíîæåñòâ D è D3}

D:=D - D2: {Ðàçíîñòü ìíîæåñòâ D è D2}

D:=D * Dl: {Ïåðåñå÷åíèå ìíîæåñòâ D è 01}

end.

Êàê âèäíî èç òåêñòà ïðîãðàììû, ñíà÷àëà îïèñàí òèï Digits = set of 0..9, çàòåì îïèñàíû ïåðåìåííûå Dl, D2, D3, D ýòîãî òèïà.  ïåðâîé ÷àñòè ïðîãðàììû îñóùåñòâëÿåòñÿ çàïîëíåíèå ìíîæåñòâ, à çàòåì íàä ìíîæåñòâàìè âûïîëíÿþòñÿ îïåðàöèè îáúåäèíåíèÿ, ïåðåñå÷åíèÿ, ðàçíîñòè.

Äëÿ ïðîâåðêè ðàáîòû ïðîãðàììû çàïóñòèòå èíòåãðèðîâàííóþ ñðåäó ïðîãðàììèðîâàíèÿ. Ââåäèòå òåêñò ïðîãðàììû Dem_Mno è çàïèøèòå ôàéë íà äèñê ïîä ñîîòâåòñòâóþùèì èìåíåì, à çàòåì îòêîìïèëèðóéòå åãî. Òàê êàê â Pascal îòñóòñòâóþò ñðåäñòâà ââîäà-âûâîäà ýëåìåíòîâ ìíîæåñòâà, òî ðàáîòó ïðîãðàììû ïðèäåòñÿ ïðîâåðÿòü, âûïîëíÿÿ åå â ïîøàãîâîì ðåæèìå è îòñëåæèâàÿ èçìåíåíèÿ çíà÷åíèé ïåðåìåííûõ Dl, D2, D3, D â îêíå ïðîñìîòðà.



 
     
   
 


Ïðèãëàøàåì ïðèíÿòü ó÷àñòèå â êðóãëîì ñòîëå!
ïîäðîáíåå   >>>
 

Èíñòèòóò Ìåíåäæìåíòà, Ýêîíîìèêè è Èííîâàöèé íà÷èíàåò íàáîð íà êóðñû ïîâûøåíèÿ êâàëèôèêàöèè!
ïîäðîáíåå   >>>
 

Óâàæåìûå ñòóäåíòû ÀÍÎ ÂÏÎ ÈÌÝèÈ!
ïîäðîáíåå   >>>
 

Íà÷èíàåòñÿ íàáîð íà êóðñû ïîâûøåíèÿ êâàëèôèêàöèè!
ïîäðîáíåå   >>>
 

Ïðèãëàøàåì ïðèíÿòü ó÷àñòèå â êîíôåðåíöèÿõ!
ïîäðîáíåå   >>>
 


âñå íîâîñòè...

 


Ðàññûëêè Subscribe.Ru
Ñîâðåìåííîå îáðàçîâàíèå
Ïîäïèñàòüñÿ ïèñüìîì