Egzamin z Pascala I.   20-I-1999                Grupa I

W pierwszym wierszu prosimy wpisać (jako komentarz) imię,
nazwisko i identyfikator z sieci Novell.

Zad 1
Napisz program, który dla każdego wiersza tekstu podanego
z klawiatury (pusty wiersz kończy):
1.  wczyta go,
2.  wypisze wszystkie występujące w nim słowa
  nieparzystej długości, które mają taki sam pierwszy,
  środkowy i ostatni znak.
Przez słowo rozumiemy w tym zadaniu maksymalny ciąg
znaków różnych od spacji.

Przykład:
(Pismem pogrubionym oznaczono tekst pisany przez
użytkownika.)
   1   a    333 131 anawa<Enter>
1
a
333
anawa

Zad 2
Napisz program, który:
1.  losuje tablicę n (n stała w programie) liczb z
  przedziału 0..99,
2.  wypisuje je,
3.  wypisuje wszystkie liczby z tej tablicy, które mają
  tę własność, że w tablicy więcej jest liczb od nich
  większych niż liczb od nich mniejszych.

Przykład:
Dla tablicy (n=9):
    34 52  12 83 12 34 52 12 25
należy wypisać:
    12  12  12 25


Egzamin z Pascala I.   20-I-1999              Grupa III

W pierwszym wierszu prosimy wpisać (jako komentarz) imię,
nazwisko i identyfikator z sieci Novell.

Zad 1
Napisz program, który dla każdego wiersza tekstu podanego
z klawiatury (pusty wiersz kończy):
1.  wczyta go,
2.  wypisze wszystkie występujące w nim słowa, w których
  wszystkie cyfry występują po (wszystkich) literach.
Przez słowo rozumiemy w tym zadaniu maksymalny ciąg
znaków różnych od spacji.

Przykład:
(Pismem pogrubionym oznaczono tekst pisany przez
użytkownika.)
  1999   j23  3-luty-1999  ab3cd<Enter>
1999
j23

Zad 2
Napisz program, który:
1.  losuje tablicę n (n stała w programie) liczb z
  przedziału 0..9,
2.  wypisuje ją,
3.  wypisuje tylko te liczby, które występują w tej
  tablicy tylko jeden raz.

Przykład:

Dla tablicy (n=10):
     3 5 1 8 1 3 5 1 2 1
należy wypisać:
      8 2