Free Pascal? Ez mit jelent?

"Gyanús, hogy a kérdező megkérdezte korábban már ugyanezt"

"Köszönjük bejelentésed. Moderátoraink amint tudják, ellenőrzik ezt a kérdést."

write('Jelszó: '); // írd ki, hogy „jelszó”

repeat // ismételd a következőket...

      s:=''; // s szövegváltozó legyen üres

      c:=readkey; // olvass be egy karaktert a c változóba

      if c<>#13 then s:=s+c; // ha nem Enter, akkor add hozzá a szöveghez

      write('*'); // írj ki egy csillagot

until (c=#13); // ...addig, míg Entert nem kaptál

Magyarán egy jelszót olvasna be, de a képernyőre csak csillagokat írna ki.

A programrészlet egyébként több sebből vérzik, a legnagyobb baja az, hogy minden beolvasás előtt törli az S változót, tehát bármilyen hosszú jelszó begépelésekor csak az utolsó karakter lesz benne.

"a saját kérdéseimnél ki is x-eltem azt hittem ez megfelel a törlésnek"

Még jó, hogy külön írja is, hogy maga a kérdés nem fog törlődni... Egész pontosan ezt: "Tényleg el akarod távolítani a kérdéseid közül ezt a kérdést? (A kategórialistákban vagy kereséssel még a jövőben is megtalálhatod, csak a te menüdből tűnik el a kérdés.)"