Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!?

[es] :: Pascal / Delphi / Kylix :: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!?

Strane: 1 2

[ Pregleda: 7574 | Odgovora: 20 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
*.104.EUnet.yu



Profil

icon Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 13.01.2004. u 02:53 - pre 246 meseci
Treba mi pomoc, nikada nisam radila Pascal na ovom nivou, maximalni dometi su mi 1D niz i skolski primeri... Zli zadatak zbog kog spavam 2 sata dnevno... evo ga u svoj svojoj grozoti... Behold, and admire!

Sastaviti glavni program koji radi sa dvodimenzionalnim matricama realnih brojeva na dati način:

a) poziva potprogram koji učitava sve potrebne podatke (dimenzije i elemente matrice/matrica);

b) poziva odgovarajući potprogram koji izvrši zamenu redosleda elemenata svake vrste matrice zamenjujući prvi element vrste sa poslednjim, drugi sa pretposlednjim, itd.;

c) poziva potprogram koji ispisuje sve dobijene rezultate;

d) ponavlja prethodne korake sve dok se za broj vrsta ili kolona ne unese negativna vrednost.

Onda treba napisati novi program, koji predstavlja modifikaciju osnovnog programa. Treba dodati sledeću osobinu: nakon učitavanja podataka, a pre poziva potrograma koji radi samu obradu, poziva se novi potprogram, koji izvrši transponovanje matrice/matrica sa kojima se radi.

E, sad... trazila bih ja pomoc od svojih novostecenih kolega, ali ne umem da trepcem i da se prenemazem, pa mi nekako nezgodno da bilo koga od njih zamolim za pomoc, dok stapom teraju ostale koleginice... Zato, evo najiskrenije i najotvorenije molim za pomoc, pa kad ja jednog dana postanem strucnjak i kad porastem... MA sad vec gLupam... aj pomagajte ljudi i zene!

Unapred zahvalna cak i slucajnim citaocima ovog vapaja...

vapaj:
buhuhuhuuuuuuu ... smrc.... buhuuu... hu... OK, ovo je stvarno krajnja mera, kazu da bi neki ljudi sve uradili sto se od njih trazi, samo da ne bi slusali kuknjavu i plac... da vidimo... smrc...
You're just jealous because the voices only talk to me.
 
Odgovor na temu

kefalo
Banjaluka, RS, BiH

Član broj: 18959
Poruke: 263
*.dip.urc.bl.ac.yu

ICQ: 178873696
Sajt: home.blic.net/mozlas


+6 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 13.01.2004. u 17:36 - pre 245 meseci
evo ti rjesenja...tj cijelog programa

Code:
program matrice;
uses crt;
type matrica=array [1..100 , 1..100] of real;
var
dimx,dimy,i,j:integer;
a:matrica;
b:boolean;
label 1;

procedure ucitaj;
begin
 write('dimenzija x=');readln(dimx);
 write('dimenzija y=');readln(dimy);
 if (dimx<0) or (dimy<0) then
 begin
  b:=true;
  exit;
 end;
 for i:=1 to dimx do
  for j:=1 to dimy do
  begin
   write('Clan ',i,',',j,'=');
   readln(a[i,j]);
  end;
end;

procedure izmjeni;
var z:real;
dimyy:integer;
begin
 dimyy:=dimy div 2;
 for i:=1 to dimx do
  for j:=1 to dimyy do
  begin
   z:=a[i,j];
   a[i,j]:=a[i,dimy+1-j];
   a[i,dimy+1-j]:=z;
  end;
end;

procedure ispisi;
begin
 for i:=1 to dimx do
  for j:=1 to dimy do
   if j=dimy then
    writeln(a[i,j]:3:2,'  ')
   else
    write(a[i,j]:3:2,'  ');
end;

begin
b:=false;
while not b do
begin
 clrscr;
 ucitaj;
 if b then goto 1;
 izmjeni;
 ispisi;
1: readln
end;
end.


jedino sto ti nisam uradio je
Citat:
Onda treba napisati novi program, koji predstavlja modifikaciju osnovnog programa. Treba dodati sledeću osobinu: nakon učitavanja podataka, a pre poziva potrograma koji radi samu obradu, poziva se novi potprogram, koji izvrši transponovanje matrice/matrica sa kojima se radi.
posto sam zaboravio sta su transponovane matrice... ako neznas sama dalje da uradis ti napisi kako se od matrice dobija transponovana... bio sam isuvise lijen da trazim po knjigama ;)
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 13.01.2004. u 20:54 - pre 245 meseci
Kefalo, ti ne samo sto si pametan, vec imas i dusu!

Ceo dan sam na faxu, i u pauzama sam uspela da dodjem do neke traljave verzije koja, makar kad se "pismeno kompajlira", vrti obrtanje dvaput vise, pa se na kraju redosled vrati na staro... Skontala sam da treba da ga nateram da vrti do polovine, a sad kad si mi poslao ceo zadatak... sigurno cu naci gde gresim...

Sto se modifikacije tice... Transponovanje matrice, narodski govoreci, znaci da vrste treba da postanu kolone a kolone vrste... i sa time sam se danas pomalo njakala, a u teoretskoj literaturi(bez koda), pominje se postupak po glavnoj dijagonali i jedini problem je da treba da smislim kako da , kada matrica nije kvadrat, tretiram visak kolona ili vrsta, pa da ih ... pa... "samo okrenem za pi/2", a da se na njihovo mesto ne stavi nista... to jos nisam do kraja razradila, ali sad kad si mi odradio najveci, ako ne i ceo posao, moje je da se tokom tih "finih podesavanja i stelovanja" i naucim necemu... nije da danas nisam napredovala, ali rok mi je sutra popodne, i tvoja pomoc mi je stvarno znacila! Nocas cu to lepo da probam da uradim,a tebi, jos jednom, puno hvala!!!

Nadam se da ce nasi dalji razgovori o ovim temama, s vremenom biti sve ravnopravniji, a ja cu se maximalno truditi da tako i bude... Caos!
You're just jealous because the voices only talk to me.
 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 507
*.ptt.yu.

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 13.01.2004. u 22:55 - pre 245 meseci
Evo ga i moje resenje ( mislim da ga ne trebas uopste menjati, vec da je to jedna sigurna desetka - pa dobro, ispod devetke nije ). Resenje je zasnovano na kodu koji je napisao kefalo, ali je taj kod doziveo korenite izmene. Prvenstveno sam gledao da izbegnem sve goto i exit naredbe, posto se na fakultetu zahteva da se izbegavaju goto naredbe, i svi vidovi "nasilnih" prekida programa tipa exit i halt ( znam jer sam i ja sada brucos ), a dodao sam i transponovanje matrice. Nego da je ne duzim previse, evo ga kod:

Code:


program matrice;
uses crt;
type matrica=array [1..10, 1..10] of integer;
var dimx,dimy,i,j:integer;
    a,pomniz:matrica;
    unosok:boolean;
    pitanje:char;

{**********************************************************************
Funkcija meni sluzi za izbor akcije koju nas program izvodi
***********************************************************************}

function Meni:char;
var akcija:char;
begin
  clrscr;

  {ove brljotine u meniju nize ce se u Pascalu prikazivati kao tabela}

  writeln('ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»':61);
  writeln('ş         PROGRAM ZA RAD SA MATRICAMA           ş':61);
  writeln('ĚÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍą':61);
  writeln('ş  1) Ucitavanje matrice                        ş':61);
  writeln('ş  2) Obrada matrice                            ş':61);
  writeln('ş  3) Transponovanje matrice                    ş':61);
  writeln('ĚÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍą':61);
  writeln('ş  4) Kraj                                      ş':61);
  writeln('ş                                               ş':61);
  writeln('ČÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍĽ':61);
  writeln;
  write('Unesite vas izbor: ':31);
  repeat
    akcija:= readkey;
    if (akcija<'1') or (akcija>'4') then writeln('GRESKA! Unesite operaciju od 1 do 4: ');
  until (akcija>='1') and (akcija<='4');
  writeln;
  Meni:=akcija;
end;

{**********************************************************************
Procedura ucitaj ucitava dimenziju i clanove matrice
***********************************************************************}

procedure ucitaj;
begin
  clrscr;
  write('dimenzija x=');
  readln(dimx);
  write('dimenzija y=');
  readln(dimy);
  while(dimx<=1) or (dimy<=1) do
  {ovja uslov mora biti zadovoljen da bi uopste matrica bila matrica}
  {jer je matrica dimenzija npr. 1x2 u stvari niz sa 2 clana}
  begin
    writeln;
    writeln('GRESKA! Broj vrsta i kolona mora biti 2 ili vise!');
    writeln('Ponovite unos:');
    writeln;
    writeln;
    write('dimenzija x=');
    readln(dimx);
    write('dimenzija y=');
    readln(dimy);
  end;
  for i:=1 to dimx do
    for j:=1 to dimy do
    begin
      write('Clan [',i,',',j,']: ');

      {============================================}
      {provera da li je unet ceo broj}
      {$I-}
      readln(a[i,j]);
      {$I+}
      while ioresult<>0 do
      begin
        writeln('GRESKA! Morate uneti ceo broj!');
        write('Ponovite unos clana [',i,',',j,']: ');
        {$I-}
        readln(a[i,j]);
        {$I+}
      end;
      {kraj provere}
      {============================================}

    end;
end;

{**********************************************************************
Procedura izmeni izvrsava zamenu redosledaelemenata svake vrste matrice
***********************************************************************}

procedure izmeni;
var z, dimyy:integer;
begin
  clrscr;
  dimyy:=dimy div 2;
  for i:=1 to dimx do
    for j:=1 to dimyy do
    begin
      z:=a[i,j];
      a[i,j]:=a[i,dimy+1-j];
      a[i,dimy+1-j]:=z;
    end;
end;

{**********************************************************************
Procedura ispisi ispisuje matricu
***********************************************************************}

procedure ispisi(var a:matrica);
begin
  clrscr;
  for i:=1 to dimx do
    for j:=1 to dimy do
      if j=dimy then
      writeln(a[i,j]:5)
    else
    write(a[i,j]:5);
    writeln;
    textcolor(135);
    writeln('Za nastavak pritisnite ''Enter''');
    textcolor(7);
    readln;
end;

{**********************************************************************
Procedura ispisitransp ispisuje transponovanu matricu
***********************************************************************}

procedure ispisitransp(var a:matrica);
begin
  clrscr;
  for i:=1 to dimy do
    for j:=1 to dimx do
      if j=dimx then
      writeln(a[i,j]:5)
    else
    write(a[i,j]:5);
    writeln;
    textcolor(135);
    writeln('Za nastavak pritisnite ''Enter''');
    textcolor(7);
    readln;
end;

{**********************************************************************
Procedura transponovanje izvrsava transponovanje ulazne matrice
***********************************************************************}

procedure transponovanje;
var pom:integer;
begin
  for i:=1 to dimx do
    for j:= 1 to dimy do
    begin
      pomniz[j,i]:=a[i,j];
    end;
end;

{**********************************************************************
Procedura unesipodatke proverava da li su uneti svi potrebni podaci za
trazene operacije nad matricom
***********************************************************************}

procedure unesipodatke;
begin
  clrscr;
  writeln('Morate prvo uneti sve potrebne podatke (Opcija 1)!');
  writeln;
  textcolor(135);
  writeln('Za nastavak pritisnite ''Enter''');
  textcolor(7);
  readln;
end;

begin
 { window(1,1,80,25);
  textbackground(red);}
  {ovo ti je ako zelis da imas crvenu radnu povrsinu}
  {mozes staviti i neku drugu boju, samu u TEXTBACKGROUND stavi neki broj do 15}
  unosok:=false;
  clrscr;
  window(5,5,75,20);
  repeat
    pitanje:=Meni;
    case pitanje of
      '1': begin
             ucitaj;
             unosok:=true
           end;
      '2': if unosok then begin
                            izmeni;
                            ispisi(a);
                          end
                     else unesipodatke;
      '3': if unosok then begin
                            transponovanje;
                            ispisitransp(pomniz);
                          end
                     else unesipodatke;
    end;
  until pitanje='4';
end.



Nadam se da nisam odgovorio previse kasno, i da ce ti ovo nesto vredeti za sutra, a ako te jos nesto bude mucilo DaNNicA-e, samo kazi, nista nije toliko zlo ( pa ni ove zle matrice ) u Pascalu da se ne moze resiti .

P.S. Koji Fakultet ides (cisto da vidim na kojem se fakultetu ovo redi, posto sam ja to radio jos u oktobru na FTN-u u Novom Sadu, smer racunarstvo i automatika)?

P.S.2 Srecno na odbrani vezbe .
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 00:58 - pre 245 meseci
Strog, ovo je stvarno previse! I to bas kad sam izgubila veru u ljude ... I tebi puno, puno hvala!!! Iskreno sam dirnuta... beeeeeeep! ukljucio mi se alarm za patetiku, dakle, dosta!

Bas sam pustala da vrti i tvoje i Kefalovo resenje, i u oba prijavljuje Division by zero... Ne znam gde je kvaka...
Ipak, uprkos svemu, ostajete moje dobre vile , kojima sam neizmerno zahvalna, pre svega na brzini kojom ste reagovali... Jos par sati, i naci cu kvar... A kad nadjem gde je, poslacu vam...

FTN, a? Imam tamo jako dobrog druga, na istom odseku, ali je treca godina... Dobar vam je fax... Prava mera, a ne ko nas mamut...
Inace, na BG ETFu sam, ali na Ostalim odsecima, a ne na RTIju... dakle ili fizicka elektronika, elektronika ili telekomunikacije... videcu... prvo da pozivim 2 godine...

Veliki pozdrav! I jos jednom hvala! Do sledece prilike...

You're just jealous because the voices only talk to me.
 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 507
*.ptt.yu.

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 01:26 - pre 245 meseci
Division by Zero ti ispisuje verovatno jer nesto nije u redu sa Pascalom (znam jer smo imali jednom taj problem na faksu). Probaj da nadjes drugi Pascal ( bas install.exe ) i instaliraj ga, pa bi trebalo sve biti u redu ( mada ti i bez Pascala mogu reci da ovaj moj program sve sto treba da se odradi odradjuje perfektno )
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 02:17 - pre 245 meseci
Hoces da kazes da je moj Pascal nenormalan?... Ne bi me ni cudilo, to je ono - "s kim si onakav si"
Sem toga, Strogi, ti si ovo tako profesionalno odradio, da ovo daleko prevazilazi moj nivo...
Prvo, divno je sredjen ispis,tabela je lepa k'o Sikstinska kapela, pod uslovom da se eliminise ovaj problem sa deljenjem nulom...

...njakala sam se sa trace-om i breakpoint-ima... daje neke nebuloze... ispada da svaki navedeni parametar za koji naredim watch, ima neku falinku... u oba programa... sad sam ostavila onaj moj skrnavi jednostavniji pokusaj, jer me zivcira cinjenica da ne mogu da otkrijem gde je greska... I jos... pazi molim te ovo... ima smelosti da gresku prijavi na adresi 00C3 : 0091 a onda kaze da ne moze da nadje adresu!... Definitivno je prolupao...

U svakom slucaju, duga je noc, a ja sutra oko 17h idem na faks da branim taj domaci... ako ga ne provalim do tada, i ne zasluzujem te poene... grrr...

Mada, ako ti odgovorno tvrdis da je problem u samom PAscalu, a ne uspem da saniram problem do sutra, treba da se uzdam u to da je onaj u RCu, normalan?
Pa nije nas RC, vas Japan, pa da sve radi...

Aj probacu da ga ponovo instaliram... thanx again, i srecna nova!
aj...


You're just jealous because the voices only talk to me.
 
Odgovor na temu

kefalo
Banjaluka, RS, BiH

Član broj: 18959
Poruke: 263
*.teol.net

ICQ: 178873696
Sajt: home.blic.net/mozlas


+6 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 04:32 - pre 245 meseci
hehe Strog... fino si se potrudio... svaka cast ;) ja nisam imao bash toliko vremena za sredjivanje ;)

Dannice... samo sam se bojao da ces program da iskoristis zdravo za gotovo a da neces da se potrudis da skontas kako radi .... ali sad vidim da nisam trebao da strahujem :)... pozdrav i srecno sutra ili danas...;)!


srecna nova!
 
Odgovor na temu

-zombie-
Tomica Jovanovic
freelance programmer
ni.ac.yu

Član broj: 4128
Poruke: 3448
*.beotel.net

Sajt: localhost


+5 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 11:51 - pre 245 meseci
Citat:
Strog:
Division by Zero ti ispisuje verovatno jer nesto nije u redu sa Pascalom


nije sa celim paskalom, već sa Crt unitom. izbaci ga iz programa, i sve će raditi.

a i ne znam zašto ga uopšte koristiš. za obične "školske" zadatke je vrlo retko potreban..

 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 507
*.ptt.yu.

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 12:19 - pre 245 meseci
Citat:
-zombie-:

nije sa celim paskalom, već sa Crt unitom. izbaci ga iz programa, i sve će raditi.

a i ne znam zašto ga uopšte koristiš. za obične "školske" zadatke je vrlo retko potreban..


Eto, ni ja nisam znao u cemu je tacno kavaka sa tim division by zero, a sada znam. Thanx -zombie-.

A sto se tice CRT unita, on je u ovom zadatku bogami potreban. Pa pogledaj na koliko se mesta koristi clrscr, a tu je i window, ma sve u svemu, u ovom zadatku, tako kako sam ga resio/napisao CRT unit treba!

P.S. DaNNicA-e, slobodno odnesi takav program na fax, verovatno je tamo CRT unit OK, tako da ce sve raditi kako treba. ( u najgorem slucaju obrisi sve sto koristi CRT unit i to je to , mada ce se onda pokvariti izgled programa ). A sto se tice tvog nivoa, nemoj da brines... ja sve to tako dobro i "profesionalno" radim zato sto sam vec odradio ceo "kurs" Pascala na faxu, tj. mi sa Pascalom sada u petak zavrsavamo ( mi na racunarstvu idemo to punom parom, cekaj samo da dodjes do pointera, pa da vidis onda kako se gubi razum u prvih par sati ), tako da mi nije uopste trebalo dugo da sve to odradim ( 60% stvari vezanih za takav izgled programa je bilo copy>paste iz mojih stariji programa )

P.S.2 Srecna Nova svima!
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 13:07 - pre 245 meseci
Rezultati ove epopeje:

Posto sam nabavila svez Pascal, i pustila svih milion verzija- blagih kopija i kombinacija oba programa koja su mi stavljena na raspolaganje, koje sam tokom prethodne noci generisala, mogu da objavim sledece rezultate...

Kefalo, tvoj program ima neku beskonacnu petlju pri unosu matrice, i samo to i radi - unosi matricu... Ipak, ostatak koda je stvarno dobar za ucenje- jednostavno, nije glomazno i verujem da bi se moglo popraviti jednom jedinom izmenom, jednog jedinog reda,cak imam i osumnjicenog, ali sad ipak moram da ucim i fiziku, pa da idem na fax... dakle, kad prodje ispitni rok, njakacu se sa tim... U svakom slucaju, hvala ti, puno!

Strog! Ovaj tvoj program je, kao sto sam iz koda "usmeno" mogla da pretpostavim, pravo malo umetnicko delo na ispisu, a cak i radi ono sto bi trebalo da radi!
Sa sve transponovanjem... milina... Stvarno ne znam sta jos reci a ne slagati...
I bio si u pravu, Pascal je bio u pitanju, jedino sto nisam mogla da poverujem da mi TRI verzije istog izbacuju... pa ...isto. Covece, dijagnostika na nevidjeno... imam ja jos da pasem...
I kraj rada u programu je vrlo dramatican, ja se uvek stresem kad vidim takav prekid, lici mi na one katastroficne fatal erors iz sF filmova iz '79. Stvarno, bas je sve super! Svaka cast, majstore!

Zombie, da znas da je i meni bio sumnjiv taj CRT, iz prostog razloga sto ga nismo ni pomenuli u dosadasnjem kursu... ipak, moramo se uciti toleranciji, jer to sto mi je nesto strano i nepoznato, ne mora da znaci da nije i vise nego korisno... Jedino ce biti frka ako se neceg ne setim u toku odbrane, pa mi zluradi kolega sa trece godine kod koga branim, kaze:"Buahaha...ucis unapred, a ne znas ni ovo unazad!"
Salim se, nije toliko zlurad...

E, pa ljudi, hvala na pomoci i lepim zeljama, ali life goes on, ima i drugih predmeta sem Programiranja... nazalost...

Veliki pozdrav! x 3
You're just jealous because the voices only talk to me.
 
Odgovor na temu

kefalo
Banjaluka, RS, BiH

Član broj: 18959
Poruke: 263
*.dip.urc.bl.ac.yu

ICQ: 178873696
Sajt: home.blic.net/mozlas


+6 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 14.01.2004. u 23:48 - pre 245 meseci
hahaha dannice neznas ni zadatak koji si postavila ;)

Citat:
d) ponavlja prethodne korake sve dok se za broj vrsta ili kolona ne unese negativna vrednost.


 
Odgovor na temu

vujke
Ivan Vujić
Network administrator
Astra Telekom
Mladenovac

Član broj: 366
Poruke: 249
*.vdial.verat.net



+1 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 15.01.2004. u 00:06 - pre 245 meseci
Citat:
kefalo:
hahaha dannice neznas ni zadatak koji si postavila

Citat:
d) ponavlja prethodne korake sve dok se za broj vrsta ili kolona ne unese negativna vrednost.





Razlika izmedju 5-ice i 10-tke ume da bude poprilicno tanka zar ne?
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 15.01.2004. u 01:04 - pre 245 meseci
O kefalo, nisam znala da si tako sujetan... Verovatno je u pitanju mala a mozda i namerna greska u petlji, (ako ti je cilj bio da se smejes ljudima u nevolji)...

Program treba da prekida sa radom kada uneses negativnu vrednost za broj kolona ili vrsta, ali kad uneses korektan broj, onda treba da radi i OBRADU... Kao sto radi Strogov program...i to sasvim lepo i pismeno radi. Kao sto sam u prvom apelu es zajednici, mislila da ne moram da spelujem ili crtam taj uslov, vec da ga uzgred pomenem, jer se podrazumeva da program postuje ogranicenja u duhu zadatka...

To sta zadatak zahteva, ja sam savim lepo shvatila, dok sam do razumevanja optimalne solucije, dosla najvise dedukcijom Strogovog programa; da budem iskrena, tvoj program nisam mogla pre da istestiram zbog mog skrnavog Pascala, sve do uporedo sa Strogovim...

beskonacno unosenje beskonacnog broja matrica... kefalo, moras priznati da ti program divergira...

A na odbrani domaceg sam dobila peticu, jer petica je najveca ocena na domacem zadatku, koji cak nije iz glavnog Programiranja, vec iz Praktikuma iz Programiranja, novog izbornog predmeta reformisanog ETFa, koji se polaze kroz 5 domacih zadataka po semestru... peti domaci je u stvari da odes u RC, kolega-asistent sa trece godine ti zada zadatak i imas 2 sata da ga resis... Ocene se sabiraju, i eto ti ocene...

Na samoj odbrani, pokazala sam dva programa - modifikovan Strogov, koji ne radi transponovanje vec samo obrce, a ima ogranicenje dimenzija matrice, i modifikovani Strogov sa transponovanjem... time sam uradila domaci,(hvala ti Strog!) a da bih ga odbranila, oni obicno zadaju jos jednu modifikaciju, koja je glasila da obrada istog programa treba da se ovaj put sastoji iz toga da se elementi zadate matrice razvrstavaju u dve matrice istih dimenzija, takve da rezultantne matrice imaju na istim mestima kao i u početnoj matrici samo pozitivne, odnosno samo negativne brojeve iz početne matrice, a na ostalim mestima imaju elemente vrednosti 0.
Posto sam to, sa izvesnom lakocom, resila za nepunih pola sata, rekla bih da sam savladala dovoljno, da mogu da kazem da mi matrice u Pascalu vise nisu bauk...

...za razliku od fizike ... Prijatno vece, hvala svima, a najvise... pa, normalno, kolegi sa FTNa! Pozdrav, Strog!
You're just jealous because the voices only talk to me.
 
Odgovor na temu

kefalo
Banjaluka, RS, BiH

Član broj: 18959
Poruke: 263
*.dip.urc.bl.ac.yu

ICQ: 178873696
Sajt: home.blic.net/mozlas


+6 Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 15.01.2004. u 22:34 - pre 245 meseci
Citat:
O kefalo, nisam znala da si tako sujetan... Verovatno je u pitanju mala a mozda i namerna greska u petlji, (ako ti je cilj bio da se smejes ljudima u nevolji)...


NIKAD i nikome se nisam smijao u nevolji... ako nekome ne mogu da pomognem, necu ni da odmazem... a ni da smejem!

Citat:
Program treba da prekida sa radom kada uneses negativnu vrednost za broj kolona ili vrsta, ali kad uneses korektan broj, onda treba da radi i OBRADU... Kao sto radi Strogov program...i to sasvim lepo i pismeno radi. Kao sto sam u prvom apelu es zajednici, mislila da ne moram da spelujem ili crtam taj uslov, vec da ga uzgred pomenem, jer se podrazumeva da program postuje ogranicenja u duhu zadatka...


kod mene program radi savrseno... znaci kad uneses negativnu vrijednost za broj vrste ili kolone... on izadje iz programa... jedino sto ceka da se stisne tipka ENTER
moj program takodje radi obradu ako nisi primjetila... jedino sto fali kao sto sam i rekao je transponovanje matrice a to se moglo odraditi tako sto bi transponovala matricu u drugi niz i onda ispisala obe matrice na ekran .... jel to bio prob? bice da tebi jeste... ako zbog toga dizes frku

Citat:
beskonacno unosenje beskonacnog broja matrica... kefalo, moras priznati da ti program divergira...

ja koristim Turbo Pascal ver.6.0 Borland International... da li je do toga greska ili ne? nemam pojma... btw bilo koji od turbo pascala za win su s*anje!a pretpostavljam da ti koristis winpascal
ako hoces mogu da ti posaljem na mail ovaj koji ja imam... i koji bi svakome preporucio
velicina fajla je 1.7MB zipovan

p.s.
posto se ovde osjecam prozvanim :) ako ima neko volje da provjeri da li moj kod radi ili ne... bio bih zahvalan... i da rezultat ovde "objesi"

p.p.s.
drago mi je sto si dobila 5! bez obzira na sve uvrede ovde izrecene meni kao pomagacu ;)
 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 507
*.dialup.neobee.net.

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 16.01.2004. u 00:59 - pre 245 meseci
Evo, ja prvi garantujem za kafalo-vo resenje!!!

I kod mene je radilo sve ono sto je on rekao u svom postu, a ja sam pokretao program u Turbo Pascal-u 7.0 (pretpostavljam da i ti DaNNicA-e imas isti...).

Znaci jos jednom kefalo-v program RADI dobro!

P.S. Hvala DaNNicA-e na onim lepim recima iskazanim meni i mom programu i cestitam ti na petici.

Odoh ja sad da spavam, sutra ( tj. vec danas ) imam kolokvijum, bas iz programiranja
 
Odgovor na temu

DaNNicA
Alfa Kentaura

Član broj: 19036
Poruke: 7
62.108.100.*



Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 17.01.2004. u 00:11 - pre 245 meseci
Dakle, kefalo, izgleda da je ipak nesto do Free Pascala, a i Turba ... pojma nemam zasto ne radi, mozda je i zbog labele... Ja nemam TAJ Borland, i jos uvek nisam uspela da ga pokrenem... ipak, verujem da negde drugde radi, utoliko sto kad ga "usmeno iskompajliram", radi.

U svakom slucaju, nije bilo lepo od tebe sto si onako reagovao kad sam se pozalila da mi tvoj program ne radi, a onda si me iznervirao pa sam ja odreagovala... ne bas lepo... sto nimalo ne umanjuje moju zahvalnost tebi koji si mi prvi pritekao u pomoc, i ja bih volela da ovaj nesporazum od sada smatramo prevazidjenim...

Veliki pozdrav!


You're just jealous because the voices only talk to me.
 
Odgovor na temu

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 507
*.ptt.yu.

ICQ: 346697685
Sajt: www.zeussoftware.rs


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 17.01.2004. u 01:35 - pre 245 meseci
A, joj, bezi od tog free pascala k'o djavo od krsta! Mislim, odlican je on, ali ce ti zadavati ogromne probleme, jer ima manjih razlika u odnosu na Turbo Pascal, koji se radi na fakultetu, tako da te moze vrlo lako zbuniti...

Jos jednom: Moja preporuka je Turbo Pascal 7.0
 
Odgovor na temu

Mixa
Mihailo Milenkovic
Beograd

Član broj: 9691
Poruke: 128
*.InfoSky.Net

Sajt: www.mixaracing.co.yu


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 17.01.2004. u 11:03 - pre 245 meseci
Reci mi molim te sto si uzela praktikum iz programiranja kada nemas pojma programiranje.
Inace bolje ti je da oko programiranja nadjes neke kolege sa RTI-a koji ce to da ti lepo objasne.
 
Odgovor na temu

Vuk Nikolić
Vuk Nikolić
Banovo Brdo, Beograd

Član broj: 4895
Poruke: 244
*.beograd-1.tehnicom.net

ICQ: 42139643
Sajt: www.letva.org


Profil

icon Re: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!? 17.01.2004. u 13:08 - pre 245 meseci
jel neko zna kad ce izaci sledeci domaci?

asistent je rekao da ce biti danas na netu ali izgelda nista od toga...
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Zle 2D matrice u Pascalu, napadaju sirote brucose! Is there a hero!?

Strane: 1 2

[ Pregleda: 7574 | Odgovora: 20 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.