Ver. 1.0 Beta, Nie masz kompilatora? Teraz mo¿esz pisaæ skrypty ONLINE! Wersja podstawowa -nie zawiera wszystkich poleceñ Pascala. S³u¿y do nauki podstaw

Zmiana wielko¶ci liter


W niektórych programach zachodzi potrzeba zmiany wielko¶ci liter. Np. gdy u¿ytkownik wpisze swoje imiê ma³± liter±, mo¿e byæ mi³o zaskoczony, gdy komputer i tak wy¶wietli je wielk± liter±.


Do zmiany wielko¶ci znaku s³u¿y funkcja UpCase(ch : char); Zmienia ona jednak wielko¶æ pojedynczego znaku a nie ca³ego napisu. ¯eby zmieniæ wielko¶æ ca³ego napisu musimy to zrobiæ rêcznie za pomoc± pêtli.


 

Je¶li chcemy zmieniæ pierwsz± literê wczytanego napisu, mo¿na u¿yæ:


ReadLn(napis);
napis[1] := UpCase(napis[1]);
WriteLn(napis);

A co je¶li chcemy zmieniæ ca³y napis na du¿y? Wystarczy dodaæ pêtlê, a zamiast cyfry 1 w powy¿szym przyk³adzie, zmienn±, która bêdzie stopniowo zwiêkszana.


ReadLn(napis);
for i:=1 to Length(napis) do
  napis[i] := UpCase(napis[i]);
WriteLn(napis);

Strona korzysta z plików cookie w celu ¶wiadczenia us³ug Google (reklamy, statytyki) oraz Facebook. Je¶li chcesz zablokowaæ pliki cookies wy³acz je w swojej przegl±darce. Potrzebujesz pomocy? kliknij