program tervitus;
uses kuj, crt;
begin
 clrscr;
 servad;
 gotoxy(15, 10); 
 writeln('Tervist, kasutaja ');
 kaota_kursor;
 readln;
 kursor_tagasi;
 textmode(lastmode);
end.