HackroForum
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Hacker adayları burası sizin eriniz, sorun cevaplayalım.Ben ve moderetörlerim ve ayrıca üemiz olan tüm professıonal hackerler burada sizin bilmediklerinizi sizinle tartışmak için burdayız.


Bağlı değilsiniz. Bağlanın ya da kayıt olun

HackroForum » Programlama Dersleri » Örnek Program » Örnek(Kayan Yazı)

Örnek(Kayan Yazı)

Aşağa gitmek  Mesaj [1 sayfadaki 1 sayfası]

1Örnek(Kayan Yazı) Empty Örnek(Kayan Yazı) Salı Haz. 15, 2010 8:48 pm

Admin

Admin
Admin

  1. Sabit bir metni ekranda kaydıran Pascal programı.





    DELPHI:
    1.uses crt;
    2.var
    3. i,j,k,n:integer;
    4. a,c:string;
    5.Begin
    6. clrscr;
    7. repeat
    8. randomize;
    9. n:=random(16);
    10. c:='SAKLA SAMANI CURUSUN';
    11. clrscr;
    12. gotoxy(30,12);write(c);delay(290);
    13. for j:=1 to 20 do
    14. for i:=1 to 20 do
    15. begin
    16. c[i]:=c[i+1];
    17. delay(5);
    18. textcolor(n);
    19. gotoxy(30,12);
    20. write(c);
    21. gotoxy(74,24);
    22. write('Renk ',n);
    23. end;
    24. until keypressed;
    25. readln;
    26.End.

http://hackroforum.yetkinforum.com

Sayfa başına dön  Mesaj [1 sayfadaki 1 sayfası]

HackroForum » Programlama Dersleri » Örnek Program » Örnek(Kayan Yazı)

Similar topics

-

» Örnek Program

Bu forumun müsaadesi var:
Bu forumdaki mesajlara cevap veremezsiniz