Merhaba arkadaşlar bundan sonra sizlere pascal programlama dili ile yapılmış örnekler verecegimi daha önce söylemiştim sıradaki örnegimiz pascal programlama'da klavyeden girilen sayıya kadar olan sayıları saymayı yapmayı saglayan program kodlarını paylaşacagım.Bu örnegimizde klavyeden deger girmeyi, il else yapısını görecegiz. Yapamadıgınız yerleri sorularınızı yorum yapmayı unutmayınız.
var sayac:integer; kac:integer; label etik; begin write('Kaca kadar...:'); readln(kac); sayac:=0; etik: sayac:=sayac+1; writeln(sayac); if(sayac<kac) then goto etik; readln; end.Kodları indirmek için tıklayınız.
EmoticonEmoticon