Создание текстового редактора
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: бесплатные курсовые работы скачать, контрольные работы 8 класс
| Добавил(а) на сайт: Sharshin.
Предыдущая страница реферата | 4 5 6 7 8 9 10 11 12 13 14 | Следующая страница реферата
e:array [1..7] of integer=(165,165,165,165,165,165,170);
r:array [1..7] of integer=(600,600,600,600,600,600,1100);
w:array [1..5] of integer=(167,167,167,294,233);
q:array [1..5] of integer=(1100,600,600,600,1100);
o:array [1..9] of integer=(165,182,165,182,165,196,165,182,165);
b:array [1..9] of integer=(600,1100,600,600,600,600,600,600,3000);
var a,u,z,x:integer; i:byte;
begin
for a:=1 to 4 do
begin
for i:=1 to 6 do
begin
sound(m[i]);
delay(t[i]);
nosound;
end;
end;
for u:=1 to 3 do
begin
for i:=1 to 7 do
begin
sound(e[i]);
delay(r[i]);
nosound;
end;
Рекомендуем скачать другие рефераты по теме: сочинение капитанская, борьба реферат.
Категории:
Предыдущая страница реферата | 4 5 6 7 8 9 10 11 12 13 14 | Следующая страница реферата
Главная