pascal & databaza

ahojte... ak by sa tu nasiel niekto kto by mi poradil resp napisal niejaku proceduru, alebo nieco k tomuto programu budem velmi vdacny ...

program : "databaza hotela"
vstupne udaje: host(record)-meno,datum ubytovania,c.izby
izba(rec)-c.izby, pocet lozok,obsadenost, cena
vystupne udaje: zoznam hosti; zoznam izieb
menu:1. ubytovanie new hosta=meno,datum ubytovania,vypis poctu free izieb, nasledne sa zadava c.izby
2.vypis obsadenosti izieb...
3.vypis hosti
4.vyhladanie-podla mena-vypis c.izby na ktorej je / podla c.izby
5.odhlasenie hosta-meno, datum-vypis ceny...

este raz vdaka za akukolvek pomoc

refresh

Aj by sme ti vedeli pomoct, keby si aspon nieco urobil... Keby si mal aspon zaklad, urcite by ti niekto z nas rad pomohol. No tazko podporovat nieco taketo...
Poviem ti to takto : Vypracovali by sme ti to, ale co by si mal z toho ty, okrem nejakeho odovzdaneho zadania/zapoctu ? Ked si k tomu sadnes, naucis sa aj sam, zo zvyskom ti pomozeme, aspon budes mat z toho nieco...Rozumies...My ti nepomozeme, pokial ti vypracujeme zadanie... Priam naopak, podporime ta mozno v niecom nedobrom...

nemam toho vela... je to lepsie?

program hotel;
uses crt;
const n=50;
var host: record
name, date: array[1..n];
var room: record
number, beds, occupancy, cost: array[1..n];
var visitors, rooms: string

procedure menu;
begin
writeln('Prihlasit hosta [1]');
writeln('Obsadenost izieb [2]');
writeln('Zoznam hosti [3]');
writeln('Vyhladat hosta [4]');
writeln('Odhlasit hosta [5]');
case readkey of
'1': submenu1;
'2': submenu2;
'3': submenu3;
'4': submenu4;
'5': submenu5;
end;
end;

procedure submenu1;
begin
writeln('Zadajte meno:');
readln('host.name[i]');
writeln('Zadajte datum prihlasenia:')
readln('host.date[i]');
writeln

begin
clrscr;
menu;
end.

... moze byt?

nie.
sak ti to ani nefunguje tak naco to pises.

ale nic... viem ze to nefunguje a potrebujem s tym pomoct
napisal som to len preto ,lebo programator pisal ze nech nieco napisem co mam, ale ako vidim bolo to zbytocne. vdaka za ochotu, bye

nechapem tomu slovu new. to je co? akoze object to nebude kedze tam mas len recordy. tak co by to malo vyjadrovat?
inak neviem preco v pascali. nemozes si vybrat programovaci jazyk aky len chces? napriklad C. pretoze taky podobny tu uz je v C-ecku.
pole coho? ci to len take poles nicim a bez nicoho?......

skus zacat s niecim takymto

ok nechaj tak... iny prog. jazyk si vybrat nemozem, pretoze to mame projekt, a uz to neriesim, je to na mna vela ked som sa na to vykaslaval 3roky teraz uz nic neurobim

3 roky? dobrééééé

Srandujes,,,


Inak da sa to riesit elegantne aj v Pascale, ..A este to vloz do okien... robota na 3-tyzdne (a soft na 3-mesiace) ,,,,a je z toho profi soft ..zober napr. b-Tree....z Novel..databazy...hotove indexi..


, ale to by som to asi zacal predavat

..a hned po osloveni by som to preklopil aj s DB na Delphi
// inak neuveritelna poziadavka na forum...este som sa nestretol