🔔 Çevrimdışı bildirim almak ister misiniz?
Bir konuya etiketlendiğinizde, özel mesaj aldığınızda, bir mesajınız alıntılandığında forumda olmasanız bile anlık bildirim almak için lütfen izni verin.
Pascal programlama dilinde yazılmış bu programda bir cümlede geçen kelime sayısını bulunmuştur. Bu programda kelime sayısını bulurken boşluk işaretine göre arama yapılmıştır, diğer (, . ! - vb) karakterler eklenerek program daha üstün bir hale getirebilir.
Program Kodu:
Kod: Kodu kopyalamak için üzerine çift tıklayın!
Uses Crt;
Var
cumle:string;
uzunluk,i,kelimesayi:integer;
begin
clrscr;
write('Cumleyi giriniz :');
readln(cumle);
uzunluk:=length(cumle);
for i:=1 to uzunluk do
if (cumle[i]=' ')and(cumle[i+1]<>' ') then
kelimesayi:=kelimesayi+1;
write('Cumledeki kelime sayisi :',kelimesayi+1);
readln;
end.
11 Temmuz 2014, 11:10
Benzer Konular 
Normal
