Библиотека программи�та
Пользователь

Добро пожаловать,

Реги�траци� или входРеги�траци� или вход
Потер�ли пароль?Потер�ли пароль?

�ик:
Пароль:

Меню �айта




Ваше мнение
Как вы оцените наш �айт?

Замечательный
Хороший
Обычный
Плохой
Отвратительный


Результаты
Другие опро�ы

В�его голо�ов: 849
Комментарии: 10


�аши партнеры



Стати�тика




Programming books  Download software  Documentation  Scripts  Content Managment Systems(CMS)  Templates  Icon Sets  Articles  Contacts  Voting  Site Search




Книги-online



Ëàáîðàòîðíàÿ ðàáîòà ¹1

Ëàáîðàòîðíàÿ ðàáîòà ¹1


Ïðîãðàììèðîâàíèå ëèíåéíûõ àëãîðèòìîâ

Òåîðåòè÷åñêèé ìàòåðèàë Ñïðàâî÷íèê ïî ïðîöåäóðàì è ôóíêöèÿì


Öåëü ðàáîòû: âûðàáîòàòü ïðàêòè÷åñêèå íàâûêè ðàáîòû ñ ñèñòåìîé Borland Pascal, íàó÷èòüñÿ ñîçäàâàòü, ââîäèòü â êîìïüþòåð, âûïîëíÿòü è èñïðàâëÿòü ïðîñòåéøèå ïðîãðàììû íà ÿçûêå Pascal â ðåæèìå äèàëîãà, ïîçíàêîìèòüñÿ ñ äèàãíîñòè÷åñêèìè ñîîáùåíèÿìè êîìïèëÿòîðà îá îøèáêàõ ïðè âûïîëíåíèè ïðîãðàìì, ðåàëèçóþùèõ ëèíåéíûå àëãîðèòìû.

Îáùèå ñâåäåíèÿ:

Ëèíåéíûì íàçûâàåòñÿ àëãîðèòì, â êîòîðîì ðåçóëüòàò ïîëó÷àåòñÿ ïóòåì îäíîêðàòíîãî âûïîëíåíèÿ çàäàííîé ïîñëåäîâàòåëüíîñòè äåéñòâèé ïðè ëþáûõ çíà÷åíèÿõ èñõîäíûõ äàííûõ. Îïåðàòîðû ïðîãðàììû âûïîëíÿþòñÿ ïîñëåäîâàòåëüíî, îäèí çà äðóãèì, â ñîîòâåòñòâèè ñ èõ ðàñïîëîæåíèåì â ïðîãðàììå.

Ïðèìåð

Ïðèìåð1: Îïðåäåëèòü ðàññòîÿíèå íà ïëîñêîñòè ìåæäó äâóìÿ òî÷êàìè ñ çàäàííûìè êîîðäèíàòàìè M1(x1,y1) è M2(x2,y2)

Ýòàïû ðåøåíèÿ çàäà÷è:
  1. Ìàòåìàòè÷åñêàÿ ìîäåëü: ðàññòîÿíèå íà ïëîñêîñòè ìåæäó äâóìÿ òî÷êàìè M1(x1,y1) è M2(x2,y2) âûñ÷èòûâàåòñÿ ïî ôîðìóëå
  2. Ñîñòàâèì ñõåìó àëãîðèòìà


Óòî÷íèì ñîäåðæèìîå áëîêàñ "Âû÷èñëåíèå è ïå÷àòü ðàññòîÿíèÿ"


Äàëüíåéøàÿ äåòàëèçàöèÿ íå òðåáóåòñÿ. Ïåðåâîäèì áëîê-ñõåìó íà ÿçûê Ïàñêàëü.
program example1; 
var x1, x2, y1, y2: integer; 
   d:real; 
begin 
    write('x1= '); readln(x1); 
    write('y1= '); readln(y1); 
    write('x2= '); readln(x2); 
    write('y2= '); readln(y2); 
    d:=sqrt(sqr(x2-x1)+sqr(y2-y1)); 
writeln('d=',d); 
end. 
Äîðàáîòàåì ïðîãðàììó, òàê ÷òîáû îíà îáëàäàëà íåêîòîðûì èíòåðôåéñîì.: 
program example1; 
var x1, x2, y1, y2: integer; 
    d:real; 
begin 
    writeln('Ýòà ïðîãðàììà âû÷èñëÿåò ðàññòîÿíèå ìåæäó äâóìÿ òî÷êàìè íà ïëîñêîñòè'); 
    writeln('Ââåäèòå êîîðäèíàòû äâóõ òî÷åê:'); 
    write('x1= '); readln(x1); 
    write('y1= '); readln(y1); 
    write('x2= '); readln(x2); 
    write('y2 ='); readln(y2); 
    d:=sqrt(sqr(x2-x1)+sqr(y2-y1)); 
    writeln('d= ',d); 
    writeln('íàæìèòå Enter äëÿ çàâåðøåíèÿ ðàáîòû ïðîãðàììû'); 
    readln; 
end. 

Êîíòðîëüíûå âîïðîñû:

  1. Êàêîâû íàçíà÷åíèå è âîçìîæíîñòè ñèñòåìû Borland Pascal?
  2. Êàê çàïóñòèòü ïðîãðàììó íà òðàíñëÿöèþ è âûïîëíåíèå?
  3. Êàê çàïèñûâàþòñÿ îïåðàòîðû íà÷àëà è êîíöà ïðîãðàììû?
  4. Èç êàêèõ ðàçäåëîâ ñîñòîèò ïðîãðàììà íà ÿçûêå Pascal?
  5. Â êàêîé ïîñëåäîâàòåëüíîñòè äîëæíû áûòü çàïèñàíû ðàçäåëû ïðîãðàììû íà ÿçûêå Pascal?
  6. Êàê çàïèñûâàþòñÿ îïåðàòîðû âûâîäà íà ýêðàí â Pascal?

Çàäà÷è:

  1. Äàíà äëèíà ðåáðà êóáà. Íàéòè îáúåì êóáà è ïëîùàäü åãî áîêîâîé ïîâåðõíîñòè.
  2. Òðè ñîïðîòèâëåíèÿ R1, R2, R3 ñîåäèíåíû ïàðàëëåëüíî. Íàéòè ñîïðîòèâëåíèå ñîåäèíåíèÿ.
  3. Îïðåäåëèòü âðåìÿ ïàäåíèÿ êàìíÿ íà ïîâåðõíîñòü çåìëè ñ âûñîòû h.
  4. Èçâåñòíà äëèíà îêðóæíîñòè. Íàéòè ïëîùàäü êðóãà, îãðàíè÷åííîãî ýòîé îêðóæíîñòüþ.
  5. Òðåóãîëüíèê çàäàí êîîðäèíàòàìè ñâîèõ âåðøèí. Íàéòè:
    • ïåðèìåòð òðåóãîëüíèêà;
    • ïëîùàäü òðåóãîëüíèêà.
  6. Âû÷èñëèòü âûñîòó òðåóãîëüíèêà, îïóùåííóþ íà ñòîðîíó à, ïî èçâåñòíûì çíà÷åíèÿì äëèí åãî ñòîðîí a, b, c.
  7. Âû÷èñëèòü îáúåì öèëèíäðà ñ ðàäèóñîì îñíîâàíèÿ r è âûñîòîé h.
  8. Îïðåäåëèòü ðàññòîÿíèå, ïðîéäåííîå ôèçè÷åñêèì òåëîì çà âðåìÿ t, åñëè òåëî äâèæåòñÿ ñ ïîñòîÿííûì óñêîðåíèåì à è èìååò â íà÷àëüíûé ìîìåíò âðåìåíè ñêîðîñòü V0
  9. Âû÷èñëèòü ïëîùàäü òðåóãîëüíèêà ïî ôîðìóëå Ãåðîíà, åñëè çàäàíû åãî ñòîðîíû.
  10. Îïðåäåëèòü êîîðäèíàòû âåðøèíû ïàðàáîëû y=ax2+bx+c (a¹0). Êîýôôèöèåíòû a,b,c çàäàíû.
  11. Ïî äàííûì ñòîðîíàì ïðÿìîóãîëüíèêà âû÷èñëèòü åãî ïåðèìåòð, ïëîùàäü è äëèíó äèàãîíàëè.
Çàäà÷è ïîâûøåííîé ñëîæíîñòè
  1. Ñòóäåíò íà÷àë ðåøàòü çàäà÷è äàííîãî óðîêà ïðîãðàììèðîâàíèÿ, êîãäà ýëåêòðîííûå ÷àñû ïîêàçûâàëè h1 ÷àñîâ è min1 ìèíóò, à çàêîí÷èë, êîãäà áûëî h2 ÷àñîâ è min2 ìèíóò. Ñîñòàâüòå ïðîãðàììó, ïîçâîëÿþùóþ îïðåäåëèòü, ñêîëüêî âðåìåíè ñòóäåíò ðåøàë ýòè çàäà÷è. (Áóäåì ñ÷èòàòü, ÷òî çàäà÷è ðåøàëèñü íå äîëüøå ñóòîê.)
  2. Äàíî äåéñòâèòåëüíîå ÷èñëî à. Íå ïîëüçóÿñü íèêàêèìè äðóãèìè îïåðàöèÿìè, êðîìå óìíîæåíèÿ, ïîëó÷èòü: à) à4 çà äâå îïåðàöèè; á) à6 çà òðè îïåðàöèè; â) à7 çà ÷åòûðå îïåðàöèè; ã) à8 çà òðè îïåðàöèè; ä) à9 çà ÷åòûðå îïåðàöèè; å) à10 çà ÷åòûðå îïåðàöèè; æ) à13 çà ïÿòü îïåðàöèé; ç) à15 çà ïÿòü îïåðàöèé; è) à21 çà øåñòü îïåðàöèé; ê) à28 çà øåñòü îïåðàöèé; ë) à64 çà øåñòü îïåðàöèé;
  3. Íàéòè ìàêñèìóì è ìèíèìóì äâóõ íàòóðàëüíûõ ÷èñåë íå èñïîëüçóÿ âåòâëåíèÿ àëãîðèòìà.
    Íàçàä
    Íà ãëàâíóþ
        Ó÷åáíèê ïî ÿçûêó Pascal          Ëàáîðàòîðíûå ðàáîòû ïî ïðîãðàììèðîâàíèþ          Ñïðàâî÷íèê


Внимание! Е�ли у ва� не получило�ь найти нужную информацию, и�пользуйте рубрикатор или во�пользуйте�ь пои�ком


.


книги по программированию и�ходники компоненты шаблоны �айтов C++ PHP Delphi �качать