тво користувачеві}
sound (3000);
delay (1000);
nosound;
clrscr;
gotoxy (30, b);
write ('Якщо Ви в цій проге нічого не поміняєте');
gotoxy (30, b +1);
write ('вона працюватиме ВІЧНО ...');
repeat
a: = readkey;
until a = chr (13);
sound (4000);
delay (1000);
nosound;
goto 1;
end;
if b = 12 then begin {математичні методи}
sound (3000);
delay (1000);
nosound;
clrscr;
gotoxy (30, b);
write ('Завдання сама по собі не математична,');
gotoxy (30, b +1);
write ('значить і математичних методів ніяких немає');
repeat
a: = readkey;
until a = chr (13);
sound (4000);
delay (1000);
nosound;
goto 1;
end;
if b = 13 then begin {Опис даних}
sound (3000);
delay (1000);
nosound;
clrscr;
gotoxy (30, b);
write ('Даних немає ...');
repeat
a: = readkey;
until a = chr (13);
sound (4000);
delay (1000);
nosound;
goto 1;
end;
if b = 14 then begin {Алгорітм.блок-схема}
sound (3000);
delay (1000);
nosound;
clrscr;
gotoxy (30, b);
write ('Дивись Пояснітелную записку');
repeat
a: = readkey;
until a = chr (13);
sound (4000);
delay (1000);
nosound;
goto 1;
end;
if b = 16 then begin {Текстові приклади}
sound (3000);
delay (1000);
nosound;
clrscr;
gotoxy (30, b);
write ('Текстових прикладів у мене теж немає');
repeat
a: = readkey;
until a = chr (13);
sound (4000);
delay (1000);
nosound;
goto 1;
end;
if b = 15 then begin
sound (3000);
delay (1000);
nosound;
jim;
closegraph;
goto 1;
end;
end;
until a = chr (27);
end.
4 Керівництво користувача для роботи в програмі.
При запуску програми з'являється меню, що пропонує широкий вибір пунктів.
Курсор переміщається за допомогою клавіш курсору, вибір здійснюється клавішею ENTER. p> При виборі якогось пункту меню з'являється відповідне повідомлення, проте ж, при виборі пункту В«ПрограмаВ» запускається безпосередньо сама гра.
Суть гри полягає в збиванні літаючих тарілок засобом ППО.
Засіб ППО може за допомогою курсору переміщатися по екрану в горизонталь...
