Pascal programy KMP (Klub mladých programátorů)

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ální]  [181-190]  [191-200]  [201-250]  [251-300]  [301-316]

Pořadí: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



Pořadí:172
Autor: Ján Mojžiš
Program: O_recidivistoch.pas
Potřebné: Recidivisti.dat
Pří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.



Pořadí:173
Autor: Ján Mojžiš
Program: O_sucte_cisel.pas
Soubor 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.



Pořadí:174
Autor: ghostix
Program: Obdlznik_hvezdicky.pas
Soubor exe: Obdlznik_hvezdicky.exe

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



Pořadí:175
Autor: RaptoR
Program: Objem_kocky.pas
Soubor exe: Objem_kocky.exe

Program vypočíta objem kocky.



Pořadí:176
Autor: RaptoR
Program: Objem_kvadra.pas
Soubor exe: Objem_kvadra.exe

Program vypočíta objem kvádra.



Pořadí:177
Autor: RaptoR
Program: Obsah_trojuholnika.pas
Soubor exe: Obsah_trojuholnika.exe

Program vypočíta obsah trojuholníka.



Pořadí:178
Autor: Ľuboš Saloky
Program: Odmocni.pas
Soubor exe: Odmocni.exe

Odmocnina realizovaná základnými aritmetickými operacema.



Pořadí:179
odraz.jpgAutor: Ján Benkovič
web: www.tbteacher.host.sk

Program: Odraz.pas
Soubor exe: Odraz.exe

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



Pořadí:180
ohnostroj.pngAutor: Ján Benkovič
web: www.tbteacher.host.sk

Program: Ohnostroj.pas
Soubor 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ální]  [181-190]  [191-200]  [201-250]  [251-300]  [301-316]