uses wincrt;
begin
    Sound(800);
    delay(5);
    nosound;
end.