Source code in Pascal
Delphi & Pascal (česká wiki)
Pages: [1-10] [11-20] [actual] [31-40] [41-50] [51-69]
Order:21
Program: Graf2d.pas
File exe: Graf2d.exe
need: Egavga.bgi
Order:22
Program: Grafmove.pas
File exe: Grafmove.exe
need: Egavga.bgi, Aritmet.pas
Order:23
Program: Grafy.pas
File exe: Grafy.exe
Order:24
Program: Hanojvez.pas
File exe: Hanojvez.exe
File ubuntu: Hanojvez
Example: Hanojvez.txt
Order:25
Program: Hex.pas
File exe: Hex.exe
Order:26
Program: Hlasuj.pas
File exe: Hlasuj.exe
need: Egavga.bgi, Hlasuj.txt
Order:27
Program: Horner.pas
File exe: Horner.exe
need: Egavga.bgi
Order:28
Program: Joydemo.pas
File exe: Joydemo.exe
need: Joystick.pas
Order:29
Author: Neznámy (prosím ozvi sa mi)
Program: Kocka3d.pas, Kockadat.pas
File exe: Kocka3d.exe
Order:30
Program: Kpn.pas
File exe: Kpn.exe
need: Egavga.bgi, Score.txt
Pages: [1-10] [11-20] [actual] [31-40] [41-50] [51-69]
Order:21
Program: Graf2d.pas
File exe: Graf2d.exe
need: Egavga.bgi
Zobrazí 2D graf prezentovaný nasledovnými funkciami. x = 6*(4+sin(t)+3*cos(t)-0.7*sin(2*t)+0.8*cos(15*t)+0.3*abs(cos(30*t)))*cos(t)-15
y = 6*(6+sin(t)+3*cos(t)-0.9*sin(2*t)+0.3*cos(15*t)+0.3*abs(cos(30*t)))*sin(t)
X, Y sú definované v FuncX(), FuncY().
y = 6*(6+sin(t)+3*cos(t)-0.9*sin(2*t)+0.3*cos(15*t)+0.3*abs(cos(30*t)))*sin(t)
X, Y sú definované v FuncX(), FuncY().
Order:22
Program: Grafmove.pas
File exe: Grafmove.exe
need: Egavga.bgi, Aritmet.pas
Program vykreslí graf funkcie zadanej z klávesnice v 3D priestore pričom dovolí tento graf otáčať v roznych osiach súmernosti (X,Y,Z), prípadne zvaščovať zmenšovať mierku zobrazenia. Vykreslovaciu funkciu si program vyžiada z klávesnice.
Order:23
Program: Grafy.pasFile exe: Grafy.exe
This program draws the graphs only at random. Though it's very simple,it doesn't need the well-known EGAVGA.BGI because this file was linked to EXE.
Little help:
procedure EGAVGA_dr; external;
{$L EGAVGA.OBJ }
Little help:
procedure EGAVGA_dr; external;
{$L EGAVGA.OBJ }
Order:24
Program: Hanojvez.pasFile exe: Hanojvez.exe
File ubuntu: Hanojvez
Example: Hanojvez.txt
Game tower of Hanoi. The challenge is to move the rings from the left column to the right. It must not, however, put more into smaller ring. It is always possible to take only one ring.
Order:25
Program: Hex.pas
File exe: Hex.exe
Konvertuje hex číslo na dekadické.
Order:26
Program: Hlasuj.pasFile exe: Hlasuj.exe
need: Egavga.bgi, Hlasuj.txt
Program slúži ako hlasovací stroj. Pri spustení sa zadá téma hlasovania. Postupne hlasujú jednotlivý zúčastnený. Nakoniec program vyhodnotí hlasovanie a zobrazí v peknom koláčovom grafe.
Order:27
Program: Horner.pasFile exe: Horner.exe
need: Egavga.bgi
Program draws Horner's schema.
Order:28
Program: Joydemo.pas
File exe: Joydemo.exe
need: Joystick.pas
The program shows all the posibilities to control a joystick, using 4 demo versions. It suggests the movement of a joystick, buttons pressed, recalibrations and controlling of two joystick synchronically.
Order:29
Author: Neznámy (prosím ozvi sa mi)
Program: Kocka3d.pas, Kockadat.pas
File exe: Kocka3d.exe
Program vytvára 3D prostredie, v ňom zobrazi kocku. Kocka sa dá posúvať a otáčať. Projekčná plocha sa nachádza v počiatku súradnicovej sústavy, je nehybná. Kocka je vykresľovaná IBA PRED projekčnou plochou DO URČITEJ vzdialenosti. Vykresľovanie je obmedzené aj do šírky a výšky.
Ovládanie - a,s,d,w,q,e,j,k,l,i
Ovládanie - a,s,d,w,q,e,j,k,l,i
Order:30
Program: Kpn.pasFile exe: Kpn.exe
need: Egavga.bgi, Score.txt
Program simuluje hru kameň-papier-nožnice. Hráči zadávajú svoju voľbu písmenami k-kameň, p-papier, n-nožnice. Program vyhodnocuje ich úspešnosť a ukladá si jednotlivé hry do súboru. Po skončení zobrazí graf úspešnosti jednotlivých hráčov.
Pages: [1-10] [11-20] [actual] [31-40] [41-50] [51-69]