[pyost]

Ne vidim kakva bi tu greska mogla da bude, ali poslednji readln nije dobro napisan:

program Kolicnik;
   var
     a,b:integer;
     c:real;
   begin
     write('Unesi dva broja');
     readln(a,b);
     c:=a/b;
     writeln('Kolicnik unetih brojeva je:',c);
     write('Pritisnite <Enter> za kraj');
     readln();
   end.