Results 1 to 8 of 8

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User
    Join Date: Dec:2017
    Location: Ñòàðà Çàãîðà
    Posts: 2

    Çàäà÷à íà Pascal

    program studenti;
    type
    Student = record
    Ime: string;
    EGN: integer;
    Fakulteten: integer;
    Ocenki: array [1..123456789] of integer;
    end;
    var x: Student; m:string; n,j,h,f:real;
    begin
    WriteLn('Èìå: '); Readln(m);
    WriteLn('ÅÃÍ: '); Readln(n);
    WriteLn('Ôàêóë& #242;åòåí íîìåð: '); Readln(j);
    WriteLn('Îöåíê& #232;: '); Readln(f);
    ReadLn;
    end.

    Çäðàâåéòå,èìàì ïèòàíå çà òàçè çàäà÷à ïðè âúâåæäàíå íà îöåíêèòå ñëåä âòîðàòà ìå èçõâúðëÿ ïîìîù?

    òîâà å çàäà÷àòà: çà ãðóïà ñòóäåíòè ñà çàäàäåíè èìå,åãí,ôàêóëòåòåí íîìåð,îöåíêè ïî äåñåò ïðåäìåòà è ñðåäåí óñïåõ.Äà ñå ñúñòàâè ïðîãðàìà ñ ïîäïðîãðàìè:
    -ôàéë ñ èíôîðìàöèÿ çà ñòóäåíòèòå,áåç ñðåäåí óñïåõ
    -èç÷èñëÿâàíå íà ñðåäåí óñïåõ íà âñåêè ñòóäåíò
    -èçâåæäàíå íà ôàê.íîìåð íà ñòóäåíòè ñ ïîâå÷å îò òðè äâîéêè

  2. #2
    The Unknown rager's Avatar
    Join Date: Jul:2004
    Location: Edge Of Darkness
    Posts: 30,360
    Âèæ ïðèêà÷åíàòà òåìà íàé-ãîðå â ðàçäåëà:
    Quote Originally Posted by delian View Post
    Çà çàäà÷è ïî ïðîãðàìèðàíå çà äîìàøíè, êóðñîâè, äèïëîìíè ðàáîòè è äðóãè ïîäîáíè ñå äàâàò ñàìî ïðåïîðúêè, êîãàòî ïèòàùèÿò èìà ïîíå ìàëêà èäåÿ îò ìàòåðèÿòà (èëè íÿêàêâà çàãîòîâêà çà ðåøåíèå), íî íå è ãîòîâè ðåøåíèÿ, â ñúñòàâÿíåòî íà êîèòî àâòîðúò íà òåìàòà íÿìà àáñîëþòíî íèêàêâî ó÷àñòèå.
    Ãîòîâî ðåøåíèå íÿìà äà ïîëó÷èø, êàòî ãëåäàì çàäàíèåòî:
    - êúäå ñà òè ïðîöåäóðèòå (ïîäïðîãðàìèòå) è ôóíêöèèòå, êîèòî ñå èñêàò;
    - êúäå å öèêúëúò íà îñíîâíîòî ìåíþ çà èçáîð;
    - êúäå å ñúñòàâÿíåòî íà ôàéëà ñ èíôîðìàöèÿ çà ñòóäåíòèòå ñ öèêúë çà âúâåæäàíå íà äàííèòå;
    - è ò.í, è ò.í.
    Ðåàëíî íå ñè íàïèñàë íèùî äî ìîìåíòà, òàêà ÷å çàùî "ïðè âúâåæäàíå íà îöåíêèòå ñëåä âòîðàòà ìå èçõâúðëÿ" å íàé-ìàëêèÿò ïðîáëåì .
    Asus CH6H|Ryzen 1800X@4.1GHz|4xBLS8G4D32AESTK@3666MHz 14-19-12-36-58-1T|GB GTX1060 3GB OC|MP510 960GB|SS-1000XP|CM STACKER STC-T01-UW1
    Thermochill PA120.2+PA120.3+PA140.3|Yate Loon 5xD12SH-12+3xD14SH-12|Laing DDC 2+Toshiba DIYINHK|EK DDC X-Top v2+EK Reservoir|EK Supreme HF #6

  3. #3
    Registered User
    Join Date: Dec:2017
    Location: Ñòàðà Çàãîðà
    Posts: 2
    íåùî òàêîâà ìè òðÿáâà ìàëêî îò ìàëêî äà ìè ñâåòíå

  4. #4
    òÈìÈðóòÈí
    Join Date: Feb:2002
    Location: Ñîôèÿ
    Posts: 724
    Îò èìà-íÿìà 25 ãîäèíè íå ñúì ïèñàë íà Ïàñêàë, íî äà òè íàõâúðëÿì íàêîëêî èäåè ïî çàäà÷àòà ... Äàíî ïîìîãíà ïîâå÷å, îòêîëêîòî äà òå îáúðêàì.

    Êàêòî å ïîñî÷èë ïî-ãîðå rager, òðÿáâà äà îðãàíèçèðàø êîäà íà ïðîãðàìàòà â íÿêîëêî ïðîöåäóðè. Íàé-ëåñíî å äà ðàçäåëèø ïðîöåäóðèòå äà èçïúëíÿâàò òî÷êèòå, êîèòî ñè ïîñî÷èë â ïúðâèÿ òè ïîñò - îñíîâíà ïðîãðàìà, êîÿòî "âèêà" åäíà ñëåä äðóãà ïðîöåäóðè çà:
    1. Ñúçäàâàíå íà ôàéë ñ èíôîðìàöèÿ çà ñòóäåíòèòå, êîéòî äà áúäå ïîïúëíåí ñ äàííè âúâåäåíè îò êëàâèàòóðàòà.
    2. Èç÷èñëÿâàíå íà ñðåäåí óñïåõ çà âñåêè ñòóäåíò, íà áàçà âúâåäåíèòå â òî÷êà 1 äàííè. Èç÷èñëåíèÿ ñðåäåí óñïåõ ùå ñå èçâåæäà ëè íÿêúäå?!?
    3. Íàìèðàíå íà âñè÷êè ñòóäåíòè, ñ 3 èëè ïîâå÷å ñëàáè îöåíêè è òÿõíîòî èçâåæäàíå íà åêðàíà.

    Òîâà ñà òè òðèòå ïðîöåäóðè, êîèòî îñíîâíàòà ïðîãðàìà òðÿáâà äà èçâèêâà. Ïðèìåðíî.

    Îòíîñíî ñòðóêòóðàòà íà äàííèòå, êîèòî ñè îïèñàë:
    - âñåêè ñòóäåíò ùå ãî äúðæèø â ðåêúðä, ñòàâà;
    - èìåòî ìîæå äà ãî îãðàíè÷èø äî string[80] ïðèìåðíî. Íå å ôàòàëíî è äà ñè ñòîè ñ äúëæèíà 255. Âúïðîñ íà âêóñ;
    - ïðè ïîëîæåíèå, ÷å íÿìà äà ïðàâèø íÿêàêâè èç÷èñëåíèÿ, â êîèòî äà âëèçà ñòîéíîñòòà íà ÅÃÍ-òî, à ñàìî ùå ñå ñúáèðà êàòî èíôîðìàöèÿ - íàïðàâè EGN äà å string[10]. Ùå áîëè ïî-ìàëêî (èíà÷å è longInt íÿìà äà òè ñòèãíå, çà äà ïîáåðåø ÷èñëîòî);
    - îòðèöàòåëåí ôàêóëòåòåí íîìåð? òóê ñëàãàø "word", âìåñòî "integer" è ñòèñêàìå ðúöåòå;
    - ìàñèâúò ñ îöåíêè òðÿáâà äà å 11 åëåìåíòà (10 îöåíêè è 1 ñðåäíà) è òî îò òèï "real".

    Äðóãè "çàáåëåæêè":
    - äà íå çàáðàâèø äà ñè èíèöèàëèçèðàø ìàñèâèòå è ïðîìåíëèâèòå ïîäõîäÿùî, â íà÷àëîòî íà ïðîãðàìàòà;
    - àêî èñêàø äà å ïî-ïðîñòè÷êà ïðîãðàìêàòà - ïîëçâàø ãëîáàëíè ïðîìåíëèâè, âñè÷êî íàé-îòãîðå. Àêî èñêàø äà å ïî-äîáðå íàïèñàíà, âñè÷êè ïðîìåíëèâè, êîèòî ñà íóæíè ñàìî â êîíñòðóêöèÿòà (ïðîöåäóðàòà), â êîÿòî ñå ïîëçâàò ñå äåôèíèðàò ëîêàëíî â òÿëîòî è. Òîâà ìîæå äà òè äîéäå èçëèøíà ðàáîòà, ùîì íå ìîæåø äà ñè íàïèøåø ñàì ïðîãðàìàòà
    - ôàéëúò, ñ êîéòî ùå ðàáîòèø, òðÿáâà äà ñå äåôèíèðà îò òèï ðåêúðä-à, êîéòî ñè äåôèíèðàë. Ò.å. âñåêè åäèí "åëåìåíò" âúâ ôàéëà, ñ êîéòî ùå ñå ðàáîòè å åëåìåíò îò òèï äåôèíèðàíèÿ òè ðåêúðä (ñòðóêòóðà, ñúäúðæàùà ïðîìåíëèâèòå çà ñòóäåíò). Òàêà "ãëàâàòà", êîÿòî ÷åòå/ïèøå èç ôàéëà ùå ñå ìåñòè ïî íåãî íàïðåä/íàçàä íà ðàçñòîÿíèå ðàçìåðà íà ðåêúðäà è ùå çàïèñâà/÷åòå íàâåäíúæ ïî åäèí ðåêúðä, ò.å. ïî åäèí åëåìåíò (ñúäúðæàù èíôîðìàöèÿ çà åäèí ñòóäåíò). Çàáðàâÿø çà ôàéëîâå îò òèï binary èëè text, íå òè òðÿáâàò â ñëó÷àÿ;
    - îòâàðÿíåòî íà ôàéëà çà ðàáîòà è çàòâàðÿíåòî ìó å äîáðå äà ñòàâàò â êîíòðóêöèÿòà (ïðîöåäóðàòà), â êîÿòî ñå èçâúðøâà ñàìàòà ðàáîòà. Ïî ïðèíöèï. Àêî íå äúðæèø äà å èçïèïàíî â òàçè ïîñîêà - îòâàðÿø ôàéëà â íà÷àëîòî íà îñíîâíàòà ïðîãðàìà, âèêàø ïîäïðîãðàìèòå äà ñè ñâúðøàò ðàáîòàòà è çàòâàðÿø ôàéëà, ìàëêî ïðåäè êðàÿ íà îñíîâíàòà ïðîãðàìà;
    - êàê ùå ðàáîòèø ñ ôàéëà å âúïðîñ íà çàäàäåíî óñëîâèå íà çàäà÷àòà (àêî å óòî÷íåíî èçðè÷íî) èëè òâîÿ èíòåðïðåòàöèÿ (àêî å êàçàíî äà èìà äàííèòå âúâ ôàéë, íî íå å êàçàíî êàêâî äà ñå ïðàâè ñ ôàéëà) - äàëè ùå ïèøåø âñè÷êî âúâ ôàéëà â åäíà ïðîöåäóðà ïðè âúâåæäàíåòî íà äàííèòå, ùå çàòâîðèø ôàéëà, ïîñëå ùå ãî îòâîðèø â äðóãà ïðîöåäóðà è èç÷åòåø îòíîâî âñè÷êî â ïàìåòòà è ïîñëåäâàùî ñìÿòàíå íà ñðåäåí óñïåõ ... èëè ùå âúâåäåø â åäíà ïðîöåäóðà äàííèòå â ïàìåòòà, â äðóãà ïðîöåäóðà ùå íàñìÿòàø ñðåäåí óñïåõ è â òðåòà ïðîöåäóðà ùå çàïèøåø äàííèòå âúâ ôàéëà.


    Êîçìåòèêè:
    - ìàõíè òåÿ íåäîìèñëèöè (óåá-ïðåäñòàâÿíåòî íà êèðèëèöà), íå çíàì îòêúäå ñè êîïè/ïåéñòâàë òîÿ ôðàãìåíò êîä. Çàìåíè ñòðèíãîâåòå çà îòïå÷àòâàíè ñúñ øëüîêàâèöà, àêî íå ñè ñèãóðåí äàëè ùå ñå âèæäà êîðåêòíî íà êîíçîëàòà, ïðè èçïúëíåíèå íà ïðîãðàìàòà;
    - êîãàòî èçâåæäàø ïîäñåùàø íàäïèñ, ñëåä êîéòî ùå î÷àêâàø äà áúäå âúâåäåíî íåùî, ïîëçâàé "write" âìåñòî "writeln". Ðàçëèêàòà å, ÷å êóðñîðà íÿìà äà òè ñå "ñâëå÷å" íà ñëåäâàùèÿ ðåä, à ùå ìèãà âåäíàãà ñëåä ïîäñåùàùîòî ñúîáùåíèå. Ò.å. write("alabala: ");readln(a_de);
    Àïðîïî, ïðåç ... adblock-à ìè å çà çà÷åðâåíèòå îò òúðêàíå ðú÷è÷êè íà ðúêîáëóäöèòå

    hardwarebg.com##DIV[id^="helpfulanswers_box"]

  5. #5
    tonerstationbg IgIv's Avatar
    Join Date: May:2005
    Location: Áóðãàñ
    Posts: 4,090
    Îùå åäíà âàæíà ïîäðîáíîñò çà Pascal, êîÿòî â äíåøíî âðåìå íè ñå ñòðóâà ñìåøíà- òîâà å ïàìåòòà. Pascal îòäåëÿ 64ê ïàìåò çà äàííè. Àêî íå íè ñòèãàò ñå ïîñÿãà êúì äðóã áëîê ïàìåò (ñ GetMem èëè new), êîéòî ñúùî íå ìîæå äà å ïî-ãîëÿì îò 64ê.  ïðèìåðà òè ìàñèâà ñ îöåíêè íàäõâúðëÿ ìíîãîêðàòíî òèÿ 64k è êîìïèëàöèÿòà íå áè òðÿáâàëî èçîáùî äà ìèíå, îñâåí àêî íå å èçêëþ÷åíà ïðîâåðêàòà ðàçìåðíîñò {$R-}.
    Ðàäèîòî ïîçâîëÿâà íà ãëóïîñòòà äà ñå ÷óå, òåëåâèçèÿòà- äà ñå âèäè, à èíòåðíåò- äà ñå ðàçïðîñòðàíè.

  6. #6
    Deleted User 4eRNoBiL's Avatar
    Join Date: Oct:2005
    Location: Ñòàðà Çàãîðà
    Posts: 739
    Quote Originally Posted by IgIv View Post
    Îùå åäíà âàæíà ïîäðîáíîñò çà Pascal, êîÿòî â äíåøíî âðåìå íè ñå ñòðóâà ñìåøíà- òîâà å ïàìåòòà. Pascal îòäåëÿ 64ê ïàìåò çà äàííè. Àêî íå íè ñòèãàò ñå ïîñÿãà êúì äðóã áëîê ïàìåò (ñ GetMem èëè new), êîéòî ñúùî íå ìîæå äà å ïî-ãîëÿì îò 64ê.  ïðèìåðà òè ìàñèâà ñ îöåíêè íàäõâúðëÿ ìíîãîêðàòíî òèÿ 64k è êîìïèëàöèÿòà íå áè òðÿáâàëî èçîáùî äà ìèíå, îñâåí àêî íå å èçêëþ÷åíà ïðîâåðêàòà ðàçìåðíîñò {$R-}.
    Òî íÿìà è íóæäà ìàñèâúò ñ îöåíêè äà å òîëêîâà ãîëÿì. Çàäà÷àòà å ñ ó÷åáíà öåë, òàêà ÷å íå âèæäàì ïðîáëåì äà áúäàò 10. À àêî ùå è 1000 äà ñà, ïàê ùå ñå âìåñòÿò â áëîê÷åòî.  êðàéíà ñìåòêà, ïîíå â íà÷àëîòî òðÿáâà äà áúäàò ìàëêî, çà äà ìîæå äà ñå ñìÿòà è íà óì è äà ñå ñâåðè ñ èçõîäà îò ïðîãðàìàòà.
    Fujistu Lifebook E756 | Core i7-6500U / 400MHz-3.1GHz | 8 GB DDR4-2133 | Samsung PM871 / 256 GB SSD | 15" 1920x1080 | Manjaro Linux + kernel 4.19

  7. #7
    Registered User
    Join Date: Oct:2003
    Posts: 1,860
    Quote Originally Posted by nikolai69 View Post
    program studenti;

    Çäðàâåéòå,èìàì ïèòàíå çà òàçè çàäà÷à ïðè âúâåæäàíå íà îöåíêèòå ñëåä âòîðàòà ìå èçõâúðëÿ ïîìîù?
    Òîé íå òå èçõâúðëÿ, òîé êðîòêî è óñïåøíî ïðèêëþ÷âà. Ïðî÷èòà m,n,j,f ñëåä êîåòî íÿìà êàêâî ïîâå÷å äà ïðàâè. Ïðè òîâà âúïðîñíèòå ïðîìåíëèâè ïî íèêàêúâ íà÷èí íå ñà ñâúðçàíè ñ åäèíñòâåíèÿ ñòóäåíò, êîéòî ñè îáÿâèë â ïðîìåíëèâàòà x. 123 ìèëèîíà îöåíêè ìè èäâàò ìàëêî â ïîâå÷å äà ìîæå äà ïîëó÷è äàäåí ÷îâåê ïðåç öåëèÿ ñè æèâîò, íî ùå ìè å èíòåðåñåí îïèòà äà âúâåäåø âõîäíè äàííè äîðè çà åäèíñòâåíèÿ ñè ñòóäåíò.

  8. #8
    Registered abUser ike's Avatar
    Join Date: Jul:2004
    Location: sofiÿ
    Posts: 4,965
    -ôàéë ñ èíôîðìàöèÿ çà ñòóäåíòèòå,áåç ñðåäåí óñïåõ
    -èç÷èñëÿâàíå íà ñðåäåí óñïåõ íà âñåêè ñòóäåíò
    -èçâåæäàíå íà ôàê.íîìåð íà ñòóäåíòè ñ ïîâå÷å îò òðè äâîéêè
    -Ïðåäè êîÿ äàòà òðÿáâà äà ñà ðîäåíè ñòóäåíòèòå
    Code:
    EGN: integer;
    Last edited by ike; 16th December 2017 at 15:53.
    Have no fear ike iz here.
    CPU Cx486DLC@40MHz, RAM 4MB, VGA Trident 512KB, HDD Conner 160MB, Monitor 14" Color

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè