Skocz do zawartości

Kalendarz


.FanTaZy

Polecane posty

Pobierasz info jaki to jest dzień np. 1 marca, ząłóżmy, że chcesz aby niedziela była jako pierwszy dzień tygodnia, to wtedy x := jaki to jest dzień, i:=1;y := pierwszy wiersz i robisz pętle

while i

w pozycji (x,y) wypisujesz numer dnia (czyli i)

Inc(i);Inc(x);

if x = 7 then begin x := 0; Inc(y);

 

ponieważ dzień ma numer dwucyfrowy to trzeba jakoś przeskalować wyświetlanie

Baza tysięcy lotnisk: http://airportsbase.com

Link do komentarza
Udostępnij na innych stronach

Zarchiwizowany

Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.

Gość
Temat jest zablokowany i nie można w nim pisać.
×
×
  • Utwórz nowe...