1 uygun sonuç bulundu

gönderen meyd
01 Kas 2016 10:58
Forum: Kylix / Lazarus / Freepascal
Başlık: Basamak Sayısı Hesaplama
Cevaplar: 0
Görüntüleme: 266

Basamak Sayısı Hesaplama

Klavyeden girilen bir sayının kaç basamaklı olduğunu veren minik bir algoritma yaptım. Bunu sağlayan hazır bir fonksiyon var mı acaba?.. program basamak_sayisi; uses crt; var n:real;i:byte; begin clrscr; writeln('Bir sayi giriniz');readln(n); repeat n:=int(n/10); i:=i+1; until n=0; writeln('Girdigin...