Реферат: Арканоид на Паскале

Âõîäíûå äàííûå:

pause – ïðåäïîëàãàåìàÿ ïàóçà;

Âûõîäíûå äàííûå:

pause – óæå îïðåäåë¸ííàÿ ïàóçà;

10. procedure zapis(const xs,ys:t_kubik; i:t_kubik;var a:t_arr);

Íàçíà÷åíèå: îïðåäåëÿåò íà êàêèå ìåñòà â ìàññèâå çàïèñûâàòü êîîðäèíàòû êóáèêà;

Âõîäíûå äàííûå:

1) xs,ys – êîîðäèíàòû øàðèêà, êîòîðûå è íóæíî çàïèñàòü â ìàññèâ;

24. i – ïåðåìåííàÿ îò êîòîðîé çàâèñèò ñ êàêîãî íîìåðà èñêàòü ïîäõîäÿùåå ìåñòî äëÿ êîîðäèíàò êóáèêà;

25. a – ìàññèâ êîîðäèíàò êóáèêîâ;

Âûõîäíûå äàííûå: íåò

11. procedure level(var a:t_arr;const numbering:byte;var kol_kub:kol_kubik);

Íàçíà÷åíèå: îòêðûâàåò ôàéë è ñ÷èòûâàÿ ñ íåãî êîîðäèíàòû êóáèêîâ, ðèñóåò èõ;

Âõîäíûå äàííûå:

1. a – ìàññèâ êîîðäèíàò êóáèêîâ;

2. numbering – íîìåð îòêðûâàåìîãî ýòàïà;

3. kol_kub – êîëè÷åñòâî êóáèêîâ;

Âûõîäíûå äàííûå:

1. a – ìàññèâ êîîðäèíàò êóáèêîâ;

2) kol_kub – êîëè÷åñòâî íàðèñîâàííûõ êóáèêîâ;

12. procedure left(const koeff:byte;var x1_dv,x2_dv:t_kubik);

Íàçíà÷åíèå: äâèæåíèå ïëàíêè âëåâî;

Âõîäíûå äàííûå:

1) koeff – êîýôôèöèåíò, îò êîòîðîãî çàâèñèò ðàçìåð ïëàíêè;

2. x1_dv,x2_dv – êîîðäèíàòû ïëàíêè ïî îñè Õ;

Âûõîäíûå äàííûå:

x1_dv,x2_dv – èçìåíèâøèåñÿ êîîðäèíàòû ïëàíêè ïî îñè Õ;

13. procedure right(const koeff:byte;var x1_dv,x2_dv:t_kubik);

Íàçíà÷åíèå: äâèæåíèå ïëàíêè âïðàâî;