![]()
لطفا برايم آموزش Qbasic بگذاريد.
تا بعد خدانگهدار![]()
![]()
لطفا برايم آموزش Qbasic بگذاريد.
تا بعد خدانگهدار![]()
سلام دوست عزیز .
ورود شما رو به این انجمن تبریک میگیم.
دوست عزیز اینجا فقط مربوط به سوال های تخصصی برنامه نویسی هست .اگه شما اموزش برنامه ای رو میخواهید در انجمن خودش باید درخواست کنید .ولی اگه مقاله باز اینجا میشه کاری کرد .متشکر از شما.
این برنامه 2 عدد را گرفته وچاپ میکند تا بعد
input a
input b
print a,b
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
خدانگهدار
سلام خوش آمدید
امیدوارم در این انجمن نهایت استفاده را ببرید
سلام
یک الگوریتم میخواستم که مثلا یک عدد طبیعی n را بگیرد و تمام اعداد اول کوچکتر از آن را به ما نشان دهد.
ممنونم
می خواهم برنامه نویسی را یاد بگیرم . اگر می توانید یک سایت آموزشی معرفی نمایید
با استفاده از باقی مانده هایش
Last edited by shahedi; 09-12-2006 at 15:19.
برنامه اي بنويسيد كه اعداد يك تا ده را چاپ كند سپس مقابل هريك ريشه چهارم آن را نمايش دهد .
CLS
FOR i = 1 TO 10
( ( PRINT i ; " " ; SQR ( SQR( i
NEXT i
END
توضيح : به منظور ايجاد فاصله بين عدد و ريشه چهارمش از يك رشته خالي به طول 20 كاراكتر استفاده شده است . مي توانستيد به جاي اينكه 20 بار space را فشار دهيد از تابعي كه به همين منظور آماده شده ، استفاده كنيد : تابع (SPC(a به تعداد مشخص شده ( a تا ) فضاي خالي ايجاد مي كند . در اين صورت خط سوم برنامه به اين صورت در مي آمد كه صحيح تر و بهتر است :
( ( PRINT i ; SPC (20) ; SQR ( SQR( i
خیلی ساده از روش غربال اراتستن استفاده می کنیم :
cls
input n
dim a(n):a(1)=0
for i= 1 to n
for j = 2 to n\i
if a(i)<>0 then a(i*j)=0
next j
next i
for i =1 to n
if a(i)<>0 then print a(i):next i
print a: عددی که در حافظه ی کامپیوتر با نام a ذخیره شده است را چاپ می کند .
print "a": چاپ می کند a
print 2+3 : چاپ می کند 5
هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)