Syntax – Pascal – Fórum – Programujte.com

 cis:=((je_prvocislo(j)) and (je_prvocislo(j+2)));

 if(cis) then write('(',j,')('j+2')');

 

co tam dat taky carky za ' a pred '

write('(',j,')(',j+2,')');

To KIIV : Takhle jsem to nakonec doupravil, ještě než jsi mi to poslal. Ale pořád někde chybka.

Expected "(". No, to jsou ty dobré chybky, vůbec ji totiž nevidím, ale bude to někde tady:

cis:=((je_prvocislo(j)) and (je_prvocislo(j+2)));

To RePRO : a jakeho typu je cis? pravdepodobne by to melo byt boolean.. pripadne pouzit ord na prevedeni do integer

To KIIV : Jo, proměnná cis je boolean. Ta funkce vrací typ boolean (jestli je, nebo není prvočislo). ;)

tak asi celej kod protoze tu nejak nic vic nevidim

To KIIV : http://www.pastebin.cz/26804

Ještě jak tam je ten logickej součin, tak tam má být u té funkce v tom parametru j+2.

delphi zkompilovalo bez problemu (teda vyhodil sem clrscr a uses crt; to by tam stejne nebylo)

Kurňa, tak kde hledat chyby? V tom se ani chyby snad hledat nedají, je to triviální příklad. Vidím, že je to dobře...

Používám TP.

Nechápu, ale už to valí...

Jinak díky. ;)

To KIIV : Hele, tak už vím proč Ti to zkompilovalo...

Ty si tam měl totiž toto:

cis:=je_prvocislo(j) AND je_prvocislo(j);

cis:=je_prvocislo(j) AND je_prvocislo(j+2);

To RePRO : ha uz to vidim... var se pouziva v function je_prvocislo(var cislo:integer): boolean; jen kdyz chces predavat "odkazem" - tj. muzes zmenit ve funkci parametr, kterej je s var a on se zmeni i venku

proto se tam neda dat j+2 .. to neni promenna

To KIIV : Fajn, tak jak mám změnit ten parametr?

smaz var