По информатике помогите...

По информатике помогите сделать.В соответствии с числом n выводить на экран названия нот (1-до, 2-ре, 3-мн, и т.д.

 

Program n1;
var n:integer;
begin
read(n);
if n=1 then writeln('До);
if n=2 then writeln('Ре');
if n=3 then writeln('Ми');
if n=4 then writeln('Фа');
if n=5 then writeln('Соль');
if n=6 then writeln('Ля');
if n=7 then writeln('Си');
end.