Viết chương trình để làm ra một bàn phím giả thanh của đàn piano với những quy định D = đồ R=rê M=mi F=pha S=son l=la Si=si ( đề thi học sinh giỏi của Huyện Xuân Hồng,Tỉnh Nam Định năm 2019)
2 câu trả lời
mình ngu nhạc :< các số mình viết ở đây đều từ trong sách tin lớp 11 :<< nếu có sai sót gì thì bạn thông cảm nha
uses crt;
var not: char;
begin
clrscr;
writeln('moi ban choi dan theo quy dinh D=DO/E=RE/M=MI/F=PHA/S=SON/L=LA/SI=SI an k de ngung choi');
repeat
not:=readkey;
case not of
'D' : BEGIN nosound ; sound(262); end;
'R': BEGIN nosound ; sound(294); end;
'M': BEGIN nosound; sound(330); end;
'F' : BEGIN nosound ; sound(349); end;
'S' :BEGIN nosound; sound(494); end;
'L':BEGIN nosound; sound(523); end;
'SI':BEGIN nosound; sound(587); end;
end
until (Upcase(not)='k');
nosound;
end.
uses crt;
begin
if lowercase(readkey) = 'l' then sound(880);
if lowercase(readkey) = 'd' then sound(523);
if lowercase(readkey) = 'r' then sound(587);
if lowercase(readkey) = 'm' then sound(659);
if lowercase(readkey) = 'f' then sound(698);
if lowercase(readkey) = 's' then sound(783);
if lowercase(readkey) = 'x' then sound(988); //nốt si
delay(1000);
end.
- Đề thi học kì 2 môn địa 9 có lời giải chi tiết
- Đề thi học kì 2 môn địa 9 có lời giải chi tiết
- Đề thi học kì 2 môn địa 9 có lời giải chi tiết
- Đề thi học kì 2 môn địa 9 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 9 có lời giải chi tiết
