Ján Mojžiš

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Stranky: [aktualna]

Poradze:1
Zrobil: Ján Mojžiš
Program: Ab_slova.pas
Subor exe: Ab_slova.exe
Mušiš mac: Slova.txt

AB-slovo je slovo zlozene vylucne z pismen A a B, napriklad AA, ABB, BBB. Napiste program, kt. na uvod precita zo vstupu postupnost roznych AB-slov, oddelenych jednou medzerou. Potom bude v cykle zo vstupu prijmat AB-slovo, na ktore zareaguje jednym z nasledujucich sposobov:
a) ak prijal prazdne slovo, ukonci svoju cinnost,
b) ak prijal slovo, kt. nebolo v uvodnej postupnosti, vypise retazec nepoznam a pokracuje,
c) ak prijal slovo, kt. bolo v uvodnej postupnosti, vypise jeho poradie v tejto postupnosti a pokracuje.

PRIKLAD:
pre uvodnu postupnost AAA, ABAB mame
VSTUP:     VYSTUP:
AAA         nepoznam
ABAB       2
AAAA       1
Pouzitie binarneho stromu s 2 vetvami A a B slova su v subore



Poradze:2
Zrobil: Ján Mojžiš
Program: Binar.pas
Subor exe: Binar.exe

Napiste program, ktory nacita kladne cislo n a vypise nasledujuci riadok
,,dvojkovy zapis n"(2) = ,,desiatkovy zapis n" (10)
PRIKLAD: Pre n = 10 vypise: 1010(2) = 10(10).
OBMEDZENIE: V celom programe mozete pouzit iba procedury bez parametrov a jedinu jednoduchu globalnu premennu.


Rekurzia. Vsimnite si ako testujeme parnost:
if 1 and c = 0 je parna vetva, lebo
  10 = 1010 and 0001 = 0 (0 x 1) a
  11 = 1011 and 1 = 0001.
 Najrychlejsi test parnosti.



Poradze:3
Zrobil: Ján Mojžiš
Program: O_brckavych_zatvorkach.pasCrt_efd.pas

Napiste program, ktory moze byt skompilovany oboma druhmi kompilatorov Pascalu a po spusteni vypise ANO, ak bol skompilovany kompilatorom s vnorenym zatvorkovanim a NIE, ak bol skomp. kompilatorom s nevnorenym zatvorkovanim

Zistil som ze sa to da aj takto. Tie uvodzovky su tam dolezitou sucastou, lebo ale uz nechce uznat, ked nepodporuje vnorene ale '' mi uzna a teda ''text - ANO' --> 'text NIE'text ANO' pri vnorenom sa neberie do uvahy pri text, lebo sa hodi do uvodzovky.

POZNAMKA:
CRT_EFD nie je sucastou tohto riesenia. Kniznicu CRT_EFD pre pracu s konzolovymi vypismi mozete stiahnut napriklad na: http://www.stano.wz.sk/index.php?id=8



Poradze:4
Zrobil: Ján Mojžiš
Program: O_recidivistoch.pas
Mušiš mac: Recidivisti.dat
Ukažka: O_recidivistoch.txt

Nepokoje v nasich vazniciach narastaju do neusosnych medzi. A to nielen preto, ze su preplnene, ale aj preto, ze recidivistom su vzdy pridelene nove cisla a nie tie ich, na kt. si uz zvykli. Vo vazniciach, kde sa vsetci oslovuju cislami, je tento fakt velmi nevytany.

Vsetko vyriesil novy projekt Alcatraz II. Ak pride do tejto vaznice dalsi vazen, dozorcovia zadaju do pocitaca jeho meno a priezvisko a program vypise NOVY, ak tu este predtym vazneny nebol, alebo RECIDIVISTA, ak neprisiel po prvy raz. Program tiez vypise cislo vazna. Novemu vaznovi moze program priradit lubovolne cislo, ktore avsak nema iny vazen, no recidivistovi musi priradit cislo z jeho predchadzajuceho pobytu. Mozno predpokladat ze cisla su priradovane iba uvedenym programom.



Poradze:5
Zrobil: Ján Mojžiš
Program: O_sucte_cisel.pas
Subor exe: O_sucte_cisel.exe


Napiste program, ktory nacita kladne cislo n a vypise nasledujuci riadok ,,dvojkovy zapis n"(2) = ,,desiatkovy zapis n" (10)
PRIKLAD: Pre n = 10 vypise: 1010(2) = 10(10).
OBMEDZENIE: V celom programe mozete pouzit iba procedury bez parametrov a jedinu jednoduchu globalnu premennu.

Rekurzia na minus. Pri vacsom pocte kladnych cisel a poslednom zapornom treba dvakrat zadat na konci 0.



Poradze:6
Program: Z_pismenkovej_ulice.pas
Mušiš mac: Dom.txt

Program ktorý može byť skompilovaný oboma druhmi kompilátorov Pascalu a po spustení vypíše ANO, ak bol skompilovany kompilátorom s vnoreným zátvorkovanim a NIE, ak bol skompilovaný kompilátorom s nevnoreným zátvorkovaním.

Na vstupe je daný počet poschodí a počet okien na jednom poschodí domu na Písmenkovej ulici. Ďalej je daný počet okien, kde nikto nie je doma a zoznam týchto okien. Každé okno je dané dvojicou a,b, kde a je poschodie a b číslo okna na poschodí zľava. Ďalej je dané okno, kde to nevydržali a zasvietili. Odsimulujte na obrazovke jeden zo sposobov, ako sa možu rozsvecovať ostatné okná.


Stranky: [aktualna]