Temat17: Sposoby przekazywania parametrów. Zastosowanie procedur i funkcji w zadaniach.

ZADANIE 1

1. Napisz program, który zlicza w podanym tekście wskazany znak (z klawiatury).
   W programie zdefiniuj procedurę z parametrem przekazywanym przez wartość. Parametr określa znak w analizowanym tekście, np. procedure znak(x:char)

2. Napisz program, który zlicza w podanym tekście wskazany znak (z klawiatury).
   W programie zdefiniuj procedurę z dwoma parametrami przekazywanymi przez wartość. Jeden z parametrów określa analizowany tekst, a drugi - znak w analizowanym tekście
   np. procedure znak(s:string;x:char)

3. Napisz program, który zlicza w podanym tekście wskazany znak (z klawiatury).
   W programie zdefiniuj procedurę z parametrem przekazywanym przez zmienną, która zlicz ilość znaków, np. procedure licz(var n:integer)

4. Napisz program, który zlicza w podanym tekście wskazany znak (z klawiatury).
   W programie zdefiniuj procedurę z punktu b) i punktu c).

ZADANIE 2

Czy dany ciąg znaków jest palindromem?

Jeden ze sposobów to porównywanie znaku pierwszego z ostatnim. Aby porównywać tych samych wyrazów ciągu dwa razy, należy ograniczyć sprawdzanie do połowy długości ciągu. Wykorzystać można operator dzielenia całkowitego div.

Napisz program sprawdzający, czy podany wyraz jest palindromem. W programie zdefiniuj procedury z parametrem przekazywanym przez wartość i przez zmienną.

ZADANIE 3

Napisz program obliczający aⁿ . W programie zdefiniuj funkcję z dwoma parametrami przekazywanymi przez wartość. Parametry określają podstawę i wykładnik potęgi,
np. function potega(x,y:integer):integer;

---