Вводиться число от 1 до 10.Дать название этого числа(1-один,2-два ....).Составить программу для решение задачи с использованием оператора case.

var n:integer;beginwrite('n = '); readln(n);case n of 1: writeln('один'); 2: writeln('два'); 3: writeln('три'); 4: writeln('четыре'); 5: writeln('пять'); 6: writeln('шесть'); 7: writeln('семь'); 8: writeln('восемь'); 9: writeln('девять'); 10: writeln('десять'); else writeln('ошибка ввода'); end;end.Пример:n = 6шесть