• ¡Welcome to Square Theme!
  • This news are in header template.
  • Please ignore this message.
مهمان عزیز خوش‌آمدید. ورود عضــویت


امتیاز موضوع:
  • 30 رای - 2.7 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
Title: مهم ترین سورس کدهای پاسکال مخصوصا برای پروژه های دانشجویی
حالت خطی
#6
سورس محاسبه ب.م.م
کد:
uses wincrt;

var
   m,n,r,temp : integer;
begin
     writeln('Enter two Number');
     readln(m,n);
     if m<n then
        begin
             temp:=n;
             n:= m;
             m:=temp;
        end;
     while m mod n <> 0 do
           begin
                r:=m mod n;
                m:=n;
                n:=r;
           end;
     writeln('B.M.M Of two number is : ',n);
end.
گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
 
پاسخ
  


پیام‌های این موضوع
RE: مهم ترین سورس کدهای پاسکال مخصوصا برای پروژه های دانشجویی - توسط Amin_Mansouri - 08-04-2011، 10:37 PM

پرش به انجمن:


Browsing: 1 مهمان