4. Приклад роботи з процедурами та функціями модуля crt.
Для закріплення цієї теми в прикладі розглядається готова програма „Музикальний лічильник”(А1). Який використовує всі вивчені оператори , процедури та функції. Лічильник складається з трьох розрядів, кожен з яких розташовано в окремім вікні. Зміна значення лічильника супроводжується звучанням мелодії.
Program A1;
uses Crt;
label 1;
var i,j,f:integer;
begin
TextMode(1); TextBackGround(10);
Window(5,7,25,8); TextBackGround(16); textcolor (14); clrscr;
gotoxy(1,1); write('Музыкальный будильник');
for i:=0 to 9 do
for j:=0 to 9 do
for f:=0 to 9 do
begin
if keypressed then goto 1;
Window(9,9,11,11); TextBackGround(7); textcolor (10); clrscr;
gotoxy(2,2); write(i);
Window(12,9,14,11); TextBackGround(10); textcolor (7); clrscr;
gotoxy(2,2); write(j);
Window(15,9,17,11); TextBackGround(12); textcolor (9); clrscr;
gotoxy(2,2); write(f);
Window(13,15,14,16);TextBackGround(2); textcolor (f); clrscr;
gotoxy(2,1); write('-');
sound(1000); delay(20000); nosound;
sound(1500); delay(20000); nosound;
sound(2000); delay(20000); nosound;
sound(2500); delay(20000); nosound;
sound(1500); delay(20000); nosound;
sound(2500); delay(20000); nosound;
sound(1000); delay(20000); nosound;
sound(2000); delay(20000); nosound;
sound(1750); delay(20000); nosound;
sound(1500); delay(20000); nosound;
sound(1250); delay(20000); nosound;
sound(1000); delay(20000); nosound;
clrscr;
end;
1 :
end.
5. Практичне завдання.
Для закріплення теми „Цикли”, учні повинні зробити практичну роботу: написати програму електронного годинника - будильника . Алгоритм цієї програми повинен мати декілька екранів з різною інформацією, та деякі властивості при роботі:
перше екран інформації - запит часу, коли повинен зазвучати сигнал (звучання мелодії);
другий екран інформації - відображення в окремих вікнах часу (години, хвилини, секунди), при роботі годинника;
у назначений час повинна зазвучати мелодія;
зупинка звучання сигналу окремою клавішею, без зупинки хода годинника;
переривання роботи програми для редагування.
При виконанні практичної роботи учень повинен самостійно створити програму по своєму уявленню, використовуя програму – приклад. Всі питання, які виникають при створенні програми, повинні вирішуватися практично, оцінюя результат.