Registracija

opet ja 2-problem bujne maste

Odgovori Nova tema

1 odgovor
2.507 pregleda

opet ja 2-problem bujne maste 09.04.2005. u 15:48 · pre 262 meseca #1

Kako napravit ovo:

Code:

program tockice;
uses crt;
begin
writeln("Loading...");
end;

-da tockice iza loading idu postupno (prva,druga,treca,pa ispocetka)
-al na sto jednostavniji nacin jer sam nov u ovom svijetu

Re: opet ja 2-problem bujne maste 09.04.2005. u 17:17 · pre 262 meseca #2

Code:

var
  i:Integer;
  kraj:Boolean;
begin
  i := 0;
  kraj := false;
  repeat
    gotoxy(1,1) // valjda je ova naredba
    write('Loading'+copy('...',1, (i mod 3)+1)+'  ');
    inc(i);

    // ovde nesto radis i kad uradis
    // postavis  kraj := true;

  until kraj
end.

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme