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.
DönüşümDönüşüm İfadeİfade