ايران ويج

ايران ويج > برنامه نویسی > دیگر زبانها و تکنولوژی ها > لطف دوستان در پاسکال ( چند تا تمرین )
نسخه‌ی کامل: لطف دوستان در پاسکال ( چند تا تمرین )
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.

t3r!p3000

۲۴-آذر-۱۳۸۸, ۰۵:۳۱:۳۱
سلام به همه ایرانویجی ها

یه چند تا سوال و تمرین در مورد پاسکال داشتم که ممنون می شم یکی از دوستان لطف کنه و واسم انجام بده !!!

فقط مسئله حیاتیه و اگه بشه تا فردا شب آماده بشه عالی می شه !

پیشاپیش از لطف همه دوستان ممنونم !!!!! ( ان شاا.. بتونم تو عروسیتون جبران کنم !!! )


1- ماتریسی بنویسید که با استفاده از روش محورگیری کلی حذفی گاووس جدول حل کند ؟

2-برنامه ای بنویسید که ضرب اعداد صحیح و حقیقی نسبتا بزرگ را شبیه سازی کند ! ( صحیبح و حقیقی ها ) با استفاده از آرایه ها !

3-برنامه ای بنویسید که سیستم امنیتی را با یک کد سه رقمی و یک کد 4 رقمی فعال ساز شبیه سازی کند !
یعنی برای ورود تا سه بار بتوان رمز را اشتباه وارد و برای تمدید ( دوباره ) دادن رمز با وارد کردن رمز چهار رقمی را وارد کند و در صورت اشتباه بودن رمز چهار رقمی پیغام خطا چاپ کند !

ilgar

۲۴-آذر-۱۳۸۸, ۱۴:۵۴:۳۶
برای اینکار یا باید با شرکت رانی قرارداد ببندی یا با یه رستوران

t3r!p3000

۲۴-آذر-۱۳۸۸, ۱۸:۰۸:۲۶
مهندس واسه خودم نمی خوام !

ولی هر کی انجام بده از خجالتش در میام !

منون میشم کسی تا امشب واسم انجامش بده !!!!!

babyy

۲۴-آذر-۱۳۸۸, ۱۹:۴۸:۳۵
سلام


این آخریه ، همینطوری میخواست دیگه ؟؟
کد:
program trip3000     ;
uses wincrt ;
var
password , spassword , insertnumber : string ;
counter : integer ;
begin
password := '111' ;
spassword := '2222' ;

for counter := 1 to 3 do
begin
  readln(insertnumber);
  if insertnumber = password then
   begin
     write('ok && true');
     exit ;
   end
  else
   begin
     write('sory !');
   end;
end;
write('insert super password :');
readln(insertnumber);
  if insertnumber = spassword then
   begin
     write('ok && true super password');
   end
   else
   begin
     write('sory ! && End ! .');
   end ;
end.

اولی هم که نمیدونم چیه Biggrin
دومی هم سوادم نمیکشه ، اگه دوستان جواب ندادن ... حالا میرم دنبالش ،

t3r!p3000

۰۲-دى-۱۳۸۸, ۲۰:۲۸:۲۵
ممنون بابی جوون !
بقیه اش رو چطور !!؟؟؟؟

کسی نمی تونه کمک کنه !؟؟؟

Loyal

۰۲-دى-۱۳۸۸, ۲۲:۱۳:۱۷
سلام به همگی.
علی جان برنامه هایی که می خوای وقت گیره و یخورده هم نیاز به تخصص داره.

من سؤال دومتو دارم ولی به زبان C نوشته شده. ضمناً با استفاده از آرایه هم نیست.

حداقل روش نوشتن سؤالات رو از توی اینترنت در می آوردی تا بشه از روش به سؤال جواب داد.

فاطمه وطن دوست

۰۹-دى-۱۳۸۸, ۱۱:۳۵:۴۴
سلام

فعلاَ برای حل معادلات 3 مجهولی برنامه رو تست کنید.

روش جالبیه برای حل معادلات 3 مجهولی با استفاده از ماتریس !

آرایه های زیر مثلث رو صفر می کنیم. و در نهایت به راحتی مجهولات (x1,x2,x3,...)

بدست می آید.

برای اینکه ببینید برنامه درست جواب میده میتونید از مثال های این سایت استفاده

کنید.

روش استفاده از برنامه :
مرحله ی اول تعداد جملات رو 3 وارد کنید.
مرحله ی دوم : ضرایب x1,x2,x3 وارد کنید.

در نهایت برنامه ماتریس نهائی و ریشه های X1,X2,X3 , ... را نمایش میده.

آدرس سایت:
http://en.wikipedia.org/wiki/Gaussian_elimination

t3r!p3000

۰۹-دى-۱۳۸۸, ۱۱:۴۵:۱۵
فوق العاده ممنون !

بتونیم جبران کنیم !








فقط کد برنامه رو من پیدا نکردم !

فاطمه وطن دوست

۰۹-دى-۱۳۸۸, ۱۱:۵۳:۰۶
(۰۹-دى-۱۳۸۸, ۱۱:۴۵:۱۵)t3r!p3000 نوشته است: [ -> ]فوق العاده ممنون !

بتونیم جبران کنیم !








فقط کد برنامه رو من پیدا نکردم !

اینم کد .

hossein.B

۰۹-دى-۱۳۸۸, ۲۳:۵۲:۲۸
خیلی خیلی ازتون بابت برنامها ممنونم

فاطمه وطن دوست

۱۶-دى-۱۳۸۸, ۱۳:۱۴:۱۴
پاسخ سوال 2

خودتونم تست کنید ببینید مشکلی نداره؟
ايران ويج > برنامه نویسی > دیگر زبانها و تکنولوژی ها > لطف دوستان در پاسکال ( چند تا تمرین )