Pascal programy KMP (Klub mladých programátorov)

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Stránky: [1-50]  [51-100]  [101-110]  [111-120]  [121-130]  [131-140]  [141-150]  [151-160]  [161-170]  [aktuálna]  [181-190]  [191-200]  [201-250]  [251-300]  [301-316]

Poradie:171
Autor: 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



Poradie:172
Autor: Ján Mojžiš
Program: O_recidivistoch.pas
Potrebné: Recidivisti.dat
Príklady: 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.



Poradie:173
Autor: Ján Mojžiš
Program: O_sucte_cisel.pas
Súbor 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.



Poradie:174
Autor: ghostix
Program: Obdlznik_hvezdicky.pas
Súbor exe: Obdlznik_hvezdicky.exe

Program vykreslí obdĺžnik z hviezdičiek.



Poradie:175
Autor: RaptoR
Program: Objem_kocky.pas
Súbor exe: Objem_kocky.exe

Program vypočíta objem kocky.



Poradie:176
Autor: RaptoR
Program: Objem_kvadra.pas
Súbor exe: Objem_kvadra.exe

Program vypočíta objem kvádra.



Poradie:177
Autor: RaptoR
Program: Obsah_trojuholnika.pas
Súbor exe: Obsah_trojuholnika.exe

Program vypočíta obsah trojuholníka.



Poradie:178
Autor: Ľuboš Saloky
Program: Odmocni.pas
Súbor exe: Odmocni.exe

Odmocnina realizovaná základnými aritmetickými operáciami.



Poradie:179
odraz.jpgAutor: Ján Benkovič
web: www.tbteacher.host.sk

Program: Odraz.pas
Súbor exe: Odraz.exe

Program ako ukážka odrazu loptičky. Loptička zanecháva stopu, takže tvorí zaujímave obrazce.



Poradie:180
ohnostroj.pngAutor: Ján Benkovič
web: www.tbteacher.host.sk

Program: Ohnostroj.pas
Súbor exe: Ohnostroj.exe

Simulácia ohňostroja v pascale s malými časťami asembleru. Veľmi efektné.


Stránky: [1-50]  [51-100]  [101-110]  [111-120]  [121-130]  [131-140]  [141-150]  [151-160]  [161-170]  [aktuálna]  [181-190]  [191-200]  [201-250]  [251-300]  [301-316]