Forumana.com, Forum, Forum Sitesi, Forumlar

Forum KayıtForum Kayıt ForumForum OyunlarOyunlar MesajlarMesajlar GruplarGruplar Üye GruplarıYönetim RadyoFM DinleRadyoFM TwitterTwitter FacebookFacebook İletişimİletişim
 


Forum Forumlar Forum Sitesi Forum Grup Forum Albüm Forumları Okudum
Go Back   Forumana.Com - Forum, Forumlar, Forum Sitesi Web Tasarım Programlama Dilleri Diğer Diller

Perl While Until Döngüleri

 Diğer Diller forumunda yer alan Perl While Until Döngüleri konusu, Perl While Until Döngüleri Perl While Until Döngüleri DÖNGÜLER While Döngüsü: Koşul ifadesi doğru (true) ise blok içi uygulanır. Değilse blok dışına(sonrasına) çıkılır. while ($sayi == 5) { print ("Sayı ...



Yeni Konu aç Cevapla
 
Seçenekler Stil
Alt 27-Şubat-2014, 03:18   #1 (permalink)
Fox
UYARI:
Kullanıcıların Profil Bilgileri Misafirlere Kapatılmıştır. Görmek için KAYIT olmalısınız.~
Doğru Bilgi Perl While Until Döngüleri

Perl While Until Döngüleri

DÖNGÜLER


While Döngüsü:


Koşul ifadesi doğru (true) ise blok içi uygulanır. Değilse blok dışına(sonrasına) çıkılır.


while ($sayi == 5) {



print ("Sayı 5!\n");

}



Yukarıdaki örnekte koşul ifadesi $sayı değişkeninin 5’e eşitliğini test ediyor. Eğer 5 ise (true) oklu parantez içine (bloğa) geçilerek icra

edilir. % değilse (false) blok dışına çıkılır.



Örnek Program : Program adı wh_dongu1.pl olsun.



#!/usr/local/bin/perl

$sayi = 0;

$sayac = 1;

print ("Bu satır döngü başlamadan evvel yazıldı.\n");

while ($sayi == 0) {

print ("Dongu sayac değeri " $sayac "\n");

if ($sayac == 3) {

$sayi = 1;

}

$sayac = $sayac + 1;

}

print ("Döngüden çıktık.\n");



Çalışması :



>wh_dongu1

>Bu satır döngü başlamadan evvel yazıldı.

>Dongu sayac değeri 1

>Dongu sayac değeri 2

>Dongu sayac değeri 3

>Döngüden çıktık.

>







Until Döngüsü :


Genel formatı :

until (koşul ifadesi) {

koşul ifadesi sonucu yanlış(true) ise

blok içi uygulanır

koşul doğru olunca blok dışına çıkılır

}



Örnek Program : Program adı untilprg.pl olsun



#!/usr/local/bin/perl

print ("17 ARTI 26 SONUCU KACTIR.?\n");

$dogru_cevap = 43; # Doğru cevap atandı

$girilen_deger = <STDIN>;

chop ($girilen_deger);

until ($girilen_deger == $dogru_cevap) {

print ("Yanlis! Yeniden dene!\n");

$girilen_deger = <STDIN>;

chop ($girilen_deger);

}

print ("Bravo..Dogru cevap!!!\n");



Çalışması :

>untilprg

>17 ARTI 26 SONUCU KACTIR.?

>39

>Yanlis! Yeniden dene!

>43

> Bravo..Dogru cevap!!!





» Perl While Until Döngüleri - www.forumana.com

  Alıntı ile Cevapla
Yeni Konu aç Cevapla

Yukarıdaki Konuyu Aşağıdaki Sosyal Ağlarda Paylaşabilirsiniz.

Etiketler
donguleri, perl


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:52.

Forum Künyemiz
Uyarı

Powered by vBulletin® Version 3.8.4
Copyright ©2011 - 2019, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO 3.6.0
Açılış Tarihi : 05.12.2011
Kuruluş Tarihi : 20.11.2011
Hazırlayan & Tasarlayan : Forumana.com
 

Sosyal paylaşım platformu olan Forumana.com sitemizde, kullanıcılar 5651 sayılı kanunun ilgili maddesine ve TCK'nın 125. maddesine göre yaptıkları paylaşımlardan sorumludur, kullanıcı kaynaklı herhangi bir durumdan Forumana.com sitesi sorumlu değildir. Tüm hukuksal bildirimleriniz/sorunlarınız/istekleriniz ve şikayetleriniz için İletişim panelinden bizlere ulaşabilirsiniz, Forumana.com yönetimi en geç "3" iş günü içerisinde dönüş yapacaktır. Platformumuz; kişilik ve telif hakları korunumu, illegal paylaşım ve korsanla mücadele konusunda yetkililere yardımcı olmayı ilke edinmiştir.

Forum, Forumlar, Forum Sitesi, Etiket, Sitemap, Arşiv