Zobrazovanie na opačnej strane obrazovky PASCAL

Zdravotnik · Napísal **Zdravotnik**: 21.10.2008 17:13

Dostali sme domácu úlohu z informatiky. Zadanie neviem, či presne napíšem, ale pokúsim sa. Mali sme urobiť program ktorý napíše hviezdičky pod seba do trojholníka. To som zvládol, lenže neviem ako ho presuniem na pravý okraj obrazovky.

Prvá časť je toto:

Kód:

program stromcek;
uses crt;
var i,n,j:integer;

 begin
  clrscr;
   n:=1;
   for j:=1 to 25 do
                   begin
                    for i:=1 to n do
                                    begin
                                     textcolor (random(32));
                                     write ('x');
                                    end;
                    n:=n+1;
                    writeln;
                    end;
  readln;
 end.

skúšal som to prerobiť takto, žiaľ nieje to ono

Kód:

program stromcek;
uses crt;
var i,n,j,x:integer;

 begin
  clrscr;
   for j:=1 to 25 do
                   begin
                    for x:=40 to n do
                                    begin
                                     textcolor (random(32));
                                     write ('x');
                                    end;
                    n:=n-1;
                    writeln;
                    end;
  readln;
 end.

Za pomoc ďakujem. Viem, je to určite primitívne napísané, ale som začiatočník

TommyHot · Napísal **TommyHot**: 21.10.2008 17:29

goto(x,y);

tusim ze tak sa vola ta funkcia, ktorou definujes, kde sa ma presunut kurzor. uz som v pascale dlho nerobil..

Zdravotnik · Napísal autor témy **Zdravotnik**: 21.10.2008 17:58

ĎAKUJEM veľmi pekne za radu, už mi to ide

ado21 · Napísal **ado21**: 21.10.2008 20:07

hm, ja myslim, ze sa vola gotoxy(x,y)...

goto je sice povoleny prikaz, ale mimo assembleru je skor zamietnutny. Teda ak taku fukciu uvidi programator a nebola pouzita v Assmebleri, tak sa chyti za hlavu a ide prec...

TommyHot · Napísal **TommyHot**: 21.10.2008 20:13

Preto som dodal, ze v pascale som uz dlho nic nerobil

kazdopadne ak to fachci, je jedno ako je to napisane (pri takychto trivialnych programoch), ale dik za opravu

coldak · Napísal **coldak**: 29.10.2008 9:38

ado21 píše:

hm, ja myslim, ze sa vola gotoxy(x,y)...

goto je sice povoleny prikaz, ale mimo assembleru je skor zamietnutny. Teda ak taku fukciu uvidi programator a nebola pouzita v Assmebleri, tak sa chyti za hlavu a ide prec...

za prve pleties hrusky s jablkami , gotoxy je funkcia ktora presunie kurzor na pozadovanu poziciu , goto je zase skok na navestie.

za druhe, kde vsetci chodite na famu ze goto je zle ? goto akurat prinasa moznost vacsieho rizika. ale je to ako s ohnom aj ten sice prinasa riziko poriaru ale ked sa spravne pouzije tak prinasa uzitok, dolezite je kto snim zaobchadza a ako. pocul som ze niektore zahranicne firmy zakazuju programatorom pouzivat pointre lebo je tam riziko ze nespravnym alokonavim pamate alebo jej neuvolnenim moze dojst k padom programov, ale pritom pointre su bezna sucast programovania.

ado21 · Napísal **ado21**: 29.10.2008 11:15

coldak píše:

za prve pleties hrusky s jablkami , gotoxy je funkcia ktora presunie kurzor na pozadovanu poziciu , goto je zase skok na navestie.

za druhe, kde vsetci chodite na famu ze goto je zle ? goto akurat prinasa moznost vacsieho rizika. ale je to ako s ohnom aj ten sice prinasa riziko poriaru ale ked sa spravne pouzije tak prinasa uzitok, dolezite je kto snim zaobchadza a ako. pocul som ze niektore zahranicne firmy zakazuju programatorom pouzivat pointre lebo je tam riziko ze nespravnym alokonavim pamate alebo jej neuvolnenim moze dojst k padom programov, ale pritom pointre su bezna sucast programovania.

gotoxy(x,y) ma spomenina funkciu. Lubolny znak napises kdekolvek na obrazovku.

goto je kazdom vyssiom jazyku, pocnuc od C odmietnuty. Na to su cykly! goto je surovy skok, nezaujima ho co ma v stacku ani nic. Goto sa pouziva v assembleri a dost...

Ako som spominal, ak goto programator uvidi v inom jazyku ako v assembleri, chyti sa za hlavu a ide prec...

coldak · Napísal **coldak**: 29.10.2008 12:12

ado21 píše:

gotoxy(x,y) ma spomenina funkciu. Lubolny znak napises kdekolvek na obrazovku.

goto je kazdom vyssiom jazyku, pocnuc od C odmietnuty. Na to su cykly! goto je surovy skok, nezaujima ho co ma v stacku ani nic. Goto sa pouziva v assembleri a dost...

Ako som spominal, ak goto programator uvidi v inom jazyku ako v assembleri, chyti sa za hlavu a ide prec...

co znamena odmietnuty ? ze ho prekladac ignoruje ? pokial ho prekladac akceptuje tak odmietnuty nieje, odmietaju ho iba ludia co bud podlahnu mytom alebo maju strach. programovanim sa zivim uz 10 rokov takze trochu do toho uz vidim

Zobrazovanie na opačnej strane obrazovky PASCAL

Podobné témy