MyDesign | Kod Arşivi - Anasayfaya Dön   No banner in farm
Anasayfa Araştır Forum Gelişmiş Arama Siteniz İçin En Hit İçerikler RSS İçerik Ekle Scriptler Destekleyenler Kadromuz Reklam İletişim Giriş Sayfası Yap  Sık Kullanılanlara Ekle
Bu Kategorinin En Yeni Makaleleri:


Bu Kategorinin En Çok Okunan Makaleleri:






Arama:
Gelişmiş Arama


No banner in farm



En Çok Görüntülenen Kodlar:


Üye Girişi:
 Üye Ol



Anasayfa > Pascal > Makaleler

If...Then...Else

If...Then...Else yapısının anlatımı ve örnekler

if  else  then 

Kategori: Pascal
Gönderen: fingof
Tarih: 24 Haziran 2007
Okunma Sayısı: 20103
Puan: 7,8 / 10 Oy
Puan Ver:
Google Bookmarks  del.icio.us  Digg  Yahoo! MyWeb  Windows Live  Furl
Öncelikle kelimelerin anlamlarını ögrenelim;
If : eğer.
Then : ise.
Else : değilse.
 
İkinci olarak yapısını ögrenelim;
if  ŞART then KOMUT VEYA İŞLEM
örn/   if yas<18 then write('Ehliyet alamaz');
 
Şimdi ise tamamını yani if...then...else nasıl kullanılır onu ögrenelim
Yapısı:
if yas<18 then write('Ehliyet alamaz')
else write('Ehliyet alabilir');
 
NOT: Dikkat ettinizmi bilmiyorum ama else var ise elseden önce ";" kullanılmaz.
 
Örnek:
 
uses crt;
var
y1,y2,y3,soz:integer;
ort::real;
begin
writeln('1.yazılı notunu giriniz');  readln(y1);
writeln('2.yazılı notunu giriniz');  readln(y2);
writeln('3.yazılı notunu giriniz');  readln(y3);
writeln('Sözlü notunu giriniz');    readln(soz);
ort : = (y1+y2+y3+soz)/4;
if ort<45 then writeln('Başarısız');
else writeln('Başarılı');
readln;
end.

If...Then...Else için yazılan yorumlar

hasko  { 11 Kasım 2011 }
div bölme işleminde kullanılır integer tipinde olmalıdır yani tam sayı tipinde olmalıdır:)

Enes  { 30 Temmuz 2011 }
Arkadaşlar benim bir sorum olacak.Alışveriş sitesi yapıyorum.Burada ürünün bedenleri sıralayan bir asp kodu yazdım.Beden adetlerine bakarak 0 dan büyük ise o bedeni getiriyor.Ancak bunun bir menü şeklinde gelmesini istiyorum, fakat sonuca ulaşamadım.Yardımcı olabilecek var mı ? <% 'Veritaban&#253;ndaki tabloyu aç Set Rs = server.CreateObject("ADODB.RecordSet") Rs.open "Select * from ERKEKURUN where id="&id,bag,1,3 if not rs.eof then %> <% if FSAYimi(rs("L_adet")) > 0 then response.Write("L"&rs("L_adet")) end if if FSAYimi(rs("M_adet")) >0 then response.Write("M"&rs("M_adet")) end if if FSAYimi(rs("S_adet")) >0 then response.Write("S"&rs("S_adet")) end if if FSAYimi(rs("X_adet")) >0 then response.Write("X"&rs("X_adet")) end if if FSAYimi(rs("XXL_adet")) >0 then response.Write("XXL"&rs("XXL_adet")) end if else response.Write("bos") end if %>

Ahmet Enes DABANLIOĞLU   { 22 Mayıs 2009 }
@yasin Ben onu dikkatinizi ölçmek için öyle yaptım :)

liseli   { 23 Mart 2009 }
yha bana mov ve div yanı pscalda işlem için kullanılıomus galıba bunlarla ılgılı acıklama ve soru olursa cok sevınırım lutfen

yasin   { 07 Aralık 2008 }
üst tarafta not olarak elseden önce ; kullanılmaz demişsin ama alttaki örnekte kullanmışız

shekere boy   { 29 Haziran 2007 }
komutları hatırlatmak için bu gibi ufak örnekler iyi geliyo... 3 yıl aradan sonra bu gibi şeylere ihtiyaç duydumu anladım... güzell

Yorum ekleyin

Bu sayfaya link verin:
Anasayfa > Pascal > Makaleler > If...Then...Else
Kategoriler:


Forum:



Bağlantılar:


Murat Yavuz | Site Haritası | Gizlilik Bildirimi | 54.204.252.37 | 0,11 Saniye
© Copyright 2004-2017 MyDesign | Kod Arşivi. Tüm Hakları Saklıdır.
MyDesign | Kod Arşivi, en iyi görünüm için, 1024x768 ve üzeri çözünürlük tavsiye eder.