منتدى برامج نجوم العرب
أو إذا كنت عضو فرجاءً قم بتسجيل الدخول من هنا

منتدى برامج نجوم العرب

منتدى برامج نجوم العرب إبداع و تميز أكبر منتدى عربي للبرامج.
 
الرئيسيةالرئيسية  س .و .جس .و .ج  بحـثبحـث  التسجيلالتسجيل  دخولدخول  
الموقع قيد الصيانة حاليا نظراً للتجديدات السنوية ... وكالة ميديا وورلد للإعلان www.mediawoorld.com
دخول
اسم العضو:
كلمة السر:
ادخلني بشكل آلي عند زيارتي مرة اخرى: 
:: لقد نسيت كلمة السر
بحـث
 
 

نتائج البحث
 
Rechercher بحث متقدم
سحابة الكلمات الدلالية
المواضيع الأخيرة
» التفاصيل الكاملة لدرجة الماجستير الاكاديمي فى ادارة الاعمال MBA من جامعة نورثهامبتونUniversity of Northampton البريطانية والتي تاسست عام 1924 م
الإثنين يوليو 24, 2017 2:57 am من طرف هويدا الدار

»  ماجستير ادارة الاعمال المهني المصغر (( ماليزيا – القاهرة )) خلال الفترة من 17الى 26سبتمبر 2017م
الأربعاء يوليو 19, 2017 3:38 am من طرف هويدا الدار

» الدورة التدريبية الإحلال الوظيفي و استقطاب الكفاءات الداخلية القاهرة – اسطنبول خلال الفترة من 24 الي 28 سبتمبر 2017 م
الثلاثاء يوليو 18, 2017 7:53 am من طرف هويدا الدار

» لدورة التدريبية الإحلال الوظيفي و استقطاب الكفاءات الداخلية القاهرة – اسطنبول خلال الفترة من 24 الي 28 سبتمبر 2017 م
الثلاثاء يوليو 18, 2017 7:51 am من طرف هويدا الدار

»  الدورة التدريبية الجريمة المعلوماتية والتجارة الإلكترونية القاهرة – بيروت للفترة من 23 الى 27 يوليو 2017 م
الأربعاء مايو 24, 2017 2:38 am من طرف هويدا الدار

»  الدورة التدريبة التوعية العامة للبيئة فى مجال الصرف الصحى القاهرة – كوالالمبور خلال الفترة من 16 الى 20 يوليو 2017 م
الثلاثاء مايو 23, 2017 7:35 am من طرف هويدا الدار

»  ماجستير التخطيط الاستراتيجي المهني المصغر والممنوح من جامعة ميزوري – الولايات المتحدة الأمريكية مكان الانعقاد : المملكة المغربية موعد الانعقاد : من 15 الى 26 يوليو 2017 م
الأحد مايو 21, 2017 7:56 am من طرف هويدا الدار

»  الدورة التدريبية مهارات التقديم التليفزيونى والحوارى للفترة من 23 يوليو الى 1 أغسطس 2017 م
السبت مايو 20, 2017 7:38 am من طرف هويدا الدار

» الدورة التدريبية إدارة السلامة والصحة المهنية (أوشا) ماليزيا – إسطنبول خلال الفترة من 15 الي 22 يوليو 2017 م
الأربعاء مايو 17, 2017 3:04 am من طرف هويدا الدار


شاطر | 
 

 فورتران | برعاية | مول عجمي ستار | مطعم فتافيت مطبخي | اكبر مطعم للدليفري بالاسكندرية

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة




تاريخ التسجيل : 31/12/1969

مُساهمةموضوع: فورتران | برعاية | مول عجمي ستار | مطعم فتافيت مطبخي | اكبر مطعم للدليفري بالاسكندرية    الأربعاء يونيو 13, 2012 7:05 am











محتوى مخفي
يجب عليك الرد لرؤية النص المخفي








فورتران
من ويكيبيديا، الموسوعة الحرة
اذهب إلى: تصفح, البحث

فورتران (بالإنجليزية: Fortran) هي لغة برمجة متعددة الاستخدام واختصار لكلمتين في الإنجليزية معناها ترجمة المعادلات (FORmula TRANslation)في عام 1954 خرج جون باكوس John Backus مع مجموعة من شركة IBM بلغة الفورتران وكانت أولي لغات البرمجة ذوات المستوى العالي وتستخدم أساسا في التحليلات العددية وفي الحوسبة العلمية.وتتميز هذه اللغة بالبساطة والإيجاز ولقد ظهرت العديد من صور تلك اللغة آخرها Fortran 2003. تحتوي آخر إصدارات للغة الفورتران علي مجموعة من الأوامر التي تفسر نفسها بنفسها مثل أقرأ READ وأكتب WRITE وإذهب إلي GO TO وتوقف STOP وتنفذ برامج الفورتران تبعا لتسلسل الجمل بها. ولكن تكمن صعوبتها في تحديد الخطأ عند حدوثه حيث من يستوجب عليك تتبع الكود من اوله مما يزيد الامر صعوبة.
[عدل] أمثلة برمجية

البرنامج التالي يحسب قيمة المتوسط للبيانات التي تمت إدخالها:

program average

! Read in some numbers and take the average
! As written, if there are no data points, an average of zero is returned
! While this may not be desired behavior, it keeps this example simple

implicit none

real, dimension(Smile, allocatable :: points
integer :: number_of_points
real :: average_points=0., positive_average=0., negative_average=0.

write (*,*) "Input number of points to average:"
read (*,*) number_of_points

allocate (points(number_of_points))

write (*,*) "Enter the points to average:"
read (*,*) points

! Take the average by summing points and dividing by number_of_points
if (number_of_points > 0) average_points = sum(points) / number_of_points

! Now form average over positive and negative points only
if (count(points > 0.) > 0) then
positive_average = sum(points, points > 0.) / count(points > 0.)
end if
if (count(points < 0.) > 0) then
negative_average = sum(points, points < 0.) / count(points < 0.)
end if

deallocate (points)

! Print result to terminal
write (*,'(a,g12.4)') 'Average = ', average_points
write (*,'(a,g12.4)') 'Average of positive points = ', positive_average
write (*,'(a,g12.4)') 'Average of negative points = ', negative_average

end program average








مقدمة برعاية مطعم فتافيت مطبخي
==========
=======
===
=




E-mail : info@fatafet.elagmy.com Or E-mail: pop@fatafet.elagmy.com
E-mail : fatafet.elagmy@yahoo.com
صفحة الفيس بوك
www.facebook.com/FatafeatMtbkhy
--- === العنـــــوان === ---
الفرع الرئيسي : الاسكندرية - العجمي - F73 مول عجمي ستار 01153669116 - 01229626908

www.fatafet.elagmy.com

للأعلان مع وكالة ميديا وورلد
أتصل بالارقام التالية
01001296785
01115356260
01228330464
تواصل معنا
E-mail : mediaworld2010@yahoo.com
Facebook : www.facebook.com/mediaworld2012
لزيارة موقعنا أضغط هــــــــــــــــــــنا



مول عجمي ستار | عجمي ستار مول | عجمي ستار | ستار عجمي | توصيل الطلبات | دليفري
http://realestate.shop-forum.net/ | http://real.forumegypt.net/ | http://aqar.site-forums.com/ | http://aqar.forumscompany.com/ | http://estate.real-tv-board.com/ | http://real.stationforum.com/ | http://aqary.dialog.tv/
http://real.nicetopics.com/ | http://aqar.high-forums.com/ | http://aqar.get-forum.com/ | http://elaqar.alafdal.net/ | http://marina.board-shop.net/ | http://matrouh.full-forum.com/ | http://kanal.topic-zone.com/
http://agmy.full-forum.com/ | http://bahary.site-forums.com/ | http://cairo.nice-gallery.net/ | http://koet.onlinegoo.com/ | http://alex.nice-album.com/
http://hanovil.great-forum.com/ | http://upper.onepiece-forum.com/
http://gulf.forumsshop.com/ | http://aqar.marocs.net/
http://elsahel.nice-forum.com/ | http://gate.mountada.net/ | http://mall.egyptianforum.net/
http://machinery.shop-forum.net/ | http://alshahina.alafdal.net/ | http://souq.3arabiyate.net/ | http://cars.shop-forum.net/ | http://used.shop-forum.net/ | http://compu.shop-forum.net/ | http://stock.shop-forum.net/ | http://gold.shop-forum.net/
http://print.board-poster.com/ | http://lawyers.forumegypt.net/ | http://arab.jobs-board.com/ | http://accountants.forumegypt.net/ | http://secondary.egyptianforum.net/ | http://election.forumegypt.net/ | http://arab.subject-line.com/ | http://prog.first-forum.com/
http://prog.nojoumarab.net/ | http://guys.lovediscussion.net/ | http://egypt.forum.st/ | http://arab.forum-express.com/ | http://qasr.ibda3.org/ | http://arab.stationforum.com/ | http://7akawy.darbalkalam.com/ | http://arab.palestineforums.com/ | http://attack.hooxs.com/ | http://elnas.alafdal.net/ | http://arab.newstarforum.com/
http://cool.goo-done.com/ | http://saht.riadah.org/ | http://future.full-forum.com/
http://meam.hooxs.com/ | http://school.babyme.org/ | http://talm.arabepro.com/
http://kids.to-relax.net/ | http://kids.montadamoslim.com/ | http://dentist.collegesforums.com/ | http://iqtisad.stuning.net/ | http://arts.fare-forum.com/ | http://veterinary.creare-forum.com/ | http://lang.topdiscussion.com/
http://faculty.medecinarabe.com/ | http://handasa.host-power.com/ | http://ealam.online-talk.net/ | http://kitchen.arabfoot.net/ | http://fatafet.chiefs.tv/ | http://alexandria.banouta.net/ | http://arab.forumlux.net/ | http://cook.help-out.net/
http://hoqoq.subject-line.com/ | http://i-can.do-forum.com/ | http://photoshop.nice-album.com/ | http://conditioner.home-forum.com/ | http://qalaa.big-forum.net/ | http://mazraa.secrets-stories.com/ | http://beauty.only-girls.net/ | http://press.world-servers.com/ | http://photo.high-forums.com/ | http://rare.nice-gallery.net/
http://magic.all-riders.com/ | http://2012.forumsreality.com/ | http://sata.real-tv-board.com/ | http://london.olympicgame2012.com/ | http://arab.sport-area.net/
http://gate.africamotion.net/ | http://dar-el.3oloum.org/ | http://arab.smileyforum.net/ | http://qariya.team-talk.net/ | http://qariya.all-up.com/ | http://gate.forumegypt.net/ | http://re25.forumegypt.net/ | http://station.forumegypt.net/ | http://egtravian.forum.st/ | http://game.forumegypt.net/ | http://al3ab.akbarmontada.com/
http://game.warsboard.com/ | http://al3ab.get-forum.net/ | http://al3ab.bforum.biz/ | http://al3ab.4umer.net/ | http://al3ab.3oloum.org/ | http://al3ab.almountadaalarabi.com/ | http://al3ab.nice-board.net/ | http://al3ab.watanearaby.com/ | http://smaay.mousika.org/
http://gate.mazikaraby.com/ | http://film.nojoumarab.net/ | http://film.vampire-legend.net/ | http://films.forumegypt.net/ | http://forum.action-24.com/
http://www.fatafet.elagmy.com/ | http://www.knoz.elagmy.com/ | http://www.facebook.com/knoz.elagmy | http://www.facebook.com/aqaryeg | http://mworld.clanteam.com/ | http://www.aqaryeg.com/ | http://www.shakh.elagmy.com/ | http://www.account.elagmy.com/ | http://elnoor.clanteam.com/ | http://www.ecc.elagmy.com/ | http://www.facebook.com/EccMall | http://yasmin.elagmy.com/ | http://www.mokhtaralex.com/ | http://www.trust.elagmy.com/ | http://goldenhorsealex.com/ | http://www.facebook.com/pages/Goldenhoresalex-%D8%AC%D9%88%D9%84%D8%AF%D9%86-%D9%87%D9%88%D8%B1%D8%B3/313103238735273?v=wall | شركة العجمي | http://www.elagmy.com/ | http://www.noor.elagmy.com/ | http://farah-egypt.com/ | http://sara2012.clanteam.com/ | http://eldalil.clanteam.com/ | http://aqary.clanteam.com/
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
 
فورتران | برعاية | مول عجمي ستار | مطعم فتافيت مطبخي | اكبر مطعم للدليفري بالاسكندرية
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتدى برامج نجوم العرب :: منتديات الكمبيوتر والانترنت :: منتدى لغات البرمجة(يشاهدة 1 زائر)-
انتقل الى: