Provera Da Li Se Lista Sadrzi U Drugoj
Dragi clanovi i posetioci foruma,
Mozda ce vam ova brojka zvucati neverovatno, ali Forum Matematicke gimnazije postoji vec vise 6 godina - od januara 2006. godine, ako zelimo da budemo precizni.
Sa vise od 1.000 clanova, 4.000 tema i 100.000 poruka predstavlja najvecu zajednicu orijentisanu ka Matematickoj gimnaziji i ucinio je nase srednjoskolske dane barem iole zanimljivijima. Ne samo da je bio mesto za visokointelektualne razgovore ucenika Matematicke gimnazije, vec i forum na koji smo dolazili da se druzimo sa ljudima iz cele Srbije, pa i regiona. Verujem da ne govorim samo u nase ime kada kazem da su ovde nastala mnoga poznanstva koja su se kasnije dalje razvijala u "pravom svetu".
Nazalost, ta idilicna vremena su sada iza nas. Tokom poslednjih nekoliko godina Internet u regionu je doziveo vrtoglav razvoj, i potreba za ovakvim forumima vise ne postoji. Pojavile su se socijalne mreze kao sto su Facebook i Twitter, i komunikacija je na mnogo visem nivou. Forum, iako pun korisnih informacija, vise ne sluzi svojoj prvobitnoj nameni.
Iz tog razloga, teska srca smo doneli odluku da Forum Matematicke gimnazije prestane sa radom. Od danas registracije na forumu nece biti moguce, ali ce sve poruke i dalje biti dostupne za pregled. Takodje, od prvog septembra forum vise nece biti dostupan na adresi mg-forum.net, ali ce se arhivi i dalje moci pristupiti preko adrese bozidarevic.com/mgforum . Takodje bismo zeleli da iskoristimo priliku i da uputimo sve bivse ucenike na Alumni Matematicke gimnazije - almagi.mg.edu.rs.
Hvala svima koji su ucestvovali u diskusijama i koji su pomogli da ovaj forum bude jedno prijatno mesto.
Administratorski tim MG Foruma
| Nameless_one |
 Mar 6 2008, 05:17 PM
Post
#1
|
 Group: Članovi Joined: 5-February 08 From: Novi Beograd Member No.: 869 Status: Učenik MGa Ime i prezime: Goran Šahinovic Škola/Razred: MG IIIa  |
Elem,posto sam nedavno reinstalirao windows i pritom obrisao particiju na kojoj je bio instaliran Delphie,a nemam kod sebe CD sa njim,potrebna mi je vasha pomoc:ako imate instaliran Pascal i ne mrzi vas da ovo copy/paste-ujete(i malo modifikujete ako nije sve tacno),molio bi vas za pomoc.
Zadatak:proveriti da li se lista L1 sadrzi u listi L2: moje resenje:odrediti duzinu liste l1,zatim kada se u listi l2 nadje element koji odgovara prvom liste l1,koristiti repeat petlju koji proverava da li se elementi poklapaju na intervalu jednakom duzini liste l1. CODE function duzina(l:pok); var s:integer; begin s:=0; while l<>nil do begin s:=s+1; l:=l^.next; end; duzina:=s end; function jednake(l1,l2:pok):boolean; var d,n:integer; p:pok; def:boolean; begin d:=duzina(l1); def:=false; p:=l1; while (l1<>nil) and (l2<>nil) do begin if (l1^.inf=l2^.inf) then begin n:=d; repeat l1:=l1^.next; l2:=l2^.next; if (l1^.inf=l2^.inf) then n:=n-1 else continue until n:=0; end; if n:=0 then begin def:=true; break end; l1:=p; l2:=l2^.next end; jednake:=def end; promenljiva p pamti pocetak liste l1,na koji listu 'restartujemo' posle svakog uporedjivanja sa l2.svaki put kada se liste uporedjuju,ako n dobije vrednost nula(svi elementi se poklapaju),while petlja se prekida-break,a def dobija vrednost true. Valja li?  EDIT:anyone???  This post has been edited by pyost: Mar 6 2008, 06:01 PM -------------------- |
   |
 
|
Posts in this topic
   |
2 User(s) are reading this topic (2 Guests and 0 Anonymous Users)
0 Members:
Powered by Invision Power Board(Trial) v2.0.0 © 2024 IPS, Inc.