Ответы на вопрос:
//больше всего проблем доставил звук uses graphabc; var x , y : integer; s : string; begin; x: = 1; y: = windowheight-20; s: = 'важное сообщение'; while x< > windowwidth do begin; textout(x,y,s); inc(x); sleep(50); clearwindow; end; system.console.beep(500,1000); sleep(1000); system.console.beep(500,1000); end.
Популярно: Информатика
-
Koif3215.04.2020 08:20
-
WakaAmigo17.04.2022 13:38
-
dyusembekov127.02.2021 10:35
-
кудряшёв08.01.2020 06:04
-
Tusya00724.01.2023 10:08
-
Мозговина1216.06.2022 22:52
-
alena67917.11.2022 00:29
-
ледяннойкристалл22.11.2021 13:38
-
Алексей0803200506.08.2020 16:05
-
Ludo4ka12325.06.2021 08:27