Egzamin z Pascala I.   18-VI-1999                              Grupa I

W pierwszym wierszu każdego z plików 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 są na parzystych pozycjach..
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    aabb   a1b2a3b    a1b23d  abc4d5 <Enter>
aabb
a1b2a3b
abc4d5

Zad 2
Napisz program, który:
1.  losuje tablicę n (n stała w programie) liczb z przedziału -k.. k
  (k>0, stała w programie),
2.  wypisuje tę tablicę,
3.  wypisuje ‘tak’ lub ‘nie’, w zależności od tego, czy w tablicy
  jest segment (spójny fragment) długości m (m stała w programie) o
  sumie większej od zera.

Przykład:
Dla tablicy (n=10, k=100, m=4):
    34 -52  12 83 25 -36 55 -12 25
należy wypisać:
    tak
(np. segment –52,12,83,25).


Egzamin z Pascala I.   18-VI-1999                            Grupa III

W pierwszym wierszu każdego z plików 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, które mają więcej cyfr
  niż liter.
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    abc123   a1a2a34  1a1b1c1   1234<Enter>
1
a1a2a34
aeabaca
1a1b1c1
1234

Zad 2
Napisz program, który:
1.  losuje tablicę n (n stała w programie) liczb z przedziału 0.. k
  (k stała w programie),
2.  wypisuje je,
3.  wypisuje ‘tak’ lub ‘nie’, w zależności od tego, czy w tablicy
  każdy segment (spójny fragment) długości m (m stała w programie), ma
  sumę elementów podzielną przez 5.


Przykład:
Dla tablicy (n=10, k=100, m=4):
    33 52  12 83 13 37 52 13 58
należy wypisać:
 tak