تبلیغات :
آکوستیک ، فوم شانه تخم مرغی، صداگیر ماینر ، یونولیت
دستگاه جوجه کشی حرفه ای
فروش آنلاین لباس کودک
خرید فالوور ایرانی
خرید فالوور اینستاگرام
خرید ممبر تلگرام

[ + افزودن آگهی متنی جدید ]




صفحه 5 از 7 اولاول 1234567 آخرآخر
نمايش نتايج 41 به 50 از 65

نام تاپيک: تمامی‌ مباحث و سوالات زبان پاسکال Pascal

  1. #41
    در آغاز فعالیت
    تاريخ عضويت
    Jan 2007
    پست ها
    1

    پيش فرض

    لطفا بازی ox در پاسکال را بنویسید لطفا با توابع

  2. #42
    داره خودمونی میشه omid_matrix3's Avatar
    تاريخ عضويت
    Nov 2006
    پست ها
    45

    14 خارج شدن کارکتر

    برنامه زیر رو در نظر بگیرید
    کد:
    برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
    حالا چجوری میتونم تعریف کنم که از صفحه خارج نشه میبینید که اگه فرضا کلید بالا را ادامه بدینم از مختصات خارج می شه
    با تشکر از راهنمایی شما

  3. #43
    در آغاز فعالیت
    تاريخ عضويت
    Jan 2007
    پست ها
    11

    14

    سلام به همه دوستان
    من دارم برنامه کتاب خونه رو تو پاسکال می نویسم اماگرافیک رو بلد نیستم.
    اگه کسی پروسیجر آماده در این مورد داره اونو بزاره.
    راستی اگه کسی می تونه در موردخود این برنامه منو کمک کنه خیلی ممنون میشم.

  4. #44
    داره خودمونی میشه
    تاريخ عضويت
    Nov 2006
    پست ها
    127

    پيش فرض کمککککککک پروژه پايان ترم

    با سلام خدمت دوستان و اساتيد محترم
    من يه پروژ مربو به دفترچ تلن رو نوستم متاسفانه در قسمت اصلي برنامه با پيفام Error 2: File Not Found برخورد ميکنم. از اساتيد خواهش ميکنم هر چه زودتر منو راهنمايي کنند!
    لازم به ذکر است که برنامه از چند تابع و پروسيجر تشکيل شده و قسمت MAIN شامل دستورات زير است:

    {********************<< MAIN >>********************}
    begin
    textbackground (0);
    clrscr;
    items[1] := 'Insert';
    items[2] := 'Delete';
    items[3] := 'Edit';
    items[4] := 'Search';
    items[5] := 'Change Color';
    items[6] := 'Exit';
    comments [1] := 'Insert New Record.';
    comments [2] := 'Delete Record.';
    comments [3] := 'Edit Record.';
    comments [4] := 'Search Record.';
    comments [5] := 'Change Menu Color.';
    comments [6] := 'Exit.';
    pcolor := 5;
    pbcolor:= 7;
    phlcolor:= 2;
    assign (f2,'Tel.bak');
    if fsearch ('tel.bal',getenv ('c:\')) <> ' ' then
    erase (f2);
    assign (f,'Tel.dat');
    if fsearch ('Tel.dat',getenv('c:\')) = ' ' then
    rewrite (f);
    rename (f,'Tel.bak');
    assign (f,'Tel.dat');
    rewrite (f);
    rename (f2,'Tel.bak');
    if fsearch ('Tel.bak',getenv('c:\')) = ' ' then
    rewrite (f2)
    else
    reset (f2);
    for i:=0 to filesize (f2)-1 do
    begin
    read (f2,info);
    if info.deleted=false then
    write (f,info);
    end;
    while true do
    begin
    case popup (25,10,pbcolor,1,items,comments,pcolor,phlcolor,1) of
    1 : insert;
    2 : delete;
    3 : updating;
    4 : searching;
    5 : changecolor;
    6,0 : break;
    end;
    end;
    assign (f2,'Tel.bak');
    if fsearch ('Tel.bak',getenv('c:\')) = ' ' then
    erase (f2);
    close (f);
    textbackground (0);
    clrscr;
    end.

  5. #45
    در آغاز فعالیت
    تاريخ عضويت
    Nov 2008
    محل سكونت
    اصفهان
    پست ها
    7

    پيش فرض

    سلام دوستان کسی هست به من کمک کنه؟
    من برنامه ماتریس n*n به زبان پاسکال می خوام

  6. #46
    در آغاز فعالیت
    تاريخ عضويت
    Jan 2009
    محل سكونت
    مشهد
    پست ها
    4

    پيش فرض

    سلام دوستان.
    من دستورات(قالب) bnf زبان پاسكال رو مي خوام.
    كسي مي تونه كمك كنه؟

  7. #47
    در آغاز فعالیت
    تاريخ عضويت
    Apr 2007
    پست ها
    13

    پيش فرض

    با سلام
    پروژه پايان ترم پاسكال
    ممنون ميشم كمكم كنين

    برنامه بنويسيد كه يك جدول n*n در نظر بگيرد كه اعداد يك تا n را در جدول طوري قرار دهد كه در هر سطر و ستون اعداد يك تا n قرار گرفته و غير تكراري باشد.(حداقل 6*6)
    (جواب با ارايه ها و پروسجر و ....)

    با تشكر

  8. #48
    حـــــرفـه ای Farshadd's Avatar
    تاريخ عضويت
    Jan 2007
    محل سكونت
    خرم آباد
    پست ها
    4,485

    پيش فرض

    سلام.


    چرا من نمیتونم از دستور clrscr استفاده کنم؟؟ بعد از نوشتن کد یه لحظه برنامه اجرا میشه و بعد ارور میده. کدش رو این جوری مینویسم:

    ;...program
    ;uses crt
    var
    ;...
    begin
    ;clrscr
    ;....
    .end
    Last edited by Farshadd; 07-03-2009 at 23:10.

  9. #49
    داره خودمونی میشه
    تاريخ عضويت
    Jul 2007
    پست ها
    36

    پيش فرض

    سلام دوستان کسی هست به من کمک کنه؟
    من برنامه ماتریس n*n به زبان پاسکال می خوام
    مثلا برنامت می خواد با ماتریسه چی کار کنه؟

  10. #50
    اگه نباشه جاش خالی می مونه ayshin's Avatar
    تاريخ عضويت
    Jan 2008
    پست ها
    234

    پيش فرض

    سلام.


    چرا من نمیتونم از دستور clrscr استفاده کنم؟؟ بعد از نوشتن کد یه لحظه برنامه اجرا میشه و بعد ارور میده. کدش رو این جوری مینویسم:

    ;...program
    ;uses crt
    var
    ;...
    Begin
    ;clrscr
    ;....
    .end
    چه اروری می ده؟

Thread Information

Users Browsing this Thread

هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)

User Tag List

قوانين ايجاد تاپيک در انجمن

  • شما نمی توانید تاپیک ایحاد کنید
  • شما نمی توانید پاسخی ارسال کنید
  • شما نمی توانید فایل پیوست کنید
  • شما نمی توانید پاسخ خود را ویرایش کنید
  •