1) Vytvorte program RODNECISLO, ktorý načíta od užívateľa jeho rodné číslo. Najprv program skontroluje, či je správne (každé rodné číslo musí byť deliteľné 11), a potom z neho určí, či je to žena alebo muž a výsledok vypíše na obrazovku.
2) Učiteľ pri hodnotení testu zvolil nasledovnú stupnicu:

Body Známka
100 – 80 1
79 – 65 2
64 – 50 3
49 – 30 4
29 – 0 5
Vytvorte program, do ktorého postupne zadávame bodové hodnotenie jednotlivých žiakov, pričom posledná hodnota je -1, vtedy zadávanie skončí. Program vypíše aritmetický priemer známok.
3) Vytvorte program, ktorý načíta vetu z klávesnice rozdelenú na slová medzerami. Program vypíše, koľko je v nej slov a vetu vypíše so zameneným poradím slov.
4) *Naprogramujte hru JACKPOT – tri točiace sa kruhy so symbolmi, ktoré hráč zastaví stlačením klávesu na klávesnici. Podľa toho, či sú symboly na zastavených kruhoch rovnaké, hráč vyhráva. V prípade dvoch rovnakých symbolov vyhráva dvojnásobok vkladu, v prípade troch rovnakých symbolov päťnásobok vkladu, v prípade neúspechu sa mu zo stávky odpočíta polovica vkladu (zaokrúhlenú na celé čísla). Na začiatku hry si hráč určí výšku stávky. Hra končí, ak hráč už nechce hrať alebo prehral celú stávku. Po každom pokuse sa mu zobrazí súčasná výška stávky. Program esteticky upravte.

a co tak sem dat co mas?

1)no rodne cislo ak sa nemylim tak DVOJCISLIA spolu musia byt del. 11. ak budes mat 10 cisel a[1]..a[10] tak rok bude 10*a[1]+a[2] a tak spravis postupne mesiac, den a teda ak rok+mes+den+10*a[7]+a[8]+10*a[9]+a[10] mod 11 =0 then atd
zena/muz to bude var gender:boolean a bude true, spravis ze ak je a[3] = 5 alebo 6 tak das false, a na konci if gender then writeln('muz') else writeln('zena');

btw pascal nie je program ako hovori tvoj nadpis

Precitaj si pravidla, najma pravidlo 19