Diskuze a otázky - Pascal -> Programování
úvodní strana | aktualizovat | dolů
V diskuzi je 41 příspěvků a shlédlo ji 998 uživatelů .
eso_v_rukavu | 16. 09. 2009, 13:55:12 | více příspěvků | napsat uživateli
ja bych ti pomohl, ale uz si nepamatuju syntaxi Pascalu... jsou to uz veky, co jsem v nem neco delal. je zrejmy, ze budes muset pouzit bud typ record a napsat funkci, ktera vraci tento typ a nebo pouzit pointery. jinak totiz nejde udelat proceduru, ktera by vratila dve hodnoty najednou.
napriklad s pointery ale asi to bude takhle (mozna ze tam udelam chyby v syntaxi, uz si to fakt nepamatuju - Pascal jsem videl naposledy tak pred 15 lety, takze si to pripadne oprav):
type typ_pole = array[1..10] of integer;
procedure MinMax(pole: typ_pole; pmax,pmin: ^integer);
var i: integer;
begin
for i:=1 to 10
if pole[i]>pmax^ then pmax^:=pole[i];
if pole[i]<pmin^ then pmin^:=pole[i];
next i
end;
no a ty vysledky jsou ulozeny v pameti na miste,kam ukazuji pointery pmax a pmin.
kazdopadne ale povazuju uceni se o takove fosilii jako je Pascal za ztratu casu.
uživatel eliminován | 16. 09. 2009, 09:36:06
> P_a_t_r_i_k
jinak zacnes normalne
program patrik;
var a,b,c,d,e:integer; (proste ty cisla co zadavas)
begin
write('Zadejte prvni cislo: ');
readln(a);
atd...až zadas vsechy cisla
a pak otrocky pro kazdy cislo a>b, b>c......
if a>b then writeln('Nejvetsi je prvni cislo: ',a)
nebo cyklem, ale pro 10 cisel je to hned
uživatel eliminován | 16. 09. 2009, 09:35:25
> Laucco
No ja to snad nějak udělám,ale i tak dík !1187!
Borizz | 16. 09. 2009, 09:35:18 | více příspěvků | napsat uživateli
> P_a_t_r_i_k
sem měl dva roky pascal a asembler !2!!2!!2! a sem rád už to nemusím dál dělat !2!!2!!2!
uživatel eliminován | 16. 09. 2009, 09:34:49
> P_a_t_r_i_k
zapiš to prostě jen jako matematickej vzorec....hele už si fakt nevzpomínám přece jen je to 8 let !1322!
uživatel eliminován | 16. 09. 2009, 09:30:41
> Laucco
nene mame to v prvákua druháku.. pak pokračujeme na delphi a c++ a pak tkové sračky jako html!1190!
uživatel eliminován | 16. 09. 2009, 09:30:00
hey v tom jsem dělal na ZŠ !383!...já myslel, že už je jen C++, Deplhi a ty známější no.....max.Visual Basic v tom ještě trichu umím !43!
uživatel eliminován | 16. 09. 2009, 09:28:59
> P_a_t_r_i_k
tak to udělam dneska po obědě, ale bude to za 1250,- ok?
._DeNuLka_. | 16. 09. 2009, 09:28:10 | více příspěvků | napsat uživateli
!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!1123!!1107!!1354!!
._DeNuLka_. | 16. 09. 2009, 09:27:39 | více příspěvků | napsat uživateli
Tak ČaUkY liDíí...!1107!!1123!
uživatel eliminován | 16. 09. 2009, 09:26:50
Tak nemám, ale kdybys chtěl trapnou databázi letadel, ve který můžeš přídávat, odebírat a hledat tak řekni. :D:D:D
._DeNuLka_. | 16. 09. 2009, 09:25:56 | více příspěvků | napsat uživateli
P_a_t_r_i_k
JůŮjda DíKky...!811!!1190!!1103!
uživatel eliminován | 16. 09. 2009, 09:25:55
> Borizz
jo no,ale mam v hlavě ještě prázdniny a to už mame 4 hodiny počítaču dneska.. první dvě jsme měli Datové sítě... a teď to programko
Borizz | 16. 09. 2009, 09:22:56 | více příspěvků | napsat uživateli
> P_a_t_r_i_k
hej jakože vůbec !2!!2!!2! sem z toho dutýýý!2!!2!!2! a z naší třídy to umělo asi tag 5lidí !2!!2!!2! a ja mezi něma nebyl !2!!2!!2! ale je to jedno z těch nejjednoduších
uživatel eliminován | 16. 09. 2009, 09:22:34
> P_a_t_r_i_k
ja ti to udelam, za 1000,-
ale v sobotu, ok?
uživatel eliminován | 16. 09. 2009, 09:22:25
Prosím ještě někoho kdo se v tom význa.. každá rada je cenná !1089!
._DeNuLka_. | 16. 09. 2009, 09:21:40 | více příspěvků | napsat uživateli
P_a_t_r_i_k
jo kdybych to uměla...!1355!!1347!
uživatel eliminován | 16. 09. 2009, 09:14:47 |
Prosím zdatného programátora nebo někoho kdo se umí v tomhle orientovat jestli by mi nepomohl se seminárkou .. zadání : Napište proceduru, která z daného pole 10-ti čísel vybere minimální a maximální hodnotu. Obě tyto hodnoty procdura vratí jako výsledek. !663! ( v Pascalu ) moc prosím
reagovat