Pa jel moze broj figura da bude 1,2 ili 0,5? Zato ne moze Real. U stvari moze, ali nema potrebe a samo komplikuje.
Greska ti je sintaksna. Ne moze ReadLn da ti vrati vrednost. Pomocu ReadLn upises vrednost u neku promenljivu, pa onda radis sa tom promenljivom.
Primer:
WriteLn('Upisite broj pesaka');
ReadLn(BrojPesaka); //broj pesaka si ranije definisao kod VAR
BrojPesaka := 8 - BrojPesaka; //npr. ako ih je bilo 8, dalje vec kapiras sam...