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

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

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

نتائج البحث
 
Rechercher بحث متقدم
سحابة الكلمات الدلالية
روحاني معالج مطوع السعودية الكويت الخليج مجاني
المواضيع الأخيرة
»  المؤتمر العربى السادس التطوير الإدارى فى المؤسسات الحكومية فرص التحول البناء مقر الأنعقاد : القاهرة – جمهورية مصر العربية مدة الانعقاد : من 24 الى 28 ديسمبر 2017م
السبت نوفمبر 04, 2017 5:43 am من طرف هويدا الدار

» Sixth Arabian conference (governmental organizations administrative development) Effective transformation opportunities Location: Cairo –Egypt Duration: 24:28 December 2017
الأحد أكتوبر 29, 2017 7:13 am من طرف هويدا الدار

» شيخ//معالج//مطوع//روحاني//مجاني// الخليج//السعودية//الكويت//الامارات//قطر//البحرين//عمان//محمد القطاني
الأربعاء أكتوبر 25, 2017 11:47 am من طرف Admin

» تسهيل زواج رد المطلقة فك سحر | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:59 am من طرف Admin

» شيخ روحاني معتمد للعلاجات في السعودية | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:25 am من طرف Admin

» شيخ روحاني ممتاز في السعودية | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:16 am من طرف Admin

» شيخ روحاني مجرب في السعودية | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:10 am من طرف Admin

» شيخ روحاني مجرب | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:05 am من طرف Admin

» شيخ روحاني مجرب | الشيخ الروحاني أ.د / محمد القطاني | 0037066105603
السبت أكتوبر 21, 2017 8:04 am من طرف Admin


شاطر | 
 

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

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




تاريخ التسجيل : 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
تواصل معنا
لزيارة موقعنا أضغط هــــــــــــــــــــنا



مول عجمي ستار | عجمي ستار مول | عجمي ستار | ستار عجمي | توصيل الطلبات | دليفري
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 زائر)-
انتقل الى: